[Openmcl-devel] trunk cannot require cocoa-application

Sun Jul 25 04:41:03 PDT 2010

I have a Powerbook G4 running Mac OS 10.5.8,

I just got the ccl trunk, was told

Checked out external at revision 14041.

Checked out revision 14041.

I then got failure when trying to build coca ide:

Macintosh:ccl arthur$ ./dppccl --no-init
Welcome to Clozure Common Lisp Version 1.5-dev-r13514M-trunk   
(DarwinPPC32)!
? (update-ccl)
;Running 'svn update'.
;'svn update' complete.
NIL
NIL
NIL
? (require "COCOA-APPLICATION")
 > Error: Undefined function CALL-IN-INITIAL-PROCESS called with  
arguments (#<Compiled-function (:INTERNAL LOAD-COCOA-FRAMEWORK) (Non- 
Global)  #xC6FB28E>) .
 > While executing: (:INTERNAL PROGN-IN-ENV CHEAP-EVAL-IN- 
ENVIRONMENT), in process listener(1).
 > Type :GO to continue, :POP to abort, :R for a list of available  
restarts.
 > If continued: Retry applying CALL-IN-INITIAL-PROCESS to (#<Compiled- 
function (:INTERNAL LOAD-COCOA-FRAMEWORK) (Non-Global)  #xC6FB28E>).
 > Type :? for other options.
1 > :B
  (F019A730) : 0 (CALL-CHECK-REGS LOAD-COCOA-FRAMEWORK) 72
  (F019A740) : 1 (FUNCALL #'#<(:INTERNAL PROGN-IN-ENV CHEAP-EVAL-IN- 
ENVIRONMENT)> ((DEFLOADVAR *COCOA-EVENT-PROCESS* *INITIAL-PROCESS*)  
(DEFUN CURRENT-NS-THREAD NIL #) (DEFUN CREATE-VOID-NSTHREAD NIL #)  
(DEFUN LOAD-COCOA-FRAMEWORK NIL #) (PUSHNEW # *LISP-SYSTEM-POINTER- 
FUNCTIONS* :KEY #) ...) #<LEXICAL-ENVIRONMENT #xC5841C6> ((#)  
#<LEXICAL-ENVIRONMENT #xC6EE06E> *LOADING-TOPLEVEL-LOCATION* CHEAP- 
EVAL-IN-ENVIRONMENT (LOAD-COCOA-FRAMEWORK) ...)) 204
  (F019A750) : 2 (FUNCALL #'#<(:INTERNAL WITH-COMPILATION-UNIT-BODY  
LOAD-FROM-STREAM)>) 520
  (F019A770) : 3 (CALL-WITH-COMPILATION-UNIT #<COMPILED-LEXICAL- 
CLOSURE (:INTERNAL WITH-COMPILATION-UNIT-BODY LOAD-FROM-STREAM)  
#x4E50F6> :OVERRIDE NIL) 64
  (F019A790) : 4 (LOAD-FROM-STREAM #<BASIC-FILE-CHARACTER-INPUT-STREAM  
("/Users/arthur/ccltrunk/ccl/objc-bridge/objc-runtime.lisp"/8  
ISO-8859-1) #xC58475E> NIL) 212
  (F019A7A0) : 5 (%LOAD #P"/Users/arthur/ccltrunk/ccl/objc-bridge/objc- 
runtime.lisp" NIL NIL :ERROR :DEFAULT) 1956
  (F019A7D0) : 6 (LOAD #P"/Users/arthur/ccltrunk/ccl/objc-bridge/objc- 
runtime.lisp" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT- 
EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT) 648
  (F019A7F0) : 7 (MODULE-PROVIDE-SEARCH-PATH "OBJC-RUNTIME") 156
  (F019A800) : 8 (SOME-XX-ONE 0 NIL #<COMPILED-LEXICAL-CLOSURE  
(:INTERNAL REQUIRE) #xC57D55E> (MODULE-PROVIDE-SEARCH-PATH MODULE- 
PROVIDE-ASDF)) 480
  (F019A810) : 9 (REQUIRE "OBJC-RUNTIME" NIL) 532
  (F019A830) : 10 (CALL-CHECK-REGS REQUIRE "OBJC-RUNTIME") 72
  (F019A840) : 11 (FUNCALL #'#<(:INTERNAL WITH-COMPILATION-UNIT-BODY  
LOAD-FROM-STREAM)>) 520
  (F019A860) : 12 (CALL-WITH-COMPILATION-UNIT #<COMPILED-LEXICAL- 
CLOSURE (:INTERNAL WITH-COMPILATION-UNIT-BODY LOAD-FROM-STREAM)  
#x4E52C6> :OVERRIDE NIL) 64
  (F019A880) : 13 (LOAD-FROM-STREAM #<BASIC-FILE-CHARACTER-INPUT- 
STREAM ("/Users/arthur/ccltrunk/ccl/objc-bridge/bridge.lisp"/7  
ISO-8859-1) #xC57E17E> NIL) 212
  (F019A890) : 14 (%LOAD #P"/Users/arthur/ccltrunk/ccl/objc-bridge/ 
bridge.lisp" NIL NIL :ERROR :DEFAULT) 1956
  (F019A8C0) : 15 (LOAD #P"/Users/arthur/ccltrunk/ccl/objc-bridge/ 
bridge.lisp" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT- 
EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT) 648
  (F019A8E0) : 16 (MODULE-PROVIDE-SEARCH-PATH "BRIDGE") 156
  (F019A8F0) : 17 (SOME-XX-ONE 0 NIL #<COMPILED-LEXICAL-CLOSURE  
(:INTERNAL REQUIRE) #xC5785EE> (MODULE-PROVIDE-SEARCH-PATH MODULE- 
PROVIDE-ASDF)) 480
  (F019A900) : 18 (REQUIRE "BRIDGE" NIL) 532
  (F019A920) : 19 (CALL-CHECK-REGS REQUIRE "BRIDGE") 72
  (F019A940) : 20 (CHEAP-EVAL-IN-ENVIRONMENT (EVAL-WHEN (:COMPILE- 
TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (REQUIRE "BRIDGE")) #<LEXICAL- 
ENVIRONMENT #xC578D66>) 1780
  (F019A950) : 21 (FUNCALL #'#<(:INTERNAL WITH-COMPILATION-UNIT-BODY  
LOAD-FROM-STREAM)>) 520
  (F019A970) : 22 (CALL-WITH-COMPILATION-UNIT #<COMPILED-LEXICAL- 
CLOSURE (:INTERNAL WITH-COMPILATION-UNIT-BODY LOAD-FROM-STREAM)  
#x4E54B6> :OVERRIDE NIL) 64
  (F019A990) : 23 (LOAD-FROM-STREAM #<BASIC-FILE-CHARACTER-INPUT- 
STREAM ("/Users/arthur/ccltrunk/ccl/objc-bridge/objc-support.lisp"/6  
ISO-8859-1) #xC5792FE> NIL) 212
  (F019A9A0) : 24 (%LOAD #P"/Users/arthur/ccltrunk/ccl/objc-bridge/ 
objc-support.lisp" NIL NIL :ERROR :DEFAULT) 1956
  (F019A9D0) : 25 (LOAD #P"/Users/arthur/ccltrunk/ccl/objc-bridge/objc- 
support.lisp" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT- 
EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT) 648
  (F019A9F0) : 26 (MODULE-PROVIDE-SEARCH-PATH "OBJC-SUPPORT") 156
  (F019AA00) : 27 (SOME-XX-ONE 0 NIL #<COMPILED-LEXICAL-CLOSURE  
(:INTERNAL REQUIRE) #xC572EB6> (MODULE-PROVIDE-SEARCH-PATH MODULE- 
PROVIDE-ASDF)) 480
  (F019AA10) : 28 (REQUIRE "OBJC-SUPPORT" NIL) 532
  (F019AA30) : 29 (CALL-CHECK-REGS REQUIRE "OBJC-SUPPORT") 72
  (F019AA40) : 30 (FUNCALL #'#<(:INTERNAL WITH-COMPILATION-UNIT-BODY  
LOAD-FROM-STREAM)>) 520
  (F019AA60) : 31 (CALL-WITH-COMPILATION-UNIT #<COMPILED-LEXICAL- 
CLOSURE (:INTERNAL WITH-COMPILATION-UNIT-BODY LOAD-FROM-STREAM)  
#x4E5686> :OVERRIDE NIL) 64
  (F019AA80) : 32 (LOAD-FROM-STREAM #<BASIC-FILE-CHARACTER-INPUT- 
STREAM ("/Users/arthur/ccltrunk/ccl/cocoa-ide/defsystem.lisp"/5  
ISO-8859-1) #xC51FEF6> NIL) 212
  (F019AA90) : 33 (%LOAD #P"/Users/arthur/ccltrunk/ccl/cocoa-ide/ 
defsystem.lisp" NIL NIL :ERROR :DEFAULT) 1956
  (F019AAC0) : 34 (LOAD "ccl:cocoa-ide;defsystem.lisp" :VERBOSE  
NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT) 648
  (F019AAF0) : 35 (CALL-CHECK-REGS LOAD "ccl:cocoa- 
ide;defsystem.lisp") 72
  (F019AB00) : 36 (FUNCALL #'#<(:INTERNAL WITH-COMPILATION-UNIT-BODY  
LOAD-FROM-STREAM)>) 520
  (F019AB20) : 37 (CALL-WITH-COMPILATION-UNIT #<COMPILED-LEXICAL- 
CLOSURE (:INTERNAL WITH-COMPILATION-UNIT-BODY LOAD-FROM-STREAM)  
#x4E5856> :OVERRIDE NIL) 64
  (F019AB40) : 38 (LOAD-FROM-STREAM #<BASIC-FILE-CHARACTER-INPUT- 
STREAM ("/Users/arthur/ccltrunk/ccl/cocoa-ide/cocoa-application.lisp"/ 
4 ISO-8859-1) #xC523C0E> NIL) 212
  (F019AB50) : 39 (%LOAD #P"/Users/arthur/ccltrunk/ccl/cocoa-ide/cocoa- 
application.lisp" NIL NIL :ERROR :DEFAULT) 1956
  (F019AB80) : 40 (LOAD #P"/Users/arthur/ccltrunk/ccl/cocoa-ide/cocoa- 
application.lisp" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT- 
EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT) 648
  (F019ABA0) : 41 (MODULE-PROVIDE-SEARCH-PATH "COCOA-APPLICATION") 156
  (F019ABB0) : 42 (SOME-XX-ONE 0 NIL #<COMPILED-LEXICAL-CLOSURE  
(:INTERNAL REQUIRE) #xC519DCE> (MODULE-PROVIDE-SEARCH-PATH MODULE- 
PROVIDE-ASDF)) 480
  (F019ABC0) : 43 (REQUIRE "COCOA-APPLICATION" NIL) 532
  (F019ABE0) : 44 (CALL-CHECK-REGS REQUIRE "COCOA-APPLICATION") 72
  (F019AC00) : 45 (TOPLEVEL-EVAL (REQUIRE "COCOA-APPLICATION") NIL) 476
  (F019AC30) : 46 (READ-LOOP :INPUT-STREAM #<SYNONYM-STREAM to  
*TERMINAL-IO* #xC519186> :OUTPUT-STREAM #<SYNONYM-STREAM to *TERMINAL- 
IO* #xC519116> :BREAK-LEVEL 0 :PROMPT-FUNCTION #<Compiled-function  
(:INTERNAL READ-LOOP) (Non-Global)  #xC17C54E>) 1240
  (F019AC70) : 47 (TOPLEVEL-LOOP) 72
  (F019AC90) : 48 (FUNCALL #'#<(:INTERNAL (TOPLEVEL-FUNCTION (LISP- 
DEVELOPMENT-SYSTEM T)))>) 72
  (F019ACB0) : 49 (FUNCALL #'#<(:INTERNAL MAKE-MCL-LISTENER-PROCESS)>)  
392
  (F019ACE0) : 50 (RUN-PROCESS-INITIAL-FORM #<TTY-LISTENER listener(1)  
[Active] #xC518876> (#<COMPILED-LEXICAL-CLOSURE # #xC518656>)) 400
  (F019AD20) : 51 (FUNCALL #'#<(:INTERNAL (%PROCESS-PRESET-INTERNAL  
(PROCESS)))> #<TTY-LISTENER listener(1) [Active] #xC518876>  
(#<COMPILED-LEXICAL-CLOSURE # #xC518656>)) 164
  (F019AD40) : 52 (FUNCALL #'#<(:INTERNAL THREAD-MAKE-STARTUP- 
FUNCTION)>) 176
1 >