[elephant-devel] Error when loading elephant on Mac OS with Lispworks 5.1
Jens Teich
info at jensteich.de
Mon Apr 7 05:53:02 UTC 2008
Lispworks 5.1
Mac OS X 10.5
CL-USER 1 > (asdf :elephant)
; loading system definition from /Users/jensteich/Lisp/elephant/
elephant.asd into
; #<The ASDF0 package, 0/16 internal, 0/16 external>
; Loading text file /Users/jensteich/Lisp/elephant/elephant.asd
; registering #<SYSTEM ELEPHANT 200FA617> as ELEPHANT
; loading system definition from /Users/jensteich/Lisp/cl-base64-3.3.2/
cl-base64.asd
; into #<The ASDF0 package, 0/16 internal, 0/16 external>
; Loading text file /Users/jensteich/Lisp/cl-base64-3.3.2/cl-base64.asd
; registering #<SYSTEM CL-BASE64 217BCC13> as CL-BASE64
; registering #<SYSTEM CL-BASE64-TESTS 200CC39F> as CL-BASE64-TESTS
; loading system definition from /Users/jensteich/Lisp/uffi-1.6.0/
uffi.asd into
; #<The ASDF0 package, 0/16 internal, 0/16 external>
; Loading text file /Users/jensteich/Lisp/uffi-1.6.0/uffi.asd
; registering #<SYSTEM UFFI 2009B6FF> as UFFI
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/package.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFPACKAGE "UFFI")
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/package.xfasl
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/
primitives.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; UFFI:DEF-CONSTANT
; UFFI:DEF-TYPE
; UFFI:NULL-CHAR-P
; UFFI:DEF-FOREIGN-TYPE
; (DEFVAR UFFI::+TYPE-CONVERSION-HASH+)
; (DEFVAR UFFI::*TYPE-CONVERSION-LIST*)
; (TOP-LEVEL-FORM 8)
; (TOP-LEVEL-FORM 9)
; UFFI::BASIC-CONVERT-FROM-UFFI-TYPE
; UFFI::%CONVERT-FROM-UFFI-TYPE
; UFFI::CONVERT-FROM-UFFI-TYPE
; (TOP-LEVEL-FORM 13)
; (TOP-LEVEL-FORM 13)
; UFFI::MAKE-LISP-NAME
; (TOP-LEVEL-FORM 15)
; (TOP-LEVEL-FORM 15)
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/
primitives.xfasl
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/objects.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; UFFI:SIZE-OF-FOREIGN-TYPE
; UFFI:ALLOCATE-FOREIGN-OBJECT
; UFFI:FREE-FOREIGN-OBJECT
; UFFI:NULL-POINTER-P
; UFFI:MAKE-NULL-POINTER
; UFFI:MAKE-POINTER
; UFFI:CHAR-ARRAY-TO-POINTER
; UFFI:DEREF-POINTER
; UFFI:ENSURE-CHAR-CHARACTER
; UFFI:ENSURE-CHAR-INTEGER
; UFFI:ENSURE-CHAR-STORABLE
; UFFI:POINTER-ADDRESS
; UFFI:WITH-FOREIGN-OBJECT
; UFFI:WITH-FOREIGN-OBJECTS
; UFFI:WITH-CAST-POINTER
; UFFI:DEF-FOREIGN-VAR
; UFFI:DEF-POINTER-VAR
; (TOP-LEVEL-FORM 0)
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/
aggregates.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; UFFI:DEF-ENUM
; UFFI:DEF-ARRAY-POINTER
; UFFI::PROCESS-STRUCT-FIELDS
; UFFI:DEF-STRUCT
; UFFI:GET-SLOT-VALUE
; UFFI:GET-SLOT-POINTER
; UFFI:DEREF-ARRAY
; UFFI:DEF-UNION
; UFFI:CONVERT-FROM-FOREIGN-USB8
; (TOP-LEVEL-FORM 0)
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/
functions.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; UFFI::PROCESS-FUNCTION-ARGS
; UFFI::PROCESS-ONE-FUNCTION-ARG
; UFFI::ALLEGRO-CONVERT-RETURN-TYPE
; UFFI::FUNCALLABLE-LAMBDA-LIST
; UFFI::CONVERT-LISPWORKS-ARGS
; UFFI::PREPROCESS-NAMES
; UFFI::PREPROCESS-ARGS
; UFFI:DEF-FUNCTION
; UFFI::%DEF-FUNCTION
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/functions.xfasl
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/
aggregates.xfasl
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/objects.xfasl
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/strings.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFVAR UFFI:+NULL-CSTRING-POINTER+)
; UFFI:CONVERT-FROM-CSTRING
; UFFI:CONVERT-TO-CSTRING
; UFFI:FREE-CSTRING
; UFFI:WITH-CSTRING
; UFFI:WITH-CSTRINGS
; UFFI:CONVERT-TO-FOREIGN-STRING
; UFFI:CONVERT-FROM-FOREIGN-STRING
; UFFI:ALLOCATE-FOREIGN-STRING
; UFFI:FOREIGN-STRING-LENGTH
; UFFI:WITH-FOREIGN-STRING
; UFFI:WITH-FOREIGN-STRINGS
; (SUBFUNCTION UFFI::STRLEN (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN))
; (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN)
; (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN)
; (DEFTYPE UFFI::CHAR-PTR-DEF)
; UFFI::FAST-NATIVE-TO-STRING
; (TOP-LEVEL-FORM 0)
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/
libraries.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFVAR UFFI::*LOADED-LIBRARIES*)
; UFFI:DEFAULT-FOREIGN-LIBRARY-TYPE
; UFFI:FOREIGN-LIBRARY-TYPES
; UFFI:FIND-FOREIGN-LIBRARY
; UFFI:LOAD-FOREIGN-LIBRARY
; UFFI::CONVERT-SUPPORTING-LIBRARIES-TO-STRING
; (TOP-LEVEL-FORM 0)
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/os.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; UFFI:GETENV
; UFFI:RUN-SHELL-COMMAND
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/strings.xfasl
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/libraries.xfasl
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/os.xfasl
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/package.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFPACKAGE "UFFI")
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/package.xfasl
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/
primitives.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; UFFI:DEF-CONSTANT
; UFFI:DEF-TYPE
; UFFI:NULL-CHAR-P
; UFFI:DEF-FOREIGN-TYPE
; (DEFVAR UFFI::+TYPE-CONVERSION-HASH+)
; (DEFVAR UFFI::*TYPE-CONVERSION-LIST*)
; (TOP-LEVEL-FORM 8)
; (TOP-LEVEL-FORM 9)
; UFFI::BASIC-CONVERT-FROM-UFFI-TYPE
; UFFI::%CONVERT-FROM-UFFI-TYPE
; UFFI::CONVERT-FROM-UFFI-TYPE
; (TOP-LEVEL-FORM 13)
; (TOP-LEVEL-FORM 13)
; UFFI::MAKE-LISP-NAME
; (TOP-LEVEL-FORM 15)
; (TOP-LEVEL-FORM 15)
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/
primitives.xfasl
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/objects.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; UFFI:SIZE-OF-FOREIGN-TYPE
; UFFI:ALLOCATE-FOREIGN-OBJECT
; UFFI:FREE-FOREIGN-OBJECT
; UFFI:NULL-POINTER-P
; UFFI:MAKE-NULL-POINTER
; UFFI:MAKE-POINTER
; UFFI:CHAR-ARRAY-TO-POINTER
; UFFI:DEREF-POINTER
; UFFI:ENSURE-CHAR-CHARACTER
; UFFI:ENSURE-CHAR-INTEGER
; UFFI:ENSURE-CHAR-STORABLE
; UFFI:POINTER-ADDRESS
; UFFI:WITH-FOREIGN-OBJECT
; UFFI:WITH-FOREIGN-OBJECTS
; UFFI:WITH-CAST-POINTER
; UFFI:DEF-FOREIGN-VAR
; UFFI:DEF-POINTER-VAR
; (TOP-LEVEL-FORM 0)
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/
aggregates.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; UFFI:DEF-ENUM
; UFFI:DEF-ARRAY-POINTER
; UFFI::PROCESS-STRUCT-FIELDS
; UFFI:DEF-STRUCT
; UFFI:GET-SLOT-VALUE
; UFFI:GET-SLOT-POINTER
; UFFI:DEREF-ARRAY
; UFFI:DEF-UNION
; UFFI:CONVERT-FROM-FOREIGN-USB8
; (TOP-LEVEL-FORM 0)
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/
functions.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; UFFI::PROCESS-FUNCTION-ARGS
; UFFI::PROCESS-ONE-FUNCTION-ARG
; UFFI::ALLEGRO-CONVERT-RETURN-TYPE
; UFFI::FUNCALLABLE-LAMBDA-LIST
; UFFI::CONVERT-LISPWORKS-ARGS
; UFFI::PREPROCESS-NAMES
; UFFI::PREPROCESS-ARGS
; UFFI:DEF-FUNCTION
; UFFI::%DEF-FUNCTION
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/functions.xfasl
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/
aggregates.xfasl
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/objects.xfasl
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/strings.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFVAR UFFI:+NULL-CSTRING-POINTER+)
; UFFI:CONVERT-FROM-CSTRING
; UFFI:CONVERT-TO-CSTRING
; UFFI:FREE-CSTRING
; UFFI:WITH-CSTRING
; UFFI:WITH-CSTRINGS
; UFFI:CONVERT-TO-FOREIGN-STRING
; UFFI:CONVERT-FROM-FOREIGN-STRING
; UFFI:ALLOCATE-FOREIGN-STRING
; UFFI:FOREIGN-STRING-LENGTH
; UFFI:WITH-FOREIGN-STRING
; UFFI:WITH-FOREIGN-STRINGS
; (SUBFUNCTION UFFI::STRLEN (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN))
; (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN)
; (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN)
; (DEFTYPE UFFI::CHAR-PTR-DEF)
; UFFI::FAST-NATIVE-TO-STRING
; (TOP-LEVEL-FORM 0)
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/
libraries.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFVAR UFFI::*LOADED-LIBRARIES*)
; UFFI:DEFAULT-FOREIGN-LIBRARY-TYPE
; UFFI:FOREIGN-LIBRARY-TYPES
; UFFI:FIND-FOREIGN-LIBRARY
; UFFI:LOAD-FOREIGN-LIBRARY
; UFFI::CONVERT-SUPPORTING-LIBRARIES-TO-STRING
; (TOP-LEVEL-FORM 0)
;;; Compiling file /Users/jensteich/Lisp/uffi-1.6.0/src/os.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; UFFI:GETENV
; UFFI:RUN-SHELL-COMMAND
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/strings.xfasl
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/libraries.xfasl
; Loading fasl file /Users/jensteich/Lisp/uffi-1.6.0/src/os.xfasl
; Loading fasl file /Users/jensteich/Lisp/cl-base64-3.3.2/package.xfasl
; Loading fasl file /Users/jensteich/Lisp/cl-base64-3.3.2/encode.xfasl
; Loading fasl file /Users/jensteich/Lisp/cl-base64-3.3.2/decode.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/utils/
package.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFPACKAGE "ELEPHANT-UTILS")
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/elephant/src/utils/
package.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/utils/
convenience.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; ELEPHANT-UTILS:WITH-GENSYMS
; ELEPHANT-UTILS:DO-SUBSETS
; ELEPHANT-UTILS:SUBSETS
; ELEPHANT-UTILS:REMOVE-KEYWORDS
; ELEPHANT-UTILS::CONCAT-SEPARATED-STRINGS
; ELEPHANT-UTILS::APPEND-SUBLISTS
; ELEPHANT-UTILS:IFRET
; ELEPHANT-UTILS:AIF
; ELEPHANT-UTILS:AWHEN
; ELEPHANT-UTILS:MKLIST
; ELEPHANT-UTILS:REMOVE-INDEXED-ELEMENT-AND-ADJUST
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/elephant/src/utils/
convenience.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/utils/
locks.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; ELEPHANT-UTILS:ELE-MAKE-LOCK
; ELEPHANT-UTILS:ELE-WITH-LOCK
; ELEPHANT-UTILS:ELE-MAKE-FAST-LOCK
; ELEPHANT-UTILS:ELE-WITH-FAST-LOCK
; ELEPHANT-UTILS:ELE-THREAD-HASH-KEY
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/elephant/src/utils/locks.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/utils/os.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; ELEPHANT-UTILS::IN-DIRECTORY
; ELEPHANT-UTILS:LAUNCH-BACKGROUND-PROGRAM
;;;*** Warning in ELEPHANT-UTILS:KILL-BACKGROUND-PROGRAM: PROCESS-
HANDLE is bound but not referenced
; ELEPHANT-UTILS:KILL-BACKGROUND-PROGRAM
; (TOP-LEVEL-FORM 0)
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
217BF46B> on
#<ASDF:CL-SOURCE-FILE "os" 214DFE67>.
; Loading fasl file /Users/jensteich/Lisp/elephant/src/utils/os.xfasl
; $ gcc -bundle -fPIC -Wall -O2 -g /Users/jensteich/Lisp/elephant/src/
memutil/libmemutil.c -o /Users/jensteich/Lisp/elephant/src/memutil/
libmemutil.dylib -lm
; gcc -bundle -fPIC -Wall -O2 -g /Users/jensteich/Lisp/elephant/src/
memutil/libmemutil.c -o /Users/jensteich/Lisp/elephant/src/memutil/
libmemutil.dylib -lm
Attempting to load libmemutil.dylib...
Loaded /Users/jensteich/Lisp/elephant/src/memutil/libmemutil.dylib
;;; Compiling file /Users/jensteich/Lisp/elephant/src/memutil/
memutil.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (DEFPACKAGE "ELEPHANT-MEMUTIL")
; (TOP-LEVEL-FORM 2)
;;;*** Warning in (DEFTYPE ELEPHANT-MEMUTIL:POINTER-INT): (DEFTYPE
ELEPHANT-MEMUTIL:POINTER-INT) defined more than once in /Users/
jensteich/Lisp/elephant/src/memutil/memutil.lisp.
; (DEFTYPE ELEPHANT-MEMUTIL:POINTER-INT)
;;;*** Warning in (DEFTYPE ELEPHANT-MEMUTIL:POINTER-VOID): (DEFTYPE
ELEPHANT-MEMUTIL:POINTER-VOID) defined more than once in /Users/
jensteich/Lisp/elephant/src/memutil/memutil.lisp.
; (DEFTYPE ELEPHANT-MEMUTIL:POINTER-VOID)
; (FLI:DEFINE-FOREIGN-TYPE ELEPHANT-MEMUTIL:ARRAY-OR-POINTER-CHAR)
;;;*** Warning in (DEFTYPE ELEPHANT-MEMUTIL:ARRAY-OR-POINTER-CHAR):
(DEFTYPE ELEPHANT-MEMUTIL:ARRAY-OR-POINTER-CHAR) defined more than
once in /Users/jensteich/Lisp/elephant/src/memutil/memutil.lisp.
; (DEFTYPE ELEPHANT-MEMUTIL:ARRAY-OR-POINTER-CHAR)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::COPY-BUFS
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-BUFS))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-BUFS)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-BUFS)
; (DEFVAR ELEPHANT-MEMUTIL:+NULL-VOID+)
; (DEFVAR ELEPHANT-MEMUTIL:+NULL-CHAR+)
; (DEFVAR ELEPHANT-MEMUTIL::*BUFFER-STREAMS*)
; (DEFVAR ELEPHANT-MEMUTIL::*BUFFER-STREAMS-LOCK*)
; (SUBFUNCTION
(DEFSETF ELEPHANT-MEMUTIL:BUFFER-STREAM-LENGTH)
(DEFSTRUCT ELEPHANT-MEMUTIL:BUFFER-STREAM))
; (SUBFUNCTION
(DEFSETF ELEPHANT-MEMUTIL::BUFFER-STREAM-POSITION)
(DEFSTRUCT ELEPHANT-MEMUTIL:BUFFER-STREAM))
; (SUBFUNCTION
(DEFSETF ELEPHANT-MEMUTIL:BUFFER-STREAM-SIZE)
(DEFSTRUCT ELEPHANT-MEMUTIL:BUFFER-STREAM))
; (SUBFUNCTION
(DEFSETF ELEPHANT-MEMUTIL:BUFFER-STREAM-BUFFER)
(DEFSTRUCT ELEPHANT-MEMUTIL:BUFFER-STREAM))
; (SUBFUNCTION
ELEPHANT-MEMUTIL:MAKE-BUFFER-STREAM
(DEFSTRUCT ELEPHANT-MEMUTIL:BUFFER-STREAM))
; ELEPHANT-MEMUTIL::GRAB-BUFFER-STREAM
;;;*** Warning in ELEPHANT-MEMUTIL::RETURN-BUFFER-STREAM: Inline
expansion for ELEPHANT-MEMUTIL:RESET-BUFFER-STREAM not found
;;;*** Warning in ELEPHANT-MEMUTIL::RETURN-BUFFER-STREAM: Inline
expansion for ELEPHANT-MEMUTIL:RESET-BUFFER-STREAM not found
; ELEPHANT-MEMUTIL::RETURN-BUFFER-STREAM
; ELEPHANT-MEMUTIL:WITH-BUFFER-STREAMS
; (SUBFUNCTION
ELEPHANT-MEMUTIL::READ-INT32
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT32))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT32)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT32)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::READ-UINT32
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT32))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT32)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT32)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::READ-INT64
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT64))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT64)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT64)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::READ-UINT64
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT64))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT64)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT64)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::READ-FLOAT
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-FLOAT))
; (SUBFUNCTION
ELEPHANT-MEMUTIL::READ-FLOAT
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-FLOAT))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-FLOAT)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-FLOAT)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::READ-DOUBLE
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-DOUBLE))
; (SUBFUNCTION
ELEPHANT-MEMUTIL::READ-DOUBLE
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-DOUBLE))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-DOUBLE)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-DOUBLE)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::WRITE-INT32
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT32))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT32)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT32)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::WRITE-UINT32
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT32))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT32)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT32)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::WRITE-INT64
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT64))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT64)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT64)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::WRITE-UINT64
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT64))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT64)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT64)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::WRITE-FLOAT
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-FLOAT))
; (SUBFUNCTION
ELEPHANT-MEMUTIL::WRITE-FLOAT
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-FLOAT))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-FLOAT)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-FLOAT)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::WRITE-DOUBLE
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-DOUBLE))
; (SUBFUNCTION
ELEPHANT-MEMUTIL::WRITE-DOUBLE
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-DOUBLE))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-DOUBLE)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-DOUBLE)
; (SUBFUNCTION
ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER))
; (SUBFUNCTION
ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER)
; ELEPHANT-MEMUTIL:BYTE-LENGTH
; (SUBFUNCTION
ELEPHANT-MEMUTIL::COPY-STR-TO-BUF
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-STR-TO-BUF))
; (SUBFUNCTION
ELEPHANT-MEMUTIL::COPY-STR-TO-BUF
(FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-STR-TO-BUF))
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-STR-TO-BUF)
; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-STR-TO-BUF)
; ELEPHANT-MEMUTIL::PROCESS-STRUCT-SLOT-DEFS
; ELEPHANT-MEMUTIL::WITH-STRUCT-SLOTS
;;;*** Warning in ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM: Inline
expansion for ELEPHANT-MEMUTIL::COPY-BUFS not found
;;;*** Warning in ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM: Inline
expansion for ELEPHANT-MEMUTIL::COPY-BUFS not found
;;;*** Warning in ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM: Inline
expansion for ELEPHANT-MEMUTIL::COPY-BUFS not found
; ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM
;;;*** Warning in ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM-NO-COPY:
symbol-macro SIZE is bound but not referenced
; ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM-NO-COPY
; ELEPHANT-MEMUTIL:RESET-BUFFER-STREAM
; ELEPHANT-MEMUTIL:RESET-BUFFER-STREAM
; ELEPHANT-MEMUTIL:BUFFER-WRITE-BYTE
; ELEPHANT-MEMUTIL:BUFFER-WRITE-BYTE
; ELEPHANT-MEMUTIL:BUFFER-WRITE-INT32
; ELEPHANT-MEMUTIL:BUFFER-WRITE-INT32
; ELEPHANT-MEMUTIL:BUFFER-WRITE-UINT32
; ELEPHANT-MEMUTIL:BUFFER-WRITE-UINT32
; ELEPHANT-MEMUTIL:BUFFER-WRITE-INT64
; ELEPHANT-MEMUTIL:BUFFER-WRITE-INT64
; ELEPHANT-MEMUTIL:BUFFER-WRITE-UINT64
; ELEPHANT-MEMUTIL:BUFFER-WRITE-UINT64
; ELEPHANT-MEMUTIL:BUFFER-WRITE-FLOAT
; ELEPHANT-MEMUTIL:BUFFER-WRITE-FLOAT
; ELEPHANT-MEMUTIL:BUFFER-WRITE-DOUBLE
; ELEPHANT-MEMUTIL:BUFFER-WRITE-DOUBLE
; ELEPHANT-MEMUTIL:BUFFER-WRITE-STRING
; ELEPHANT-MEMUTIL:BUFFER-WRITE-STRING
; ELEPHANT-MEMUTIL:BUFFER-READ-BYTE
; ELEPHANT-MEMUTIL:BUFFER-READ-BYTE
; ELEPHANT-MEMUTIL::BUFFER-READ-BYTE-VECTOR
; ELEPHANT-MEMUTIL::BUFFER-WRITE-BYTE-VECTOR
; ELEPHANT-MEMUTIL:BUFFER-READ-TO-ARRAY-OFFSET
; ELEPHANT-MEMUTIL:BUFFER-WRITE-FROM-ARRAY-OFFSET
; ELEPHANT-MEMUTIL:BUFFER-WRITE-OID
; ELEPHANT-MEMUTIL:BUFFER-WRITE-OID
; ELEPHANT-MEMUTIL:BUFFER-READ-OID
; ELEPHANT-MEMUTIL:BUFFER-READ-OID
;;;*** Warning in ELEPHANT-MEMUTIL:BUFFER-READ-INT: Inline expansion
for ELEPHANT-MEMUTIL:BUFFER-READ-INT32 not found
;;;*** Warning in ELEPHANT-MEMUTIL:BUFFER-READ-INT: Inline expansion
for ELEPHANT-MEMUTIL:BUFFER-READ-INT32 not found
; ELEPHANT-MEMUTIL:BUFFER-READ-INT
; ELEPHANT-MEMUTIL:BUFFER-READ-FIXNUM
; ELEPHANT-MEMUTIL:BUFFER-READ-FIXNUM
; ELEPHANT-MEMUTIL:BUFFER-WRITE-INT
;;;*** Warning in ELEPHANT-MEMUTIL:BUFFER-READ-UINT: Inline expansion
for ELEPHANT-MEMUTIL:BUFFER-READ-UINT32 not found
;;;*** Warning in ELEPHANT-MEMUTIL:BUFFER-READ-UINT: Inline expansion
for ELEPHANT-MEMUTIL:BUFFER-READ-UINT32 not found
; ELEPHANT-MEMUTIL:BUFFER-READ-UINT
; ELEPHANT-MEMUTIL:BUFFER-WRITE-UINT
; (DEFCONSTANT ELEPHANT-MEMUTIL::+2^32+)
; (DEFCONSTANT ELEPHANT-MEMUTIL::+2^64+)
; ELEPHANT-MEMUTIL:BUFFER-READ-FIXNUM32
; ELEPHANT-MEMUTIL:BUFFER-READ-INT32
; ELEPHANT-MEMUTIL:BUFFER-READ-INT32
; ELEPHANT-MEMUTIL:BUFFER-READ-UINT32
; ELEPHANT-MEMUTIL:BUFFER-READ-UINT32
; ELEPHANT-MEMUTIL:BUFFER-READ-FIXNUM64
; ELEPHANT-MEMUTIL:BUFFER-READ-INT64
; ELEPHANT-MEMUTIL:BUFFER-READ-INT64
; ELEPHANT-MEMUTIL:BUFFER-READ-UINT64
; ELEPHANT-MEMUTIL:BUFFER-READ-UINT64
; ELEPHANT-MEMUTIL:BUFFER-READ-FLOAT
; ELEPHANT-MEMUTIL:BUFFER-READ-FLOAT
; ELEPHANT-MEMUTIL:BUFFER-READ-DOUBLE
; ELEPHANT-MEMUTIL:BUFFER-READ-DOUBLE
; ELEPHANT-MEMUTIL:BUFFER-READ-UCS1-STRING
; ELEPHANT-MEMUTIL:BUFFER-READ-UCS1-STRING
; ELEPHANT-MEMUTIL:BUFFER-READ-UCS2-STRING
; ELEPHANT-MEMUTIL:BUFFER-READ-UCS2-STRING
; (DEFPARAMETER ELEPHANT-MEMUTIL::+LITTLE-ENDIAN+)
; ELEPHANT-MEMUTIL:LITTLE-ENDIAN-P
; (TOP-LEVEL-FORM 0)
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
217BF46B> on
#<ASDF:CL-SOURCE-FILE "memutil" 214E0B5B>.
Warning: COMPILE-FILE failed while performing #<ASDF:COMPILE-OP NIL
217BF46B> on
#<ASDF:CL-SOURCE-FILE "memutil" 214E0B5B>.
; Loading fasl file /Users/jensteich/Lisp/elephant/src/memutil/
memutil.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/elephant/
package.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFPACKAGE "ELEPHANT")
; (TOP-LEVEL-FORM 3)
; (DEFPACKAGE "ELEPHANT-USER")
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/elephant/src/elephant/
package.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/elephant/
variables.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFVAR ELEPHANT::*ELEPHANT-CODE-VERSION*)
; (DEFVAR ELEPHANT::*ELEPHANT-UNMARKED-CODE-VERSION*)
; (DEFVAR ELEPHANT::*ELEPHANT-PROPERTIES-LABEL*)
; (DEFVAR ELEPHANT::*USER-CONFIGURABLE-PARAMETERS*)
; (DEFVAR ELEPHANT::*CIRCULARITY-INITIAL-HASH-SIZE*)
; (DEFPARAMETER ELEPHANT::*MAP-USING-DEGREE2*)
; (DEFVAR ELEPHANT::*BERKELEY-DB-CACHESIZE*)
; (DEFVAR ELEPHANT:*STORE-CONTROLLER*)
; (DEFVAR ELEPHANT::*CURRENT-TRANSACTION*)
; (DEFVAR ELEPHANT::*WARN-ON-MANUAL-CLASS-FINALIZATION*)
; (TOP-LEVEL-FORM 12)
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/elephant/src/elephant/
variables.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/elephant/
transactions.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFGENERIC ELEPHANT::EXECUTE-TRANSACTION)
; ELEPHANT::MAKE-TRANSACTION-RECORD
; ELEPHANT::TRANSACTION-STORE
; ELEPHANT::TRANSACTION-OBJECT
; ELEPHANT::TRANSACTION-OBJECT-P
; ELEPHANT::OWNED-TXN-P
; (SUBFUNCTION
(DEFCLASS ELEPHANT::TRANSACTION-RETRY-COUNT-EXCEEDED)
(DEFINE-CONDITION ELEPHANT::TRANSACTION-RETRY-COUNT-EXCEEDED))
; (DEFINE-CONDITION ELEPHANT::TRANSACTION-RETRY-COUNT-EXCEEDED)
; ELEPHANT:WITH-TRANSACTION
; ELEPHANT:ENSURE-TRANSACTION
; ELEPHANT::WITH-BATCH-TRANSACTION
; (DEFGENERIC ELEPHANT:CONTROLLER-START-TRANSACTION)
; (DEFGENERIC ELEPHANT:CONTROLLER-COMMIT-TRANSACTION)
; (DEFGENERIC ELEPHANT:CONTROLLER-ABORT-TRANSACTION)
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/elephant/src/elephant/
transactions.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/elephant/
metaclasses.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFCLASS ELEPHANT:PERSISTENT)
; (METHOD PRINT-OBJECT (ELEPHANT:PERSISTENT T))
; (DEFCLASS ELEPHANT:PERSISTENT-METACLASS)
; ELEPHANT:DEFPCLASS
; ELEPHANT::ADD-PERSISTENT-METACLASS-ARGUMENT
; (METHOD ELEPHANT::PERSISTENT-SLOTS (STANDARD-CLASS))
; (METHOD ELEPHANT::PERSISTENT-SLOTS (ELEPHANT:PERSISTENT-METACLASS))
; (METHOD ELEPHANT::OLD-PERSISTENT-SLOTS (ELEPHANT:PERSISTENT-
METACLASS))
; (METHOD ELEPHANT::UPDATE-PERSISTENT-SLOTS (ELEPHANT:PERSISTENT-
METACLASS T))
; (DEFCLASS ELEPHANT::PERSISTENT-SLOT-DEFINITION)
; (DEFCLASS ELEPHANT::PERSISTENT-DIRECT-SLOT-DEFINITION)
; (DEFCLASS ELEPHANT::PERSISTENT-EFFECTIVE-SLOT-DEFINITION)
; (DEFCLASS ELEPHANT::TRANSIENT-SLOT-DEFINITION)
; (DEFCLASS ELEPHANT::TRANSIENT-DIRECT-SLOT-DEFINITION)
; (DEFCLASS ELEPHANT::TRANSIENT-EFFECTIVE-SLOT-DEFINITION)
; (DEFGENERIC ELEPHANT::TRANSIENT)
; (DEFCLASS ELEPHANT::INDEXING-RECORD)
; (METHOD PRINT-OBJECT (ELEPHANT::INDEXING-RECORD T))
; (METHOD ELEPHANT::INDEXED-RECORD (STANDARD-CLASS))
; (METHOD ELEPHANT::INDEXED-RECORD (ELEPHANT:PERSISTENT-METACLASS))
; (METHOD ELEPHANT::OLD-INDEXED-RECORD (ELEPHANT:PERSISTENT-METACLASS))
; (METHOD ELEPHANT::UPDATE-INDEXED-RECORD (ELEPHANT:PERSISTENT-
METACLASS T))
; (METHOD ELEPHANT::MAKE-NEW-INDEXED-RECORD (T T T))
; (METHOD ELEPHANT::REMOVED-INDEXING? (ELEPHANT:PERSISTENT-METACLASS))
; ELEPHANT::INDEXED-SLOT-NAMES-FROM-DEFS
; (METHOD ELEPHANT::REGISTER-INDEXED-SLOT (ELEPHANT:PERSISTENT-
METACLASS T))
; (METHOD ELEPHANT::UNREGISTER-INDEXED-SLOT (T T))
; (METHOD ELEPHANT::REGISTER-DERIVED-INDEX (T T))
; (METHOD ELEPHANT::UNREGISTER-DERIVED-INDEX (T T))
; (METHOD ELEPHANT::INDEXED (ELEPHANT:PERSISTENT-METACLASS))
; (METHOD ELEPHANT::PREVIOUSLY-INDEXED (ELEPHANT:PERSISTENT-METACLASS))
; (METHOD ELEPHANT::INDEXED (STANDARD-SLOT-DEFINITION))
; (METHOD ELEPHANT::INDEXED (STANDARD-CLASS))
; (DEFVAR ELEPHANT::*INHIBIT-INDEXING-LIST*)
; ELEPHANT::INHIBIT-INDEXING
; ELEPHANT::UNINHIBIT-INDEXING
; (METHOD SLOT-DEFINITION-ALLOCATION (ELEPHANT::PERSISTENT-SLOT-
DEFINITION))
; (METHOD (SETF SLOT-DEFINITION-ALLOCATION) (T ELEPHANT::PERSISTENT-
SLOT-DEFINITION))
; (METHOD CLOS:DIRECT-SLOT-DEFINITION-CLASS (ELEPHANT:PERSISTENT-
METACLASS))
; (METHOD VALIDATE-SUPERCLASS (ELEPHANT:PERSISTENT-METACLASS STANDARD-
CLASS))
; (METHOD VALIDATE-SUPERCLASS (STANDARD-CLASS ELEPHANT:PERSISTENT-
METACLASS))
; (DEFGENERIC ELEPHANT::PERSISTENT-P)
; (METHOD CLOS:EFFECTIVE-SLOT-DEFINITION-CLASS (ELEPHANT:PERSISTENT-
METACLASS))
; ELEPHANT::ENSURE-TRANSIENT-CHAIN
; (METHOD
CLOS::COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS
(ELEPHANT:PERSISTENT-METACLASS T T))
; ELEPHANT::FIND-SLOT-DEF-BY-NAME
; ELEPHANT::PERSISTENT-SLOT-DEFS
; ELEPHANT::TRANSIENT-SLOT-DEFS
; ELEPHANT::PERSISTENT-SLOT-NAMES
; ELEPHANT::TRANSIENT-SLOT-NAMES
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/elephant/src/elephant/
metaclasses.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/elephant/
classes.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFVAR ELEPHANT::*DEBUG-SI*)
; (METHOD INITIALIZE-INSTANCE :BEFORE (ELEPHANT:PERSISTENT))
; (DEFCLASS ELEPHANT:PERSISTENT-OBJECT)
; (METHOD SHARED-INITIALIZE :AROUND (ELEPHANT:PERSISTENT-METACLASS T))
; (METHOD CLOS:FINALIZE-INHERITANCE :AROUND (ELEPHANT:PERSISTENT-
METACLASS))
; (METHOD REINITIALIZE-INSTANCE :AROUND (ELEPHANT:PERSISTENT-METACLASS))
; (METHOD SHARED-INITIALIZE :AROUND (ELEPHANT:PERSISTENT-OBJECT T))
; ELEPHANT::INITIALIZE-PERSISTENT-SLOTS
; (METHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS :AROUND
(ELEPHANT:PERSISTENT-OBJECT T T T))
; (METHOD CHANGE-CLASS :AROUND (ELEPHANT:PERSISTENT STANDARD-CLASS))
; (METHOD CHANGE-CLASS :AROUND (STANDARD-OBJECT ELEPHANT:PERSISTENT-
METACLASS))
; (METHOD
UPDATE-INSTANCE-FOR-DIFFERENT-CLASS
:AROUND
(ELEPHANT:PERSISTENT ELEPHANT:PERSISTENT))
; (METHOD
CLOS:SLOT-VALUE-USING-CLASS
(ELEPHANT:PERSISTENT-METACLASS
ELEPHANT:PERSISTENT-OBJECT
ELEPHANT::PERSISTENT-SLOT-DEFINITION))
; (METHOD
(SETF CLOS:SLOT-VALUE-USING-CLASS)
(T
ELEPHANT:PERSISTENT-METACLASS
ELEPHANT:PERSISTENT-OBJECT
ELEPHANT::PERSISTENT-SLOT-DEFINITION))
; (METHOD
CLOS:SLOT-BOUNDP-USING-CLASS
(ELEPHANT:PERSISTENT-METACLASS
ELEPHANT:PERSISTENT-OBJECT
ELEPHANT::PERSISTENT-SLOT-DEFINITION))
; (METHOD
CLOS:SLOT-BOUNDP-USING-CLASS
(ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT SYMBOL))
; (METHOD
CLOS:SLOT-MAKUNBOUND-USING-CLASS
(ELEPHANT:PERSISTENT-METACLASS
ELEPHANT:PERSISTENT-OBJECT
ELEPHANT::PERSISTENT-SLOT-DEFINITION))
; ELEPHANT::VALID-PERSISTENT-REFERENCE-P
; (SUBFUNCTION
(DEFCLASS ELEPHANT:CROSS-REFERENCE-ERROR)
(DEFINE-CONDITION ELEPHANT:CROSS-REFERENCE-ERROR))
; (DEFINE-CONDITION ELEPHANT:CROSS-REFERENCE-ERROR)
; (DEFINE-CONDITION ELEPHANT:CROSS-REFERENCE-ERROR)
; ELEPHANT::SIGNAL-CROSS-REFERENCE-ERROR
; (METHOD
CLOS:SLOT-VALUE-USING-CLASS
(ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT T))
; (METHOD
(SETF CLOS:SLOT-VALUE-USING-CLASS)
(T ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT T))
; (METHOD
CLOS:SLOT-MAKUNBOUND-USING-CLASS
(ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT T))
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/elephant/src/elephant/
classes.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/elephant/
cache.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; ELEPHANT::MAKE-CACHE-TABLE
; ELEPHANT::GET-CACHE
;;;*** Warning in ELEPHANT::MAKE-FINALIZER: KEY is bound but not
referenced
;;;*** Warning in ELEPHANT::MAKE-FINALIZER: CACHE is bound but not
referenced
; ELEPHANT::MAKE-FINALIZER
; ELEPHANT::SETF-CACHE
; (DEFSETF ELEPHANT::GET-CACHE)
; (TOP-LEVEL-FORM 0)
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
217BF46B> on
#<ASDF:CL-SOURCE-FILE "cache" 214E196B>.
; Loading fasl file /Users/jensteich/Lisp/elephant/src/elephant/
cache.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/elephant/
serializer.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; ELEPHANT::SERIALIZE
; ELEPHANT::DESERIALIZE
; (DEFGENERIC ELEPHANT:STRUCT-CONSTRUCTOR)
; (METHOD ELEPHANT:STRUCT-CONSTRUCTOR (T))
; ELEPHANT::SERIALIZE-TO-BASE64-STRING
; ELEPHANT::CONVERT-BUFFER-TO-BASE64-STRING
; ELEPHANT::DESERIALIZE-FROM-BASE64-STRING
; ELEPHANT::CONVERT-BUFFER-FROM-BASE64-STRING
; (DEFCONSTANT ELEPHANT::+RESERVED-DBINFO+)
; (DEFCONSTANT ELEPHANT::+ELEPHANT-VERSION+)
; (DEFCONSTANT ELEPHANT::+ELEPHANT-SERIALIZER-VERSION+)
; ELEPHANT::SERIALIZE-DATABASE-VERSION-KEY
; ELEPHANT::SERIALIZE-DATABASE-VERSION-VALUE
; ELEPHANT::DESERIALIZE-DATABASE-VERSION-VALUE
; ELEPHANT::SERIALIZE-DATABASE-SERIALIZER-VERSION-KEY
; ELEPHANT::SERIALIZE-DATABASE-SERIALIZER-VERSION-VALUE
; ELEPHANT::DESERIALIZE-DATABASE-SERIALIZER-VERSION-VALUE
; ELEPHANT::SERIALIZE-RESERVED-TAG
; ELEPHANT::SERIALIZE-SYSTEM-TAG
; ELEPHANT::SERIALIZE-SYSTEM-INTEGER
; ELEPHANT::DESERIALIZE-SYSTEM-INTEGER
; ELEPHANT::SLOTS-AND-VALUES
; ELEPHANT::STRUCT-SLOTS-AND-VALUES
; (TOP-LEVEL-FORM 25)
; (DEFVAR ELEPHANT::ARRAY-TYPE-TO-BYTE)
; (DEFVAR ELEPHANT::BYTE-TO-ARRAY-TYPE)
; (TOP-LEVEL-FORM 28)
; (TOP-LEVEL-FORM 29)
; (TOP-LEVEL-FORM 30)
; (TOP-LEVEL-FORM 31)
; (TOP-LEVEL-FORM 32)
; (TOP-LEVEL-FORM 33)
; (TOP-LEVEL-FORM 34)
; (TOP-LEVEL-FORM 35)
; (TOP-LEVEL-FORM 36)
; ELEPHANT::TYPE=
; (TOP-LEVEL-FORM 38)
; (TOP-LEVEL-FORM 39)
; ELEPHANT::ARRAY-TYPE-FROM-BYTE
; ELEPHANT::BYTE-FROM-ARRAY-TYPE
; ELEPHANT::INT-BYTE-SPEC
; (TOP-LEVEL-FORM 0)
; Loading fasl file /Users/jensteich/Lisp/elephant/src/elephant/
serializer.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/elephant/
controller.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFVAR ELEPHANT::*ELEPHANT-DATA-STORES*)
; (DEFVAR ELEPHANT::*ELEPHANT-CONTROLLER-INIT*)
; ELEPHANT::REGISTER-DATA-STORE-CON-INIT
; ELEPHANT::LOOKUP-DATA-STORE-CON-INIT
; (DEFVAR ELEPHANT::*DBCONNECTION-SPEC*)
; (DEFVAR ELEPHANT::*DBCONNECTION-LOCK*)
; (DEFGENERIC ELEPHANT::GET-CON)
; (SUBFUNCTION
(DEFCLASS ELEPHANT:CONTROLLER-LOST-ERROR)
(DEFINE-CONDITION ELEPHANT:CONTROLLER-LOST-ERROR))
; (DEFINE-CONDITION ELEPHANT:CONTROLLER-LOST-ERROR)
; ELEPHANT::SIGNAL-CONTROLLER-LOST-ERROR
; (METHOD ELEPHANT::GET-CON (ELEPHANT:PERSISTENT))
; ELEPHANT::GET-CONTROLLER
; ELEPHANT::BUILD-CONTROLLER
; ELEPHANT::LOAD-DATA-STORE
; ELEPHANT::SATISFY-ASDF-DEPENDENCIES
; ELEPHANT::GET-USER-CONFIGURATION-PARAMETER
;;;*** Warning in ELEPHANT::INITIALIZE-USER-PARAMETERS: VARIABLE is
bound but not referenced
; ELEPHANT::INITIALIZE-USER-PARAMETERS
; (DEFCLASS ELEPHANT:STORE-CONTROLLER)
; (METHOD PRINT-OBJECT (ELEPHANT:STORE-CONTROLLER T))
; ELEPHANT::CACHE-INSTANCE
; ELEPHANT::GET-CACHED-INSTANCE
; (METHOD ELEPHANT:FLUSH-INSTANCE-CACHE (ELEPHANT:STORE-CONTROLLER))
; (DEFGENERIC ELEPHANT::DATABASE-VERSION)
; (METHOD ELEPHANT::DATABASE-VERSION :AROUND (T))
; ELEPHANT::PRIOR-VERSION-P
; (DEFPARAMETER ELEPHANT::*ELEPHANT-UPGRADE-TABLE*)
; (METHOD ELEPHANT::UP-TO-DATE-P (ELEPHANT:STORE-CONTROLLER))
; (METHOD ELEPHANT::UPGRADABLE-P (ELEPHANT:STORE-CONTROLLER))
; (DEFGENERIC ELEPHANT:UPGRADE)
; (METHOD ELEPHANT:UPGRADE (ELEPHANT:STORE-CONTROLLER T))
; (METHOD ELEPHANT::INITIALIZE-SERIALIZER (ELEPHANT:STORE-CONTROLLER))
; (DEFVAR ELEPHANT:*ALWAYS-CONVERT*)
; (DEFPARAMETER ELEPHANT::*LEGACY-SYMBOL-CONVERSIONS*)
; ELEPHANT:ADD-SYMBOL-CONVERSION
; ELEPHANT::MAP-LEGACY-SYMBOLS
; (DEFPARAMETER ELEPHANT::*LEGACY-PACKAGE-CONVERSIONS*)
; ELEPHANT:ADD-PACKAGE-CONVERSION
; ELEPHANT::MAP-LEGACY-PACKAGE-NAMES
; ELEPHANT::MAP-LEGACY-NAMES
; ELEPHANT:TRANSLATE-AND-INTERN-SYMBOL
; (DEFGENERIC ELEPHANT::OPEN-CONTROLLER)
; (DEFGENERIC ELEPHANT::CLOSE-CONTROLLER)
; (METHOD ELEPHANT::CLOSE-CONTROLLER :AFTER (ELEPHANT:STORE-CONTROLLER))
; (DEFGENERIC ELEPHANT::CONNECTION-IS-INDEED-OPEN)
; (DEFGENERIC ELEPHANT::NEXT-OID)
; (DEFGENERIC ELEPHANT:OPTIMIZE-LAYOUT)
; (DEFGENERIC ELEPHANT::PERSISTENT-SLOT-READER)
; (DEFGENERIC ELEPHANT::PERSISTENT-SLOT-WRITER)
; (DEFGENERIC ELEPHANT::PERSISTENT-SLOT-BOUNDP)
; (DEFGENERIC ELEPHANT::PERSISTENT-SLOT-MAKUNBOUND)
; ELEPHANT:OPEN-STORE
; ELEPHANT:CLOSE-STORE
; ELEPHANT:WITH-OPEN-STORE
; ELEPHANT:ADD-TO-ROOT
; ELEPHANT:GET-FROM-ROOT
; ELEPHANT:ROOT-EXISTSP
; ELEPHANT:REMOVE-FROM-ROOT
; ELEPHANT:MAP-ROOT
; (DEFGENERIC ELEPHANT:DROP-POBJECT)
; (METHOD ELEPHANT:DROP-POBJECT (ELEPHANT:PERSISTENT-OBJECT))
; (DEFVAR ELEPHANT::*RESTRICTED-PROPERTIES*)
; (METHOD ELEPHANT::CONTROLLER-PROPERTIES (ELEPHANT:STORE-CONTROLLER))
; (METHOD ELEPHANT::SET-ELE-PROPERTY (T T))
; (METHOD ELEPHANT::GET-ELE-PROPERTY (T))
; (TOP-LEVEL-FORM 0)
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
217BF46B> on
#<ASDF:CL-SOURCE-FILE "controller" 214E1E8F>.
; Loading fasl file /Users/jensteich/Lisp/elephant/src/elephant/
controller.xfasl
;;; Compiling file /Users/jensteich/Lisp/elephant/src/elephant/
collections.lisp ...
;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3
;;; Source level debugging is on
;;; Source file recording is on
;;; Cross referencing is on
; (TOP-LEVEL-FORM 0)
; (TOP-LEVEL-FORM 1)
; (DEFCLASS ELEPHANT:PERSISTENT-COLLECTION)
; ELEPHANT:MAKE-BTREE
; (DEFGENERIC ELEPHANT::BUILD-BTREE)
; (DEFCLASS ELEPHANT:BTREE)
; (DEFGENERIC ELEPHANT:GET-VALUE)
; (DEFGENERIC (SETF ELEPHANT:GET-VALUE))
; (DEFGENERIC ELEPHANT:REMOVE-KV)
; (DEFGENERIC ELEPHANT:EXISTSP)
; (METHOD ELEPHANT:OPTIMIZE-LAYOUT (T))
; (DEFGENERIC ELEPHANT:DROP-BTREE)
; ELEPHANT:MAKE-INDEXED-BTREE
; (DEFGENERIC ELEPHANT::BUILD-INDEXED-BTREE)
; (DEFCLASS ELEPHANT:INDEXED-BTREE)
; (DEFGENERIC ELEPHANT:ADD-INDEX)
; (DEFGENERIC ELEPHANT:GET-INDEX)
; (DEFGENERIC ELEPHANT:REMOVE-INDEX)
; (DEFGENERIC ELEPHANT:MAP-INDICES)
; (DEFGENERIC ELEPHANT::BUILD-BTREE-INDEX)
**++++ Error in (DEFCLASS ELEPHANT:BTREE-INDEX):
Invalid allocation type INSTANCE for slot-definition-allocation
;;;*** Warning in (METHOD
SHARED-INITIALIZE
:AFTER
(ELEPHANT:BTREE-INDEX T)): Ignoring type
declaration with illegal type ELEPHANT:BTREE-INDEX
; (METHOD SHARED-INITIALIZE :AFTER (ELEPHANT:BTREE-INDEX T))
; (DEFGENERIC ELEPHANT:GET-PRIMARY-KEY)
;;;*** Warning in (METHOD
(SETF ELEPHANT:GET-VALUE)
(T T ELEPHANT:BTREE-INDEX)): Ignoring type
declaration with illegal type ELEPHANT:BTREE-INDEX
; (METHOD (SETF ELEPHANT:GET-VALUE) (T T ELEPHANT:BTREE-INDEX))
;;;*** Warning in (METHOD ELEPHANT:REMOVE-KV (T ELEPHANT:BTREE-
INDEX)): Ignoring type declaration with illegal type ELEPHANT:BTREE-
INDEX
; (METHOD ELEPHANT:REMOVE-KV (T ELEPHANT:BTREE-INDEX))
; (DEFCLASS ELEPHANT:CURSOR)
; (DEFGENERIC ELEPHANT:MAKE-CURSOR)
; (DEFGENERIC ELEPHANT:MAKE-SIMPLE-CURSOR)
; (DEFGENERIC ELEPHANT:CURSOR-CLOSE)
; (DEFGENERIC ELEPHANT:CURSOR-DUPLICATE)
; (DEFGENERIC ELEPHANT:CURSOR-CURRENT)
; (DEFGENERIC ELEPHANT:CURSOR-FIRST)
; (DEFGENERIC ELEPHANT:CURSOR-LAST)
; (DEFGENERIC ELEPHANT:CURSOR-NEXT)
; (DEFGENERIC ELEPHANT:CURSOR-PREV)
; (DEFGENERIC ELEPHANT:CURSOR-SET)
; (DEFGENERIC ELEPHANT:CURSOR-SET-RANGE)
; (DEFGENERIC ELEPHANT:CURSOR-GET-BOTH)
; (DEFGENERIC ELEPHANT:CURSOR-GET-BOTH-RANGE)
; (DEFGENERIC ELEPHANT:CURSOR-DELETE)
; (DEFGENERIC ELEPHANT:CURSOR-PUT)
; (DEFCLASS ELEPHANT:SECONDARY-CURSOR)
; (DEFGENERIC ELEPHANT:CURSOR-PCURRENT)
; (DEFGENERIC ELEPHANT:CURSOR-PFIRST)
; (DEFGENERIC ELEPHANT:CURSOR-PLAST)
; (DEFGENERIC ELEPHANT:CURSOR-PNEXT)
; (DEFGENERIC ELEPHANT:CURSOR-PPREV)
; (DEFGENERIC ELEPHANT:CURSOR-PSET)
; (DEFGENERIC ELEPHANT:CURSOR-PSET-RANGE)
; (DEFGENERIC ELEPHANT:CURSOR-PGET-BOTH)
; (DEFGENERIC ELEPHANT:CURSOR-PGET-BOTH-RANGE)
; (DEFGENERIC ELEPHANT:CURSOR-NEXT-DUP)
; (DEFGENERIC ELEPHANT:CURSOR-NEXT-NODUP)
; (DEFGENERIC ELEPHANT:CURSOR-PNEXT-DUP)
; (DEFGENERIC ELEPHANT:CURSOR-PNEXT-NODUP)
; (DEFGENERIC ELEPHANT:CURSOR-PREV-DUP)
; (METHOD ELEPHANT:CURSOR-PREV-DUP (ELEPHANT:CURSOR))
; (DEFGENERIC ELEPHANT:CURSOR-PREV-NODUP)
; (DEFGENERIC ELEPHANT:CURSOR-PPREV-DUP)
; (METHOD ELEPHANT:CURSOR-PPREV-DUP (ELEPHANT:CURSOR))
; (DEFGENERIC ELEPHANT:CURSOR-PPREV-NODUP)
; ELEPHANT:WITH-BTREE-CURSOR
; (METHOD ELEPHANT:DROP-BTREE (ELEPHANT:BTREE))
; ELEPHANT::LISP-COMPARE<=
; ELEPHANT::LISP-COMPARE-EQUAL
; (DEFGENERIC ELEPHANT:MAP-BTREE)
;;;*** Warning in (SUBFUNCTION
2
(METHOD ELEPHANT:MAP-BTREE (T ELEPHANT:BTREE))):
Failed to find name ELEPHANT::K in declaration (DYNAMIC-EXTENT
ELEPHANT
::EXISTS?
ELEPHANT
::K
ELEPHANT
::V).
;;;*** Warning in (SUBFUNCTION
2
(METHOD ELEPHANT:MAP-BTREE (T ELEPHANT:BTREE))):
Failed to find name ELEPHANT::V in declaration (DYNAMIC-EXTENT
ELEPHANT
::EXISTS?
ELEPHANT
::K
ELEPHANT
::V).
; (METHOD ELEPHANT:MAP-BTREE (T ELEPHANT:BTREE))
; (DEFGENERIC ELEPHANT:MAP-INDEX)
;;;*** Warning in (METHOD ELEPHANT:MAP-INDEX (T ELEPHANT:BTREE-
INDEX)): Ignoring type declaration with illegal type ELEPHANT:BTREE-
INDEX
; (METHOD ELEPHANT:MAP-INDEX (T ELEPHANT:BTREE-INDEX))
; ELEPHANT::PSET-RANGE-FOR-DESCENDING
; ELEPHANT::PPREV-DUP-HACK
; (METHOD ELEPHANT:EMPTY-BTREE-P (ELEPHANT:BTREE))
; ELEPHANT::PRINT-BTREE-ENTRY
; ELEPHANT:DUMP-BTREE
; ELEPHANT::PRINT-BTREE-KEY-AND-TYPE
; ELEPHANT:BTREE-KEYS
; (METHOD ELEPHANT:BTREE-DIFFER-P (ELEPHANT:BTREE ELEPHANT:BTREE))
; (TOP-LEVEL-FORM 0)
; *** 1 error detected, no fasl file produced.
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
217BF46B> on
#<ASDF:CL-SOURCE-FILE "collections" 214E2157>.
Warning: COMPILE-FILE failed while performing #<ASDF:COMPILE-OP NIL
217BF46B> on
#<ASDF:CL-SOURCE-FILE "collections" 214E2157>.
Error: erred while invoking #<ASDF:COMPILE-OP NIL 217BF46B> on
#<ASDF:CL-SOURCE-FILE "collections" 214E2157>
1 (continue) Retry performing #<ASDF:COMPILE-OP NIL 217BF46B> on
#<ASDF:CL-SOURCE-FILE "collections" 214E2157>.
2 Continue, treating #<ASDF:COMPILE-OP NIL 217BF46B> on
#<ASDF:CL-SOURCE-FILE "collections" 214E2157> as having been
successful.
3 (abort) Return to level 0.
4 Return to top loop level 0.
Type :b for backtrace, :c <option number> to proceed, or :? for other
options
CL-USER 2 : 1 >
More information about the elephant-devel
mailing list