[elephant-devel] add-to-root problem
Slobodan Blazeski
slobodan.blazeski at gmail.com
Fri Oct 19 23:31:46 UTC 2007
On 10/19/07, Ian Eslick <eslick at csail.mit.edu> wrote:
>
> Hi All,
>
> I just integrated, tested and pushed my local patches to the main 091
> repository, including fixing all the bugs I found under Allegro due
> to missing test dependencies. The data store and migration tests are
> green on:
>
> Mac OS X 32-bit / SBCL / BDB
> Mac OS X 32-bit / Allegro 8.0 / BDB
> Mac OS X 32-bit / SBCL / BDB
> Mac OS X 32-bit / Allegro 8.0 / SQLite3
>
> Please run this over postmodern and on any other platforms to make
> sure I didn't miss anything. Slobodan, would you run this on LW on
> Windows?
FiveAM still fails to compile in LW5 for Windows.
I posted the question about FiveAM issue on LW5 but still didn't get reply.
http://thread.gmane.org/gmane.lisp.web.uncommonweb.devel/2281
Downloaded latest version from darcs to do some manual testing but I'm
unable to compile it:
Here's the interaction :
CL-USER 1 > (asdf :elephant)
; loading system definition from C:\Documents and Settings\bobi\My
Documents\Lisp Libraries\elephant\elephant.asd into
; #<The ASDF0 package, 0/16 internal, 0/16 external>
; Loading text file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\elephant.asd
; registering #<SYSTEM ELEPHANT 21C37D17> as ELEPHANT
;; Creating system COMMON-LISP-USER::ELEPHANT->SRC->UTILS
;; Creating system COMMON-LISP-USER::ELEPHANT->SRC->MEMUTIL
;; Creating system COMMON-LISP-USER::ELEPHANT->SRC->ELEPHANT
;; Creating system COMMON-LISP-USER::ELEPHANT->SRC
;; Creating system COMMON-LISP-USER::ELEPHANT
; loading system definition from C:\Documents and Settings\bobi\My
Documents\Lisp Libraries\cl-base64-3.3.2\cl-base64.asd
; into #<The ASDF0 package, 0/16 internal, 0/16 external>
; Loading text file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\cl-base64-3.3.2\cl-base64.asd
; registering #<SYSTEM CL-BASE64 21C3DDD3> as CL-BASE64
;; Creating system COMMON-LISP-USER::CL-BASE64
; registering #<SYSTEM CL-BASE64-TESTS 21C2DC97> as CL-BASE64-TESTS
;; Creating system COMMON-LISP-USER::CL-BASE64-TESTS
; loading system definition from C:\Documents and Settings\bobi\My
Documents\Lisp Libraries\uffi-1.6.0\uffi.asd into
; #<The ASDF0 package, 0/16 internal, 0/16 external>
; Loading text file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\uffi.asd
; registering #<SYSTEM UFFI 21BB6E53> as UFFI
;; Creating system COMMON-LISP-USER::UFFI->SRC
;; Creating system COMMON-LISP-USER::UFFI
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (DEFPACKAGE "UFFI")
; (TOP-LEVEL-FORM 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\package.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
; (TOP-LEVEL-FORM 4)
; UFFI::BASIC-CONVERT-FROM-UFFI-TYPE
; UFFI::%CONVERT-FROM-UFFI-TYPE
; UFFI::CONVERT-FROM-UFFI-TYPE
; (TOP-LEVEL-FORM 5)
; (TOP-LEVEL-FORM 6)
; UFFI::MAKE-LISP-NAME
; (TOP-LEVEL-FORM 7)
; (TOP-LEVEL-FORM 8)
; (TOP-LEVEL-FORM 9)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\primitives.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\functions.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\aggregates.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\objects.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (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 3)
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (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 3)
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; UFFI:GETENV
; UFFI:RUN-SHELL-COMMAND
; (TOP-LEVEL-FORM 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\strings.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\libraries.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\os.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (DEFPACKAGE "UFFI")
; (TOP-LEVEL-FORM 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\package.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
; (TOP-LEVEL-FORM 4)
; UFFI::BASIC-CONVERT-FROM-UFFI-TYPE
; UFFI::%CONVERT-FROM-UFFI-TYPE
; UFFI::CONVERT-FROM-UFFI-TYPE
; (TOP-LEVEL-FORM 5)
; (TOP-LEVEL-FORM 6)
; UFFI::MAKE-LISP-NAME
; (TOP-LEVEL-FORM 7)
; (TOP-LEVEL-FORM 8)
; (TOP-LEVEL-FORM 9)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\primitives.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\functions.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\aggregates.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\objects.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (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 3)
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (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 3)
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; UFFI:GETENV
; UFFI:RUN-SHELL-COMMAND
; (TOP-LEVEL-FORM 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\strings.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\libraries.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\uffi-1.6.0\src\os.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\cl-base64-3.3.2\package.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\cl-base64-3.3.2\encode.ofasl
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\cl-base64-3.3.2\decode.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (DEFPACKAGE "ELEPHANT-UTILS")
; (TOP-LEVEL-FORM 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\utils\package.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\utils\convenience.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\utils\locks.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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 3)
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
2161666F> on #<ASDF:CL-SOURCE-FILE "os" 2160ED7B>.
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\utils\os.ofasl
Attempting to load libmemutil.dll...
Loaded C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\libmemutil.dll
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (DEFPACKAGE "ELEPHANT-MEMUTIL")
; (TOP-LEVEL-FORM 2)
;;;*** Warning in (DEFTYPE ELEPHANT-MEMUTIL:POINTER-INT): (DEFTYPE
ELEPHANT-MEMUTIL:POINTER-INT) defined more than once in C:\Documents and
Settings\bobi\My Documents\Lisp Libraries\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 C:\Documents and
Settings\bobi\My Documents\Lisp Libraries\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
C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 3)
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
2161666F> on
#<ASDF:CL-SOURCE-FILE "memutil" 2160F93F>.
Warning: COMPILE-FILE failed while performing #<ASDF:COMPILE-OP NIL
2161666F> on
#<ASDF:CL-SOURCE-FILE "memutil" 2160F93F>.
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\memutil\memutil.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (DEFPACKAGE "ELEPHANT")
; (TOP-LEVEL-FORM 3)
; (DEFPACKAGE "ELEPHANT-USER")
; (TOP-LEVEL-FORM 4)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\package.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (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 3)
; (TOP-LEVEL-FORM 4)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\variables.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (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 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\transactions.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (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 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\metaclasses.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (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 3)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\classes.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; 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::REMCACHE
; ELEPHANT::SETF-CACHE
; (DEFSETF ELEPHANT::GET-CACHE)
; (TOP-LEVEL-FORM 3)
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
2161666F> on #<ASDF:CL-SOURCE-FILE "cache" 215DD237>.
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\cache.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; ELEPHANT::SERIALIZE
; ELEPHANT::DESERIALIZE
; (SUBFUNCTION (DEFCLASS ELEPHANT:ELEPHANT-DESERIALIZATION-ERROR)
(DEFINE-CONDITION ELEPHANT:ELEPHANT-DESERIALIZATION-ERROR))
; (DEFINE-CONDITION ELEPHANT:ELEPHANT-DESERIALIZATION-ERROR)
; (SUBFUNCTION (DEFCLASS ELEPHANT:ELEPHANT-TYPE-DESERIALIZATION-ERROR)
(DEFINE-CONDITION ELEPHANT:ELEPHANT-TYPE-DESERIALIZATION-ERROR))
; (DEFINE-CONDITION ELEPHANT:ELEPHANT-TYPE-DESERIALIZATION-ERROR)
; (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 3)
; (DEFVAR ELEPHANT::ARRAY-TYPE-TO-BYTE)
; (DEFVAR ELEPHANT::BYTE-TO-ARRAY-TYPE)
; (TOP-LEVEL-FORM 4)
; (TOP-LEVEL-FORM 5)
; (TOP-LEVEL-FORM 6)
; (TOP-LEVEL-FORM 7)
; (TOP-LEVEL-FORM 8)
; (TOP-LEVEL-FORM 9)
; (TOP-LEVEL-FORM 10)
; (TOP-LEVEL-FORM 11)
; (TOP-LEVEL-FORM 12)
; ELEPHANT::TYPE=
; (TOP-LEVEL-FORM 13)
; (TOP-LEVEL-FORM 14)
; ELEPHANT::ARRAY-TYPE-FROM-BYTE
; ELEPHANT::BYTE-FROM-ARRAY-TYPE
; ELEPHANT::INT-BYTE-SPEC
; (TOP-LEVEL-FORM 15)
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\serializer.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (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))
; (METHOD ELEPHANT::CACHE-INSTANCE (ELEPHANT:STORE-CONTROLLER T))
; (METHOD ELEPHANT::GET-CACHED-INSTANCE (ELEPHANT:STORE-CONTROLLER T T))
; (METHOD ELEPHANT::UNCACHE-INSTANCE (ELEPHANT:STORE-CONTROLLER T))
; (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 3)
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
21CDCEC3> on
#<ASDF:CL-SOURCE-FILE "controller" 21C9AD63>.
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\controller.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\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 1)
; (TOP-LEVEL-FORM 2)
; (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)
; (DEFCLASS ELEPHANT:BTREE-INDEX)
; (METHOD SHARED-INITIALIZE :AFTER (ELEPHANT:BTREE-INDEX T))
; (DEFGENERIC ELEPHANT:GET-PRIMARY-KEY)
; (METHOD (SETF ELEPHANT:GET-VALUE) (T T 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)
; (DEFCLASS ELEPHANT:SECONDARY-CURSOR)
; (DEFGENERIC ELEPHANT:CURSOR-GET-BOTH)
; (DEFGENERIC ELEPHANT:CURSOR-GET-BOTH-RANGE)
; (DEFGENERIC ELEPHANT:CURSOR-DELETE)
; (DEFGENERIC ELEPHANT:CURSOR-PUT)
; (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<
; 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)
; (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 3)
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
21CDCEC3> on
#<ASDF:CL-SOURCE-FILE "collections" 21C9AAA3>.
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\collections.ofasl
;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\pset.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 1)
; (TOP-LEVEL-FORM 2)
; (DEFCLASS ELEPHANT:PSET)
; (DEFGENERIC ELEPHANT:INSERT-ITEM)
; (DEFGENERIC ELEPHANT:REMOVE-ITEM)
; (DEFGENERIC ELEPHANT:MAP-PSET)
; (DEFGENERIC ELEPHANT:FIND-ITEM)
; (DEFGENERIC ELEPHANT:PSET-LIST)
; (DEFGENERIC ELEPHANT::BUILD-PSET)
; (DEFGENERIC ELEPHANT:DROP-PSET)
; (DEFCLASS ELEPHANT::DEFAULT-PSET)
; (METHOD ELEPHANT::BUILD-PSET (ELEPHANT:STORE-CONTROLLER))
; ELEPHANT:MAKE-PSET
; (METHOD ELEPHANT:INSERT-ITEM (T ELEPHANT::DEFAULT-PSET))
; (METHOD ELEPHANT:REMOVE-ITEM (T ELEPHANT::DEFAULT-PSET))
; (METHOD ELEPHANT:FIND-ITEM (T ELEPHANT::DEFAULT-PSET))
; (METHOD ELEPHANT:MAP-PSET (T ELEPHANT::DEFAULT-PSET))
;;;*** Warning in (METHOD ELEPHANT:PSET-LIST (ELEPHANT::DEFAULT-PSET)):
Failed to find name ELEPHANT::COLLECT in declaration (DYNAMIC-EXTENT
ELEPHANT::COLLECT).
; (METHOD ELEPHANT:PSET-LIST (ELEPHANT::DEFAULT-PSET))
; (METHOD ELEPHANT:DROP-PSET (ELEPHANT::DEFAULT-PSET))
; (TOP-LEVEL-FORM 3)
Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL
21CDCEC3> on #<ASDF:CL-SOURCE-FILE "pset" 21C9A7BF>.
; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\pset.ofasl
Error: Undefined function SET-DB-SYNCH called with arguments
(#<PERSISTENT-METACLASS DEFAULT-PSET 200A61D7> :CLASS).
1 (continue) Try invoking SET-DB-SYNCH again.
2 Return some values from the call to SET-DB-SYNCH.
3 Try invoking something other than SET-DB-SYNCH with the same arguments.
4 Set the symbol-function of SET-DB-SYNCH to another function.
5 Try loading C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\pset.ofasl again.
6 Give up loading C:\Documents and Settings\bobi\My Documents\Lisp
Libraries\elephant\src\elephant\pset.ofasl.
7 Try loading another file instead of C:\Documents and Settings\bobi\My
Documents\Lisp Libraries\elephant\src\elephant\pset.ofasl.
8 Retry performing #<ASDF:LOAD-OP NIL 21D39C8B> on #<ASDF:CL-SOURCE-FILE
"pset" 21C9A7BF>.
9 Continue, treating #<ASDF:LOAD-OP NIL 21D39C8B> on
#<ASDF:CL-SOURCE-FILE "pset" 21C9A7BF> as having been successful.
10 (abort) Return to level 0.
11 Return to top loop level 0.
Type :b for backtrace, :c <option number> to proceed, or :? for other
options
ELEPHANT 2 : 1 > :b
Call to (METHOD REINITIALIZE-INSTANCE :AROUND (PERSISTENT-METACLASS))
Call to CLOS::METHOD-COMBINATION-TEMPLATE
Call to CLOS::ENSURE-CLASS-USING-CLASS-INTERNAL
Call to CLOS::ENSURE-CLASS-WITHOUT-LOD
Call to (HARLEQUIN-COMMON-LISP:SUBFUNCTION 1 LOAD)
Call to LOAD
Call to (METHOD ASDF:PERFORM (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE))
Call to CLOS::METHOD-COMBINATION-TEMPLATE
Call to CLOS::CALL-NEXT-METHOD-WITH-ARGS
Interpreted call to CALL-NEXT-METHOD
Interpreted call to (METHOD ASDF:PERFORM :AROUND (ASDF:LOAD-OP
ASDF:CL-SOURCE-FILE))
Call to CLOS::METHOD-COMBINATION-TEMPLATE
Call to (HARLEQUIN-COMMON-LISP:SUBFUNCTION 1 ASDF:OPERATE)
Call to ASDF:OPERATE
Call to ASDF:OOS
Interpreted call to COMMON-LISP-USER::ASDF
Call to EVAL
Call to CAPI::CAPI-TOP-LEVEL-FUNCTION
Call to CAPI::INTERACTIVE-PANE-TOP-LOOP
Call to (HARLEQUIN-COMMON-LISP:SUBFUNCTION MP::PROCESS-SG-FUNCTION
MP::INITIALIZE-PROCESS-STACK)
Slobodan
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/elephant-devel/attachments/20071019/420e1c6b/attachment.html>
More information about the elephant-devel
mailing list