[Openmcl-devel] Build Error with CVS from today

[Brent Fulgham]

I updated from CVS today, and got the following error when executing:

32-bit PPC:
? (ccl::rebuild-ccl :full t)
;Building lisp-kernel ...

[ ... ]

;Compiling "/opt/local/share/openmcl/1.1/lib/defstruct-lds.lisp"...
;Loading #P"/opt/local/share/openmcl/1.1/bin/defstruct-lds.dfsl"...
;Compiling "/opt/local/share/openmcl/1.1/lib/foreign-types.lisp"...
 > Error: Array index 12 out of bounds for #S(FOREIGN-TYPE- 
DATA :TRANSLATORS #<HASH-TABLE :TEST EQ size 16/60 #x8402FF6> :KIND- 
INFO #<HASH-TABLE :TEST EQ size 25/60 #x8402D16> :DEFINITIONS #<HASH- 
TABLE :TEST EQ size 25/60 #x8402A36> :STRUCT-DEFINITIONS #<HASH- 
TABLE :TEST EQ size 3/60 #x8402756> :UNION-DEFINITIONS #<HASH- 
TABLE :TEST EQ size 0/60 #x8402476> :ENUM-DEFINITIONS #<HASH- 
TABLE :TEST EQ size 0/60 #x8402196> :INTERFACE-DB-DIRECTORY  
"ccl:darwin-headers;" :INTERFACE-PACKAGE-NAME "DARWIN32" :EXTERNAL- 
FUNCTION-DEFINITIONS #<HASH-TABLE :TEST EQ size 1/60  
#x8401EB6> :DIRLIST #<DLL-HEADER  #x8401EA6> :ATTRIBUTES (:BITS-PER- 
WORD 32 :SIGNED-CHAR T :STRUCT-BY-VALUE T :PREPEND-UNDERSCORES T)) .
 > While executing: FF-CALL, in process listener(1).
 > Type :POP to abort, :R for a list of available restarts.
 > Type :? for other options.
1 > (quit)

64-bit PPC:
? (ccl::rebuild-ccl :full t)
;Building lisp-kernel ...

[ ... ]

;Loading #P"/opt/local/share/openmcl/1.1/bin/ppc-lap.d64fsl"...
;Compiling "/opt/local/share/openmcl/1.1/compiler/PPC/ppc- 
backend.lisp"...
;Loading #P"/opt/local/share/openmcl/1.1/bin/ppc-backend.d64fsl"...
;Compiling "/opt/local/share/openmcl/1.1/compiler/PPC/PPC64/ppc64- 
backend.lisp"...
;Loading #P"/opt/local/share/openmcl/1.1/bin/ppc64-backend.d64fsl"...
;Compiling "/opt/local/share/openmcl/1.1/compiler/PPC/PPC64/ppc64- 
vinsns.lisp"...
 > Error: subprim named .SPPOWEROPEN-FFCALL-RETURN-REGISTERS not found.
 > While executing: %SUBPRIM-NAME->OFFSET, in process listener(1).
 > Type :POP to abort, :R for a list of available restarts.
 > Type :? for other options.
1 >