On May 20, 2008, at 3:09 PM, Jean-Philippe Barette-LaPierre wrote:
Have you cleaned the previous compiled fasl?
I get a similar error relating to OBJC-CFFI:OBJC-SEL being an unknown CFFI type with no previous fasls.
Which version of CFFI are you using?
0.9.2 from asdf-install
Here is the whole session including the full backtrace with no existing fasls for either cl-objc or cffi:
CL-USER> (asdf:oos 'asdf:load-op :cl-objc) ; loading system definition from /Users/raffaelc/.sbcl/systems/cl- objc.asd ; into #<PACKAGE "ASDF0"> ; registering #<SYSTEM CL-OBJC {11C42C99}> as CL-OBJC ; registering #<SYSTEM CL-OBJC.EXAMPLES.HELLO-WORLD {11D59C21}> as ; CL-OBJC.EXAMPLES.HELLO-WORLD ; registering #<SYSTEM CL-OBJC.EXAMPLES.CONVERTER {11F12181}> as ; CL-OBJC.EXAMPLES.CONVERTER ; registering #<SYSTEM CL-OBJC.EXAMPLES.CIRCLE-VIEW {120CD451}> as ; CL-OBJC.EXAMPLES.CIRCLE-VIEW ; registering #<SYSTEM CL-OBJC.DOC {122C82D1}> as CL-OBJC.DOC ; registering #<SYSTEM CL-OBJC.TEST {11D1EE91}> as CL-OBJC.TEST ; loading system definition from /Users/raffaelc/.sbcl/systems/ memoize.asd ; into #<PACKAGE "ASDF0"> ; registering #<SYSTEM MEMOIZE {11F18B01}> as MEMOIZE ; loading system definition from ; /Users/raffaelc/.sbcl/systems/closer-mop.asd into #<PACKAGE "ASDF0"> ; registering #<SYSTEM #:CLOSER-MOP {120409A1}> as CLOSER-MOP ; loading system definition from ; /Users/raffaelc/.sbcl/systems/lw-compat.asd into #<PACKAGE "ASDF0"> ; registering #<SYSTEM #:LW-COMPAT {1216AC51}> as LW-COMPAT ; loading system definition from /Users/raffaelc/.sbcl/systems/yacc.asd ; into #<PACKAGE "ASDF0"> ; registering #<SYSTEM #:YACC {122C39E1}> as YACC ; loading system definition from /Users/raffaelc/.sbcl/systems/cffi.asd ; into #<PACKAGE "ASDF0"> ; registering #<SYSTEM CFFI {12414431}> as CFFI ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/ utils.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (IN-PACKAGE #:CL-USER) ; compiling (DEFPACKAGE #:CFFI-UTILS ...) ; compiling (IN-PACKAGE #:CFFI-UTILS) ; compiling (DEFMACRO POST-INCF ...) ; compiling (DEFUN MKLIST ...) ; compiling (DEFMACRO DISCARD-DOCSTRING ...) ; compiling (DEFUN PARSE-BODY ...) ; compiling (DEFMACRO LET-WHEN ...) ; compiling (DEFMACRO BIF ...) ; compiling (DEFUN STARTS-WITH ...) ; compiling (DEFUN SIDE-EFFECT-FREE? ...) ; compiling (DEFMACRO ONCE-ONLY ...) ; compiling (DEFMACRO WITH-UNIQUE-NAMES ...) ; compiling (DEFUN MAKE-GENSYM-LIST ...) ; compiling (DEFUN SYMBOLICATE ...) ; compiling (DEFUN SINGLE-BIT-P ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/utils.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/ features.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (IN-PACKAGE #:CL-USER) ; compiling (PUSHNEW :CFFI ...) ; compiling (DEFPACKAGE #:CFFI-FEATURES ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/features.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/cffi- sbcl.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (DEFPACKAGE #:CFFI-SYS ...) ; compiling (IN-PACKAGE #:CFFI-SYS) ; compiling (MAPC (LAMBDA # ...) ...) ; compiling (DEFUN CANONICALIZE-SYMBOL-NAME-CASE ...) ; compiling (DEFUN POINTERP ...) ; compiling (DEFUN POINTER-EQ ...) ; compiling (DEFUN NULL-POINTER ...) ; compiling (DEFUN NULL-POINTER-P ...) ; compiling (DEFUN INC-POINTER ...) ; compiling (DEFUN MAKE-POINTER ...) ; compiling (DEFUN POINTER-ADDRESS ...) ; compiling (DEFUN %FOREIGN-ALLOC ...) ; compiling (DEFUN FOREIGN-FREE ...) ; compiling (DEFMACRO WITH-FOREIGN-POINTER ...) ; compiling (DEFUN MAKE-SHAREABLE-BYTE-VECTOR ...) ; compiling (DEFMACRO WITH-POINTER-TO-VECTOR-DATA ...) ; compiling (DEFMACRO DEFINE-MEM-ACCESSORS ...) ; compiling (DEFINE-MEM-ACCESSORS (:CHAR SB-SYS:SIGNED-SAP-REF-8) ...) ; compiling (DEFUN CONVERT-FOREIGN-TYPE ...) ; compiling (DEFUN %FOREIGN-TYPE-SIZE ...) ; compiling (DEFUN %FOREIGN-TYPE-ALIGNMENT ...) ; compiling (DEFUN FOREIGN-FUNCALL-TYPE-AND-ARGS ...) ; compiling (DEFMACRO %%FOREIGN-FUNCALL ...) ; compiling (DEFMACRO %FOREIGN-FUNCALL ...) ; compiling (DEFMACRO %FOREIGN-FUNCALL-POINTER ...) ; compiling (DEFVAR *CALLBACKS* ...) ; compiling (DEFMACRO %DEFCALLBACK ...) ; compiling (DEFUN %CALLBACK ...) ; compiling (DEFUN %LOAD-FOREIGN-LIBRARY ...) ; compiling (DEFUN %CLOSE-FOREIGN-LIBRARY ...) ; compiling (DEFUN FOREIGN-SYMBOL-POINTER ...) ; compiling (DEFUN FINALIZE ...) ; compiling (DEFUN CANCEL-FINALIZATION ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/cffi-sbcl.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/ package.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (IN-PACKAGE #:CL-USER) ; compiling (DEFPACKAGE #:CFFI ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/package.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/ libraries.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (IN-PACKAGE #:CFFI) ; compiling (DEFVAR *FOREIGN-LIBRARY-DIRECTORIES* ...) ; compiling (DEFVAR *DARWIN-FRAMEWORK-DIRECTORIES* ...) ; compiling (DEFUN MINI-EVAL ...) ; compiling (DEFUN FIND-FILE ...) ; compiling (DEFUN FIND-DARWIN-FRAMEWORK ...) ; compiling (DEFVAR *FOREIGN-LIBRARIES* ...) ; compiling (DEFUN GET-FOREIGN-LIBRARY ...) ; compiling (DEFUN (SETF GET-FOREIGN-LIBRARY) ...) ; compiling (DEFMACRO DEFINE-FOREIGN-LIBRARY ...) ; compiling (DEFUN CFFI-FEATURE-P ...) ; compiling (DEFINE-CONDITION LOAD-FOREIGN-LIBRARY-ERROR ...) ; compiling (DEFUN READ-NEW-VALUE ...) ; compiling (DEFUN HANDLE-LOAD-FOREIGN-LIBRARY-ERROR ...) ; compiling (DEFUN LOAD-DARWIN-FRAMEWORK ...) ; compiling (DEFUN LOAD-FOREIGN-LIBRARY-NAME ...) ; compiling (DEFUN TRY-FOREIGN-LIBRARY-ALTERNATIVES ...) ; compiling (DEFPARAMETER *CFFI-FEATURE-SUFFIX-MAP* ...) ; compiling (DEFUN DEFAULT-LIBRARY-SUFFIX ...) ; compiling (DEFUN LOAD-FOREIGN-LIBRARY ...) ; compiling (DEFMACRO USE-FOREIGN-LIBRARY ...) ; compiling (DEFUN CLOSE-FOREIGN-LIBRARY ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/libraries.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/early- types.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (IN-PACKAGE #:CFFI) ; compiling (DEFVAR *FOREIGN-TYPES* ...) ; compiling (DEFUN FIND-TYPE ...) ; compiling (DEFUN FIND-TYPE-OR-LOSE ...) ; compiling (DEFUN NOTICE-FOREIGN-TYPE ...) ; compiling (DEFVAR *TYPE-PARSERS* ...) ; compiling (DEFUN FIND-TYPE-PARSER ...) ; compiling (DEFUN (SETF FIND-TYPE-PARSER) ...) ; compiling (DEFMACRO DEFINE-TYPE-SPEC-PARSER ...) ; compiling (DEFUN PARSE-TYPE ...) ; compiling (DEFGENERIC CANONICALIZE ...) ; compiling (DEFGENERIC AGGREGATEP ...) ; compiling (DEFGENERIC FOREIGN-TYPE-ALIGNMENT ...) ; compiling (DEFGENERIC FOREIGN-TYPE-SIZE ...) ; compiling (DEFGENERIC UNPARSE ...) ; compiling (DEFGENERIC TRANSLATE-P ...) ; compiling (DEFCLASS FOREIGN-TYPE ...) ; compiling (DEFMETHOD PRINT-OBJECT ...) ; compiling (DEFMETHOD MAKE-LOAD-FORM ...) ; compiling (DEFUN CANONICALIZE-FOREIGN-TYPE ...) ; compiling (DEFMETHOD UNPARSE ...) ; compiling (DEFUN UNPARSE-TYPE ...) ; compiling (DEFMETHOD FOREIGN-TYPE-SIZE ...) ; compiling (DEFMETHOD TRANSLATE-P ...) ; compiling (DEFCLASS FOREIGN-BUILT-IN-TYPE ...) ; compiling (DEFMETHOD CANONICALIZE ...) ; compiling (DEFMETHOD AGGREGATEP ...) ; compiling (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...) ; compiling (DEFMETHOD FOREIGN-TYPE-SIZE ...) ; compiling (DEFMETHOD TRANSLATE-P ...) ; compiling (DEFMACRO DEFINE-BUILT-IN-FOREIGN-TYPE ...) ; compiling (DEFCLASS FOREIGN-POINTER-TYPE ...) ; compiling (DEFMETHOD CANONICALIZE ...) ; compiling (DEFMETHOD AGGREGATEP ...) ; compiling (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...) ; compiling (DEFMETHOD FOREIGN-TYPE-SIZE ...) ; compiling (DEFMETHOD TRANSLATE-P ...) ; compiling (DEFMETHOD UNPARSE ...) ; compiling (DEFMETHOD PRINT-OBJECT ...) ; compiling (DEFCLASS FOREIGN-TYPE-ALIAS ...) ; compiling (DEFMETHOD CANONICALIZE ...) ; compiling (DEFMETHOD AGGREGATEP ...) ; compiling (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...) ; compiling (DEFMETHOD FOREIGN-TYPE-SIZE ...) ; compiling (DEFCLASS FOREIGN-TYPEDEF ...) ; compiling (DEFUN FOLLOW-TYPEDEFS ...) ; compiling (DEFCLASS FOREIGN-STRUCT-TYPE ...) ; compiling (DEFMETHOD CANONICALIZE ...) ; compiling (DEFMETHOD AGGREGATEP ...) ; compiling (DEFMETHOD FOREIGN-TYPE-SIZE ...) ; compiling (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...) ; compiling (DEFGENERIC TRANSLATE-TYPE-TO-FOREIGN ...) ; compiling (DEFGENERIC TRANSLATE-TYPE-FROM-FOREIGN ...) ; compiling (DEFGENERIC FREE-TYPE-TRANSLATED-OBJECT ...) ; compiling (DEFGENERIC TRANSLATE-TO-FOREIGN ...) ; compiling (DEFGENERIC TRANSLATE-FROM-FOREIGN ...) ; compiling (DEFGENERIC FREE-TRANSLATED-OBJECT ...) ; compiling (DEFMETHOD TRANSLATE-TYPE-TO-FOREIGN ...) ; compiling (DEFMETHOD TRANSLATE-TYPE-FROM-FOREIGN ...) ; compiling (DEFMETHOD FREE-TYPE-TRANSLATED-OBJECT ...) ; compiling (DEFUN %EXPAND-TYPE-TO-FOREIGN-DYN ...) ; compiling (DEFUN %EXPAND-TYPE-TO-FOREIGN ...) ; compiling (DEFUN %EXPAND-TYPE-FROM-FOREIGN ...) ; compiling (DEFVAR *RUNTIME-TRANSLATOR-FORM*) ; compiling (DEFUN SPECIALIZEDP ...) ; compiling (DEFGENERIC EXPAND-TYPE-TO-FOREIGN-DYN ...) ; compiling (DEFGENERIC EXPAND-TYPE-TO-FOREIGN ...) ; compiling (DEFGENERIC EXPAND-TYPE-FROM-FOREIGN ...) ; compiling (DEFGENERIC EXPAND-TO-FOREIGN-DYN ...) ; compiling (DEFGENERIC EXPAND-TO-FOREIGN ...) ; compiling (DEFGENERIC EXPAND-FROM-FOREIGN ...) ; compiling (DEFMETHOD EXPAND-TYPE-TO-FOREIGN-DYN ...) ; compiling (DEFMETHOD EXPAND-TYPE-TO-FOREIGN ...) ; compiling (DEFMETHOD EXPAND-TYPE-FROM-FOREIGN ...) ; compiling (DEFUN CONVERT-TO-FOREIGN ...) ; compiling (DEFINE-COMPILER-MACRO CONVERT-TO-FOREIGN ...) ; compiling (DEFUN CONVERT-FROM-FOREIGN ...) ; compiling (DEFINE-COMPILER-MACRO CONVERT-FROM-FOREIGN ...) ; compiling (DEFUN FREE-CONVERTED-OBJECT ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/early-types.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/ types.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (IN-PACKAGE #:CFFI) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :CHAR) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-CHAR) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :SHORT) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-SHORT) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :INT) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-INT) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :LONG) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-LONG) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :FLOAT) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :DOUBLE) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :VOID) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :LONG-LONG) ; compiling (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-LONG-LONG) ; compiling (DEFINE-TYPE-SPEC-PARSER :POINTER ...) ; compiling (DEFINE-MODIFY-MACRO INCF-POINTER ...) ; compiling (DEFUN MEM-REF ...) ; compiling (DEFINE-COMPILER-MACRO MEM-REF ...) ; compiling (DEFUN MEM-SET ...) ; compiling (DEFINE-SETF-EXPANDER MEM-REF ...) ; compiling (DEFINE-COMPILER-MACRO MEM-SET ...) ; compiling (DEFUN MEM-AREF ...) ; compiling (DEFINE-COMPILER-MACRO MEM-AREF ...) ; compiling (DEFINE-SETF-EXPANDER MEM-AREF ...) ; compiling (DEFGENERIC FOREIGN-STRUCT-SLOT-POINTER ...) ; compiling (DEFGENERIC FOREIGN-STRUCT-SLOT-POINTER-FORM ...) ; compiling (DEFGENERIC FOREIGN-STRUCT-SLOT-VALUE ...) ; compiling (DEFGENERIC (SETF FOREIGN-STRUCT-SLOT-VALUE) ...) ; compiling (DEFGENERIC FOREIGN-STRUCT-SLOT-VALUE-FORM ...) ; compiling (DEFGENERIC FOREIGN-STRUCT-SLOT-SET-FORM ...) ; compiling (DEFCLASS FOREIGN-STRUCT-SLOT ...) ; compiling (DEFMETHOD FOREIGN-STRUCT-SLOT-POINTER ...) ; compiling (DEFMETHOD FOREIGN-STRUCT-SLOT-POINTER-FORM ...) ; compiling (DEFUN FOREIGN-SLOT-NAMES ...) ; compiling (DEFCLASS SIMPLE-STRUCT-SLOT ...) ; compiling (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE ...) ; compiling (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE-FORM ...) ; compiling (DEFMETHOD (SETF FOREIGN-STRUCT-SLOT-VALUE) ...) ; compiling (DEFMETHOD FOREIGN-STRUCT-SLOT-SET-FORM ...) ; compiling (DEFCLASS AGGREGATE-STRUCT-SLOT ...) ; compiling (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE ...) ; compiling (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE-FORM ...) ; compiling (DEFMETHOD (SETF FOREIGN-STRUCT-SLOT-VALUE) ...) ; compiling (DEFMETHOD FOREIGN-STRUCT-SLOT-SET-FORM ...) ; compiling (DEFUN MAKE-STRUCT-SLOT ...) ; compiling (DEFUN GET-ALIGNMENT ...) ; compiling (DEFUN ADJUST-FOR-ALIGNMENT ...) ; compiling (DEFUN NOTICE-FOREIGN-STRUCT-DEFINITION ...) ; compiling (DEFMACRO DEFCSTRUCT ...) ; compiling (DEFUN GET-SLOT-INFO ...) ; compiling (DEFUN FOREIGN-SLOT-POINTER ...) ; compiling (DEFUN FOREIGN-SLOT-OFFSET ...) ; compiling (DEFUN FOREIGN-SLOT-VALUE ...) ; compiling (DEFINE-COMPILER-MACRO FOREIGN-SLOT-VALUE ...) ; compiling (DEFINE-SETF-EXPANDER FOREIGN-SLOT-VALUE ...) ; compiling (DEFUN FOREIGN-SLOT-SET ...) ; compiling (DEFINE-COMPILER-MACRO FOREIGN-SLOT-SET ...) ; compiling (DEFMACRO WITH-FOREIGN-SLOTS ...) ; compiling (DEFUN NOTICE-FOREIGN-UNION-DEFINITION ...) ; compiling (DEFMACRO DEFCUNION ...) ; compiling (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...) ; compiling (DEFUN FOREIGN-ALLOC ...) ; compiling (DEFMACRO WITH-FOREIGN-OBJECT ...) ; compiling (DEFMACRO WITH-FOREIGN-OBJECTS ...) ; compiling (DEFMACRO DEFINE-FOREIGN-TYPE ...) ; compiling (DEFMACRO DEFCTYPE ...) ; compiling (DEFCLASS FOREIGN-TYPE-WRAPPER ...) ; compiling (DEFINE-TYPE-SPEC-PARSER :WRAPPER ...) ; compiling (DEFMETHOD UNPARSE ...) ; compiling (DEFMETHOD TRANSLATE-TYPE-TO-FOREIGN ...) ; compiling (DEFMETHOD TRANSLATE-TYPE-FROM-FOREIGN ...) ; compiling (DEFINE-FOREIGN-TYPE :BOOLEAN ...) ; compiling (DEFMETHOD UNPARSE ...) ; compiling (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; compiling (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; compiling (DEFMETHOD EXPAND-TO-FOREIGN ...) ; compiling (DEFMETHOD EXPAND-FROM-FOREIGN ...) ; compiling (DEFCTYPE :UCHAR ...) ; compiling (DEFCTYPE :USHORT ...) ; compiling (DEFCTYPE :UINT ...) ; compiling (DEFCTYPE :ULONG ...) ; compiling (DEFCTYPE :LLONG ...) ; compiling (DEFCTYPE :ULLONG ...) ; compiling (LABELS (# # ...) ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/types.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/ enum.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (IN-PACKAGE #:CFFI) ; compiling (DEFCLASS FOREIGN-ENUM ...) ; compiling (DEFUN MAKE-FOREIGN-ENUM ...) ; compiling (DEFMACRO DEFCENUM ...) ; compiling (DEFUN %FOREIGN-ENUM-VALUE ...) ; compiling (DEFUN FOREIGN-ENUM-VALUE ...) ; compiling (DEFUN %FOREIGN-ENUM-KEYWORD ...) ; compiling (DEFUN FOREIGN-ENUM-KEYWORD ...) ; compiling (DEFMETHOD TRANSLATE-TYPE-TO-FOREIGN ...) ; compiling (DEFMETHOD TRANSLATE-TYPE-FROM-FOREIGN ...) ; compiling (DEFCLASS FOREIGN-BITFIELD ...) ; compiling (DEFUN MAKE-FOREIGN-BITFIELD ...) ; compiling (DEFMACRO DEFBITFIELD ...) ; compiling (DEFUN %FOREIGN-BITFIELD-VALUE ...) ; compiling (DEFUN FOREIGN-BITFIELD-VALUE ...) ; compiling (DEFUN %FOREIGN-BITFIELD-SYMBOLS ...) ; compiling (DEFUN FOREIGN-BITFIELD-SYMBOLS ...) ; compiling (DEFMETHOD TRANSLATE-TYPE-TO-FOREIGN ...) ; compiling (DEFMETHOD TRANSLATE-TYPE-FROM-FOREIGN ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/enum.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/ strings.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (IN-PACKAGE #:CFFI) ; compiling (DEFUN LISP-STRING-TO-FOREIGN ...) ; compiling (DEFUN FOREIGN-STRING-TO-LISP ...) ; compiling (DEFUN FOREIGN-STRING-ALLOC ...) ; compiling (DEFUN FOREIGN-STRING-FREE ...) ; compiling (DEFMACRO WITH-FOREIGN-STRING ...) ; compiling (DEFMACRO WITH-FOREIGN-POINTER-AS-STRING ...) ; compiling (DEFCTYPE :STRING ...) ; compiling (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; compiling (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; compiling (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; compiling (DEFMETHOD FREE-TRANSLATED-OBJECT ...) ; compiling (DEFCTYPE :STRING+PTR ...) ; compiling (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; compiling (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; compiling (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; compiling (DEFMETHOD FREE-TRANSLATED-OBJECT ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/strings.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/ functions.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (IN-PACKAGE #:CFFI) ; compiling (DEFUN TRANSLATE-OBJECTS ...) ; compiling (DEFUN PARSE-ARGS-AND-TYPES ...) ; compiling (DEFMACRO FOREIGN-FUNCALL ...) ; compiling (DEFUN PROMOTE-VARARGS-TYPE ...) ; compiling (DEFMACRO FOREIGN-FUNCALL-VARARGS ...) ; compiling (DEFUN LISP-FUNCTION-NAME ...) ; compiling (DEFUN FOREIGN-FUNCTION-NAME ...) ; compiling (UNLESS (FBOUNDP #) ...) ; compiling (DEFUN %DEFCFUN ...) ; compiling (DEFUN %DEFCFUN-VARARGS ...) ; compiling (DEFMACRO DEFCFUN ...) ; compiling (DEFUN INVERSE-TRANSLATE-OBJECTS ...) ; compiling (DEFMACRO DEFCALLBACK ...) ; compiling (DECLAIM (INLINE GET-CALLBACK)) ; compiling (DEFUN GET-CALLBACK ...) ; compiling (DEFMACRO CALLBACK ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/functions.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cffi_0.9.2/src/foreign- vars.lisp" (written 08 SEP 2006 04:56:43 PM): ; compiling (IN-PACKAGE #:CFFI) ; compiling (DEFUN LISP-VAR-NAME ...) ; compiling (DEFUN FOREIGN-VAR-NAME ...) ; compiling (DEFUN GET-VAR-POINTER ...) ; compiling (DEFUN FOREIGN-SYMBOL-POINTER-OR-LOSE ...) ; compiling (DEFMACRO DEFCVAR ...)
; /Users/raffaelc/.sbcl/site/cffi_0.9.2/src/foreign-vars.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cl-objc-leopard/src/ packages.lisp" (written 20 MAY 2008 01:50:24 PM): ; compiling (IN-PACKAGE "CL-USER") ; compiling (DEFPACKAGE "CL-OBJC-UTILS" ...) ; compiling (DEFPACKAGE "OBJC-CFFI" ...) ; compiling (DEFPACKAGE "CL-OBJC" ...) ; compiling (DEFPACKAGE "OBJC-CLOS" ...) ; compiling (DEFPACKAGE "OBJC" ...) ; compiling (DEFPACKAGE "OBJC-TYPES" ...) ; compiling (DEFPACKAGE "OBJC-READER" ...) ; compiling (DEFPACKAGE "CL-OBJC-EXAMPLES" ...) ; compiling (DEFPACKAGE "CL-OBJC-USER" ...)
; /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/packages.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cl-objc-leopard/src/objc- types.lisp" (written 20 MAY 2008 01:50:24 PM): ; compiling (IN-PACKAGE "OBJC-TYPES") ; compiling (DEFVAR TYPEMAP ...) ; compiling (DEFUN CHAR-TO-TYPE ...) ; compiling (DEFVAR METHOD-CODE-MAP ...) ; compiling (DEFUN CHAR-TO-METHODCODE ...) ; compiling (DEFUN LEX-TYPESTR ...) ; compiling (DEFUN TYPESTR-LEXER ...) ; compiling (DEFUN READ-NUM ...) ; compiling (DEFUN READ-TYPE-NAME ...) ; compiling (DEFINE-PARSER *OBJC-TYPE-PARSER* ...) ; compiling (DEFUN PARSE-OBJC-TYPESTR ...) ; compiling (DEFUN OBJC-FOREIGN-TYPE-SIZE ...) ; compiling (DEFUN ENCODE-TYPES ...) ; compiling (DEFUN LOOKUP-TYPE-CHAR ...) ; compiling (DEFUN LOOKUP-METHOD-CHAR ...) ; compiling (DEFUN ENCODE-TYPE ...)
; /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/objc-types.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cl-objc-leopard/src/ utils.lisp" (written 20 MAY 2008 01:50:24 PM): ; compiling (IN-PACKAGE "CL-OBJC-UTILS") ; compiling (DEFMACRO WITH-GENSYMS ...) ; compiling (DEFUN INTERPOSE ...) ; compiling (DEFUN CFFI-TYPE-P ...) ; compiling (DEFUN SPLIT-STRING ...) ; compiling (DEFUN SIMPLE-REPLACE-STRING ...) ; compiling (DEFUN ENSURE-LIST ...) ; compiling (DEFUN LOOKUP-SAME-SYMBOL-NAME ...) ; compiling (DEFMACRO COMPOSITE-MAPCAR ...) ; compiling (DEFUN GENSYM-LIST ...)
; /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/utils.fasl written ; compilation finished in 0:00:00 ; compiling file "/Users/raffaelc/.sbcl/site/cl-objc-leopard/src/ cffi.lisp" (written 20 MAY 2008 01:50:24 PM): ; compiling (IN-PACKAGE "OBJC-CFFI") ; compiling (PUSHNEW #P"/usr/lib/" ...) ; compiling (DEFINE-FOREIGN-LIBRARY LIBOBJC ...) ; compiling (USE-FOREIGN-LIBRARY LIBOBJC) ; compiling (DEFCLASS OBJC-SELECTOR ...) ; compiling (DEFMETHOD PRINT-OBJECT ...) ; compiling (DEFMETHOD DESCRIBE-OBJECT ...) ; compiling (DEFINE-FOREIGN-TYPE OBJC-SELECTOR-TYPE ...) ; compiling (DEFCFUN ("sel_isMapped" SEL-IS-MAPPED) ...)
; file: /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/cffi.lisp ; in: DEFCFUN ("sel_isMapped" SEL-IS-MAPPED) ; (CFFI:DEFCFUN ("sel_isMapped" OBJC-CFFI:SEL-IS-MAPPED) :BOOLEAN ; "Returns true if a selector is registered in the ObjC runtime." ; (OBJC-CFFI::SEL OBJC-CFFI:OBJC-SEL)) ; ; caught ERROR: ; (during macroexpansion of (DEFCFUN ("sel_isMapped" SEL-IS- MAPPED) ...)) ; Unknown CFFI type: OBJC-SEL.
; compiling (DEFCFUN ("sel_getName" SEL-GET-NAME) ...)
; file: /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/cffi.lisp ; in: DEFCFUN ("sel_getName" SEL-GET-NAME) ; (CFFI:DEFCFUN ("sel_getName" OBJC-CFFI::SEL-GET-NAME) :STRING ; (OBJC-CFFI::SEL OBJC-CFFI:OBJC-SEL)) ; ; caught ERROR: ; (during macroexpansion of (DEFCFUN ("sel_getName" SEL-GET- NAME) ...)) ; Unknown CFFI type: OBJC-SEL.
; compiling (DEFCFUN ("sel_registerName" SEL-REGISTER-NAME) ...)
; file: /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/cffi.lisp ; in: DEFCFUN ("sel_registerName" SEL-REGISTER-NAME) ; (CFFI:DEFCFUN ("sel_registerName" OBJC-CFFI::SEL-REGISTER-NAME) ; OBJC-CFFI:OBJC-SEL (OBJC-CFFI::STR :STRING)) ; ; caught ERROR: ; (during macroexpansion of (DEFCFUN ("sel_registerName" SEL- REGISTER-NAME) ...)) ; Unknown CFFI type: OBJC-SEL.
; compiling (DEFCFUN ("sel_getUid" SEL-GET-UID) ...)
; file: /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/cffi.lisp ; in: DEFCFUN ("sel_getUid" SEL-GET-UID) ; (CFFI:DEFCFUN ("sel_getUid" OBJC-CFFI:SEL-GET-UID) OBJC- CFFI:OBJC-SEL ; "Returns the selector named NAME." (OBJC- CFFI::STR :STRING)) ; ; caught ERROR: ; (during macroexpansion of (DEFCFUN ("sel_getUid" SEL-GET-UID) ...)) ; Unknown CFFI type: OBJC-SEL.
; compiling (DEFMETHOD TRANSLATE-FROM-FOREIGN ...)
; file: /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/cffi.lisp ; in: DEFMETHOD TRANSLATE-FROM-FOREIGN (T OBJC-SELECTOR-TYPE) ; (DEFMETHOD CFFI:TRANSLATE-FROM-FOREIGN ; (OBJC-CFFI::UID (TYPE OBJC-CFFI::OBJC-SELECTOR-TYPE)) ; (MAKE-INSTANCE 'OBJC-CFFI:OBJC-SELECTOR :NAME ; (OBJC-CFFI::SEL-GET-NAME OBJC- CFFI::UID) :UID ; OBJC-CFFI::UID)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-PCL::%DEFMETHOD-EXPANDER CFFI:TRANSLATE-FROM-FOREIGN NIL ; (OBJC-CFFI::UID ; (TYPE OBJC-CFFI::OBJC-SELECTOR-TYPE)) ; ((MAKE-INSTANCE 'OBJC-CFFI:OBJC- SELECTOR :NAME ; (OBJC-CFFI::SEL-GET- NAME ; OBJC-CFFI::UID) ; :UID OBJC-CFFI::UID))) ; ; caught STYLE-WARNING: ; can't find type for specializer OBJC-SELECTOR-TYPE in ; SB-PCL::PARAMETER-SPECIALIZER-DECLARATION-IN-DEFMETHOD.
; compiling (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; file: /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/cffi.lisp ; in: DEFMETHOD TRANSLATE-TO-FOREIGN (OBJC-SELECTOR OBJC-SELECTOR-TYPE) ; (DEFMETHOD CFFI:TRANSLATE-TO-FOREIGN ; ((OBJC-CFFI::SEL OBJC-CFFI:OBJC-SELECTOR) ; (TYPE OBJC-CFFI::OBJC-SELECTOR-TYPE)) ; (SLOT-VALUE OBJC-CFFI::SEL 'OBJC-CFFI::UID)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-PCL::%DEFMETHOD-EXPANDER CFFI:TRANSLATE-TO-FOREIGN NIL ; ((OBJC-CFFI::SEL OBJC-CFFI:OBJC- SELECTOR) ; (TYPE OBJC-CFFI::OBJC-SELECTOR-TYPE)) ; ((SLOT-VALUE OBJC-CFFI::SEL 'OBJC- CFFI::UID))) ; ; caught STYLE-WARNING: ; can't find type for specializer OBJC-SELECTOR-TYPE in ; SB-PCL::PARAMETER-SPECIALIZER-DECLARATION-IN-DEFMETHOD.
; compiling (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; file: /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/cffi.lisp ; in: DEFMETHOD TRANSLATE-TO-FOREIGN (STRING OBJC-SELECTOR-TYPE) ; (DEFMETHOD CFFI:TRANSLATE-TO-FOREIGN ; ((OBJC-CFFI::NAME STRING) (TYPE OBJC-CFFI::OBJC- SELECTOR-TYPE)) ; (SLOT-VALUE (OBJC-CFFI::SEL-REGISTER-NAME OBJC- CFFI::NAME) ; 'OBJC-CFFI::UID)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-PCL::%DEFMETHOD-EXPANDER CFFI:TRANSLATE-TO-FOREIGN NIL ; ((OBJC-CFFI::NAME STRING) ; (TYPE OBJC-CFFI::OBJC-SELECTOR-TYPE)) ; ((SLOT-VALUE ; (OBJC-CFFI::SEL-REGISTER-NAME OBJC- CFFI::NAME) ; 'OBJC-CFFI::UID))) ; ; caught STYLE-WARNING: ; can't find type for specializer OBJC-SELECTOR-TYPE in ; SB-PCL::PARAMETER-SPECIALIZER-DECLARATION-IN-DEFMETHOD.
; compiling (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; file: /Users/raffaelc/.sbcl/site/cl-objc-leopard/src/cffi.lisp ; in: DEFMETHOD TRANSLATE-TO-FOREIGN (T OBJC-SELECTOR-TYPE) ; (DEFMETHOD CFFI:TRANSLATE-TO-FOREIGN ; (OBJC-CFFI::SEL (TYPE OBJC-CFFI::OBJC-SELECTOR-TYPE)) ; OBJC-CFFI::SEL) ; --> PROGN EVAL-WHEN ; ==> ; (SB-PCL::%DEFMETHOD-EXPANDER CFFI:TRANSLATE-TO-FOREIGN NIL ; (OBJC-CFFI::SEL ; (TYPE OBJC-CFFI::OBJC-SELECTOR-TYPE)) ; (OBJC-CFFI::SEL)) ; ; caught STYLE-WARNING: ; can't find type for specializer OBJC-SELECTOR-TYPE in ; SB-PCL::PARAMETER-SPECIALIZER-DECLARATION-IN-DEFMETHOD.
; compiling (DEFCLASS OBJC-METHOD ...) ; compiling (DEFMETHOD PRINT-OBJECT ...) ; compiling (DEFMETHOD DESCRIBE-OBJECT ...) ; compiling (DEFINE-FOREIGN-TYPE OBJC-IMP-TYPE ...) ; compiling (DEFCSTRUCT OBJC-METHOD-CSTRUCT ...)
Unknown CFFI type: OBJC-CFFI:OBJC-SEL. [Condition of type SIMPLE-ERROR]
Restarts: 0: [RETRY] Retry performing #<ASDF:COMPILE-OP NIL {11E9C349}> on #<ASDF:CL-SOURCE-FILE "cffi" {11847169}>. 1: [ACCEPT] Continue, treating #<ASDF:COMPILE-OP NIL {11E9C349}> on #<ASDF:CL-SOURCE-FILE "cffi" {11847169}> as having been successful. 2: [ABORT-REQUEST] Abort handling SLIME request. 3: [ABORT] Exit debugger, returning to top level.
Backtrace: 0: (CFFI::PARSE-TYPE OBJC-CFFI:OBJC-SEL) 1: (CFFI::CANONICALIZE-FOREIGN-TYPE OBJC-CFFI:OBJC-SEL) 2: (CFFI::NOTICE-FOREIGN-STRUCT-DEFINITION OBJC-CFFI::OBJC-METHOD- CSTRUCT ((OBJC-CFFI::METHOD_NAME OBJC-CFFI:OBJC-SEL) (OBJC- CFFI::METHOD_TYPES :STRING) (OBJC-CFFI::METHOD_IMP OBJC-CFFI::OBJC-IMP- POINTER))) 3: (SB-INT:SIMPLE-EVAL-IN-LEXENV (CFFI::NOTICE-FOREIGN-STRUCT- DEFINITION (QUOTE OBJC-CFFI::OBJC-METHOD-CSTRUCT) (QUOTE (# # #))) #<NULL-LEXENV>) 4: ((FLET SB-C::DEFAULT-PROCESSOR) (CFFI::NOTICE-FOREIGN-STRUCT- DEFINITION (QUOTE OBJC-CFFI::OBJC-METHOD-CSTRUCT) (QUOTE (# # #)))) 5: (SB-C::PROCESS-TOPLEVEL-FORM (CFFI::NOTICE-FOREIGN-STRUCT- DEFINITION (QUOTE OBJC-CFFI::OBJC-METHOD-CSTRUCT) (QUOTE (# # #))) ((EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (CFFI::NOTICE- FOREIGN-STRUCT-DEFINITION # #)) SB-C::ORIGINAL-SOURCE-START 0 20) (:COMPILE-TOPLEVEL)) 6: (SB-C::PROCESS-TOPLEVEL-PROGN ((CFFI::NOTICE-FOREIGN-STRUCT- DEFINITION (QUOTE OBJC-CFFI::OBJC-METHOD-CSTRUCT) (QUOTE #))) ((EVAL- WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (CFFI::NOTICE-FOREIGN- STRUCT-DEFINITION # #)) SB-C::ORIGINAL-SOURCE-START 0 20) (:COMPILE- TOPLEVEL)) 7: (SB-C::PROCESS-TOPLEVEL-FORM (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD- TOPLEVEL :EXECUTE) (CFFI::NOTICE-FOREIGN-STRUCT-DEFINITION (QUOTE OBJC- CFFI::OBJC-METHOD-CSTRUCT) (QUOTE #))) (SB-C::ORIGINAL-SOURCE-START 0 20) NIL) 8: ((FLET SB-C::DEFAULT-PROCESSOR) (CFFI:DEFCSTRUCT OBJC-CFFI::OBJC- METHOD-CSTRUCT (OBJC-CFFI::METHOD_NAME OBJC-CFFI:OBJC-SEL) (OBJC- CFFI::METHOD_TYPES :STRING) (OBJC-CFFI::METHOD_IMP OBJC-CFFI::OBJC-IMP- POINTER))) 9: (SB-C::PROCESS-TOPLEVEL-FORM (CFFI:DEFCSTRUCT OBJC-CFFI::OBJC- METHOD-CSTRUCT (OBJC-CFFI::METHOD_NAME OBJC-CFFI:OBJC-SEL) (OBJC- CFFI::METHOD_TYPES :STRING) (OBJC-CFFI::METHOD_IMP OBJC-CFFI::OBJC-IMP- POINTER)) (SB-C::ORIGINAL-SOURCE-START 0 20) NIL) 10: (SB-C::SUB-SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >) 11: ((LAMBDA NIL)) 12: (SB-C::%WITH-COMPILATION-UNIT #<CLOSURE (LAMBDA NIL) {119EAB3D}>) 13: (SB-C::SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >) 14: (COMPILE-FILE #P"/Users/raffaelc/.sbcl/site/cl-objc-leopard/src/ cffi.lisp") 15: ((SB-PCL::FAST-METHOD ASDF:PERFORM (ASDF:COMPILE-OP ASDF:CL- SOURCE-FILE)) #<unavailable argument> #<unavailable argument> #<ASDF:COMPILE-OP NIL {11E9C349}> #<ASDF:CL-SOURCE-FILE "cffi" {11847169}>) 16: ((LAMBDA (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. SB-PCL::.ARG0. SB-PCL::.ARG1.)) #<unavailable argument> #<unavailable argument> #<ASDF:COMPILE-OP NIL {11E9C349}> #<ASDF:CL-SOURCE-FILE "cffi" {11847169}>) 17: ((LAMBDA NIL)) 18: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK)) 19: (SB-C::%WITH-COMPILATION-UNIT #<CLOSURE (LAMBDA NIL) {124E2F8D}>) 20: (ASDF:OPERATE ASDF:LOAD-OP :CL-OBJC) 21: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ASDF:OOS (QUOTE ASDF:LOAD-OP) :CL- OBJC) #<NULL-LEXENV>) 22: (SWANK::EVAL-REGION "(asdf:oos 'asdf:load-op :cl-objc) " T) 23: ((LAMBDA NIL)) 24: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-SYNTAX-HOOKS (T)) #<unused argument> #<unused argument> #<CLOSURE (LAMBDA NIL) {11AEEF9D}>) 25: (SWANK::CALL-WITH-BUFFER-SYNTAX #<CLOSURE (LAMBDA NIL) {11AEEF9D}>) 26: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SWANK:LISTENER-EVAL "(asdf:oos 'asdf:load-op :cl-objc) ") #<NULL-LEXENV>) 27: ((LAMBDA NIL)) 28: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T T)) #<unused argument> #<unused argument> #<FUNCTION SWANK:SWANK- DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL) {11AEE38D}>) 29: ((LAMBDA NIL)) 30: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T T)) #<unused argument> #<unused argument> #<FUNCTION SWANK:SWANK- DEBUGGER-HOOK> #<FUNCTION (LAMBDA NIL) {12381C25}>) 31: (SWANK::CALL-WITH-REDIRECTED-IO #<SWANK::CONNECTION {11719A41}> #<CLOSURE (LAMBDA NIL) {11AEBEE5}>) 32: (SWANK::CALL-WITH-CONNECTION #<SWANK::CONNECTION {11719A41}> #<FUNCTION (LAMBDA NIL) {12381C25}>) 33: (SWANK::HANDLE-REQUEST #<SWANK::CONNECTION {11719A41}>) 34: (SWANK::PROCESS-AVAILABLE-INPUT #<SB-SYS:FD-STREAM for "a socket" {1170F3A1}> #<CLOSURE (LAMBDA NIL) {11AEBEA5}>) 35: ((FLET SWANK::HANDLER)) 36: ((LAMBDA (SWANK-BACKEND::_)) #<unused argument>) 37: (SB-IMPL::SUB-SERVE-EVENT NIL NIL NIL) 38: (SB-SYS:WAIT-UNTIL-FD-USABLE 0 :INPUT NIL) 39: (SB-IMPL::REFILL-INPUT-BUFFER #<SB-SYS:FD-STREAM for "standard input" {122792D1}>) 40: (SB-IMPL::INPUT-CHAR/UTF-8 #<SB-SYS:FD-STREAM for "standard input" {122792D1}> NIL #:EOF-OBJECT) 41: (READ-CHAR #<SB-SYS:FD-STREAM for "standard input" {122792D1}> NIL #:EOF-OBJECT #<unused argument>) 42: (READ-CHAR #<SYNONYM-STREAM :SYMBOL SB-SYS:*STDIN* {100BCC61}> NIL #:EOF-OBJECT #<unused argument>) 43: (READ-CHAR #<SYNONYM-STREAM :SYMBOL SWANK::*CURRENT-STANDARD- INPUT* {11F274F1}> NIL #:EOF-OBJECT #<unused argument>) 44: (READ-PRESERVING-WHITESPACE #<SYNONYM-STREAM :SYMBOL SWANK::*CURRENT-STANDARD-INPUT* {11F274F1}> NIL (NIL) T) 45: (READ-PRESERVING-WHITESPACE #<SYNONYM-STREAM :SYMBOL SWANK::*CURRENT-STANDARD-INPUT* {11F274F1}> NIL (NIL) NIL) 46: (READ #<SYNONYM-STREAM :SYMBOL SWANK::*CURRENT-STANDARD-INPUT* {11F274F1}> NIL (NIL) NIL) 47: (SB-IMPL::REPL-READ-FORM-FUN #<SYNONYM-STREAM :SYMBOL SWANK::*CURRENT-STANDARD-INPUT* {11F274F1}> #<unavailable argument>) 48: (SB-IMPL::REPL-FUN NIL) 49: (SB-IMPL::REPL-FUN NIL) 50: ((LAMBDA NIL)) 51: ((LAMBDA NIL)) 52: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA NIL) {11F35A3D}>) 53: (SB-IMPL::TOPLEVEL-REPL NIL) 54: (SB-IMPL::TOPLEVEL-INIT) 55: ((LABELS SB-IMPL::RESTART-LISP))
regards,
Ralph
Raffael Cavallaro, Ph.D. raffaelcavallaro@mac.com