Index: /trunk/source/cocoa-ide/ide-bundle.lisp
===================================================================
--- /trunk/source/cocoa-ide/ide-bundle.lisp	(revision 12701)
+++ /trunk/source/cocoa-ide/ide-bundle.lisp	(revision 12702)
@@ -70,4 +70,5 @@
 ;;; and figuring out how to get make to do so - is left as an exercise.
 (defun install-altconsole (bundle-path)
+  #+cocotron (declare (ignore bundle-path))
   #-cocotron
   (let* ((altconsole-path (merge-pathnames ";Contents;Resources;AltConsole.app;" bundle-path))