Changeset 132

Timestamp:

Dec 19, 2003, 1:33:08 PM (21 years ago)

Author:

Gary Byers

Message:

Define bundle/executable paths here.

File:

• trunk/ccl/examples/cocoa.lisp (modified) (1 diff)

trunk/ccl/examples/cocoa.lisp

@@ -1 +1 @@
 (in-package "CCL")
+
+;;; We need to be able to point the CoreFoundation and Cocoa libraries
+;;; at some bundle very early in the process.  If you want to use some
+;;; other bundle path, you may need to change the value of
+;;; *default-bundle-path*; if you want to use some other executable
+;;; within that bundle, you may need to change the value of
+;;; *default-executable-path*.
+
+
+(defparameter *default-bundle-path* "ccl:OpenMCL.app;")
+(defparameter *default-bundle-executable-path*
+  #+darwinppc-target
+  (merge-pathnames "Contents/MacOS/dppccl" *default-bundle-path*)
+  #+linuxppc-target
+  (merge-pathnames "ppccl" *default-bundle-path*))
+
 
 (require "OBJC-SUPPORT")