Changeset 7364 for trunk/ccl/level-1/l1-application.lisp

Timestamp:

Oct 5, 2007, 8:23:32 PM (14 years ago)

Author:

gz

Message:

conditionalize lisp-implementation-type, application-init-file and add home:ccl;modules; to module search path

File:

• trunk/ccl/level-1/l1-application.lisp (modified) (1 diff)

trunk/ccl/level-1/l1-application.lisp

@@ -293 +293 @@
 
 (defmethod application-init-file ((app lisp-development-system))
-  "home:openmcl-init")
-
+  #+clozure-common-lisp "home:ccl-init"  ;; This is the init file loaded before cocoa.
+  #-clozure-common-lisp "home:openmcl-init")
 
 (defmethod application-error ((a application) condition error-pointer)