<br><br><div><span class="gmail_quote">On 10/19/07, <b class="gmail_sendername">Ian Eslick</b> <<a href="mailto:eslick@csail.mit.edu">eslick@csail.mit.edu</a>> wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">

Hi All,<br><br>I just integrated, tested and pushed my local patches to the main 091<br>repository, including fixing all the bugs I found under Allegro due<br>to missing test dependencies.  The data store and migration tests are

<br>green on:<br><br>Mac OS X 32-bit / SBCL / BDB<br>Mac OS X 32-bit / Allegro 8.0 / BDB<br>Mac OS X 32-bit / SBCL / BDB<br>Mac OS X 32-bit / Allegro 8.0 / SQLite3<br><br>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?</blockquote><div>FiveAM still fails to compile in LW5 for Windows. I posted the question about FiveAM issue on LW5 but still didn't get reply.

<br><a href="http://thread.gmane.org/gmane.lisp.web.uncommonweb.devel/2281">http://thread.gmane.org/gmane.lisp.web.uncommonweb.devel/2281</a><br><br></div></div>Downloaded latest version from darcs to do some manual testing but I'm unable to compile it:

<br>Here's the interaction :<br>CL-USER 1 > (asdf :elephant)<br>; loading system definition from C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\elephant.asd into<br>; #<The ASDF0 package, 0/16 internal, 0/16 external>

<br>; Loading text file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\elephant.asd<br>; registering #<SYSTEM ELEPHANT 21C37D17> as ELEPHANT<br>;; Creating system COMMON-LISP-USER::ELEPHANT->SRC->UTILS

<br>;; Creating system COMMON-LISP-USER::ELEPHANT->SRC->MEMUTIL<br>;; Creating system COMMON-LISP-USER::ELEPHANT->SRC->ELEPHANT<br>;; Creating system COMMON-LISP-USER::ELEPHANT->SRC<br>;; Creating system COMMON-LISP-USER::ELEPHANT

<br>; loading system definition from C:\Documents and Settings\bobi\My Documents\Lisp Libraries\cl-base64-3.3.2\cl-base64.asd<br>; into #<The ASDF0 package, 0/16 internal, 0/16 external><br>; Loading text file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\cl-

base64-3.3.2\cl-base64.asd<br>; registering #<SYSTEM CL-BASE64 21C3DDD3> as CL-BASE64<br>;; Creating system COMMON-LISP-USER::CL-BASE64<br>; registering #<SYSTEM CL-BASE64-TESTS 21C2DC97> as CL-BASE64-TESTS<br>

;; Creating system COMMON-LISP-USER::CL-BASE64-TESTS<br>; loading system definition from C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\uffi.asd into<br>; #<The ASDF0 package, 0/16 internal, 0/16 external>

<br>; Loading text file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\uffi.asd<br>; registering #<SYSTEM UFFI 21BB6E53> as UFFI<br>;; Creating system COMMON-LISP-USER::UFFI->SRC<br>;; Creating system COMMON-LISP-USER::UFFI

<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\package.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFPACKAGE "UFFI")<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\package.ofasl<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\primitives.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; UFFI:DEF-CONSTANT<br>; UFFI:DEF-TYPE<br>; UFFI:NULL-CHAR-P<br>

; UFFI:DEF-FOREIGN-TYPE<br>; (DEFVAR UFFI::+TYPE-CONVERSION-HASH+)<br>; (DEFVAR UFFI::*TYPE-CONVERSION-LIST*)<br>; (TOP-LEVEL-FORM 3)<br>; (TOP-LEVEL-FORM 4)<br>; UFFI::BASIC-CONVERT-FROM-UFFI-TYPE<br>; UFFI::%CONVERT-FROM-UFFI-TYPE

<br>; UFFI::CONVERT-FROM-UFFI-TYPE<br>; (TOP-LEVEL-FORM 5)<br>; (TOP-LEVEL-FORM 6)<br>; UFFI::MAKE-LISP-NAME<br>; (TOP-LEVEL-FORM 7)<br>; (TOP-LEVEL-FORM 8)<br>; (TOP-LEVEL-FORM 9)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\primitives.ofasl<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\objects.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; UFFI:SIZE-OF-FOREIGN-TYPE<br>; UFFI:ALLOCATE-FOREIGN-OBJECT<br>

; UFFI:FREE-FOREIGN-OBJECT<br>; UFFI:NULL-POINTER-P<br>; UFFI:MAKE-NULL-POINTER<br>; UFFI:MAKE-POINTER<br>; UFFI:CHAR-ARRAY-TO-POINTER<br>; UFFI:DEREF-POINTER<br>; UFFI:ENSURE-CHAR-CHARACTER<br>; UFFI:ENSURE-CHAR-INTEGER<br>

; UFFI:ENSURE-CHAR-STORABLE<br>; UFFI:POINTER-ADDRESS<br>; UFFI:WITH-FOREIGN-OBJECT<br>; UFFI:WITH-FOREIGN-OBJECTS<br>; UFFI:WITH-CAST-POINTER<br>; UFFI:DEF-FOREIGN-VAR<br>; UFFI:DEF-POINTER-VAR<br>; (TOP-LEVEL-FORM 3)<br>

;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\aggregates.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; UFFI:DEF-ENUM<br>; UFFI:DEF-ARRAY-POINTER<br>; UFFI::PROCESS-STRUCT-FIELDS

<br>; UFFI:DEF-STRUCT<br>; UFFI:GET-SLOT-VALUE<br>; UFFI:GET-SLOT-POINTER<br>; UFFI:DEREF-ARRAY<br>; UFFI:DEF-UNION<br>; UFFI:CONVERT-FROM-FOREIGN-USB8<br>; (TOP-LEVEL-FORM 3)<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\functions.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on 

<br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; UFFI::PROCESS-FUNCTION-ARGS<br>; UFFI::PROCESS-ONE-FUNCTION-ARG<br>; UFFI::ALLEGRO-CONVERT-RETURN-TYPE<br>; UFFI::FUNCALLABLE-LAMBDA-LIST

<br>; UFFI::CONVERT-LISPWORKS-ARGS<br>; UFFI::PREPROCESS-NAMES<br>; UFFI::PREPROCESS-ARGS<br>; UFFI:DEF-FUNCTION<br>; UFFI::%DEF-FUNCTION<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\functions.ofasl<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\aggregates.ofasl<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\objects.ofasl<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\strings.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFVAR UFFI:+NULL-CSTRING-POINTER+)<br>; UFFI:CONVERT-FROM-CSTRING

<br>; UFFI:CONVERT-TO-CSTRING<br>; UFFI:FREE-CSTRING<br>; UFFI:WITH-CSTRING<br>; UFFI:WITH-CSTRINGS<br>; UFFI:CONVERT-TO-FOREIGN-STRING<br>; UFFI:CONVERT-FROM-FOREIGN-STRING<br>; UFFI:ALLOCATE-FOREIGN-STRING<br>; UFFI:FOREIGN-STRING-LENGTH

<br>; UFFI:WITH-FOREIGN-STRING<br>; UFFI:WITH-FOREIGN-STRINGS<br>; (SUBFUNCTION UFFI::STRLEN (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN))<br>; (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN)<br>; (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN)

<br>; (DEFTYPE UFFI::CHAR-PTR-DEF)<br>; UFFI::FAST-NATIVE-TO-STRING<br>; (TOP-LEVEL-FORM 3)<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\libraries.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0

<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFVAR UFFI::*LOADED-LIBRARIES*)

<br>; UFFI:DEFAULT-FOREIGN-LIBRARY-TYPE<br>; UFFI:FOREIGN-LIBRARY-TYPES<br>; UFFI:FIND-FOREIGN-LIBRARY<br>; UFFI:LOAD-FOREIGN-LIBRARY<br>; UFFI::CONVERT-SUPPORTING-LIBRARIES-TO-STRING<br>; (TOP-LEVEL-FORM 3)<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\os.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on 

<br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; UFFI:GETENV<br>; UFFI:RUN-SHELL-COMMAND<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\strings.ofasl<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\libraries.ofasl<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\os.ofasl<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\package.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFPACKAGE "UFFI")<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\package.ofasl<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\primitives.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; UFFI:DEF-CONSTANT<br>; UFFI:DEF-TYPE<br>; UFFI:NULL-CHAR-P<br>

; UFFI:DEF-FOREIGN-TYPE<br>; (DEFVAR UFFI::+TYPE-CONVERSION-HASH+)<br>; (DEFVAR UFFI::*TYPE-CONVERSION-LIST*)<br>; (TOP-LEVEL-FORM 3)<br>; (TOP-LEVEL-FORM 4)<br>; UFFI::BASIC-CONVERT-FROM-UFFI-TYPE<br>; UFFI::%CONVERT-FROM-UFFI-TYPE

<br>; UFFI::CONVERT-FROM-UFFI-TYPE<br>; (TOP-LEVEL-FORM 5)<br>; (TOP-LEVEL-FORM 6)<br>; UFFI::MAKE-LISP-NAME<br>; (TOP-LEVEL-FORM 7)<br>; (TOP-LEVEL-FORM 8)<br>; (TOP-LEVEL-FORM 9)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\primitives.ofasl<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\objects.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; UFFI:SIZE-OF-FOREIGN-TYPE<br>; UFFI:ALLOCATE-FOREIGN-OBJECT<br>

; UFFI:FREE-FOREIGN-OBJECT<br>; UFFI:NULL-POINTER-P<br>; UFFI:MAKE-NULL-POINTER<br>; UFFI:MAKE-POINTER<br>; UFFI:CHAR-ARRAY-TO-POINTER<br>; UFFI:DEREF-POINTER<br>; UFFI:ENSURE-CHAR-CHARACTER<br>; UFFI:ENSURE-CHAR-INTEGER<br>

; UFFI:ENSURE-CHAR-STORABLE<br>; UFFI:POINTER-ADDRESS<br>; UFFI:WITH-FOREIGN-OBJECT<br>; UFFI:WITH-FOREIGN-OBJECTS<br>; UFFI:WITH-CAST-POINTER<br>; UFFI:DEF-FOREIGN-VAR<br>; UFFI:DEF-POINTER-VAR<br>; (TOP-LEVEL-FORM 3)<br>

;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\aggregates.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; UFFI:DEF-ENUM<br>; UFFI:DEF-ARRAY-POINTER<br>; UFFI::PROCESS-STRUCT-FIELDS

<br>; UFFI:DEF-STRUCT<br>; UFFI:GET-SLOT-VALUE<br>; UFFI:GET-SLOT-POINTER<br>; UFFI:DEREF-ARRAY<br>; UFFI:DEF-UNION<br>; UFFI:CONVERT-FROM-FOREIGN-USB8<br>; (TOP-LEVEL-FORM 3)<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\functions.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on 

<br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; UFFI::PROCESS-FUNCTION-ARGS<br>; UFFI::PROCESS-ONE-FUNCTION-ARG<br>; UFFI::ALLEGRO-CONVERT-RETURN-TYPE<br>; UFFI::FUNCALLABLE-LAMBDA-LIST

<br>; UFFI::CONVERT-LISPWORKS-ARGS<br>; UFFI::PREPROCESS-NAMES<br>; UFFI::PREPROCESS-ARGS<br>; UFFI:DEF-FUNCTION<br>; UFFI::%DEF-FUNCTION<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\functions.ofasl<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\aggregates.ofasl<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\objects.ofasl<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\strings.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFVAR UFFI:+NULL-CSTRING-POINTER+)<br>; UFFI:CONVERT-FROM-CSTRING

<br>; UFFI:CONVERT-TO-CSTRING<br>; UFFI:FREE-CSTRING<br>; UFFI:WITH-CSTRING<br>; UFFI:WITH-CSTRINGS<br>; UFFI:CONVERT-TO-FOREIGN-STRING<br>; UFFI:CONVERT-FROM-FOREIGN-STRING<br>; UFFI:ALLOCATE-FOREIGN-STRING<br>; UFFI:FOREIGN-STRING-LENGTH

<br>; UFFI:WITH-FOREIGN-STRING<br>; UFFI:WITH-FOREIGN-STRINGS<br>; (SUBFUNCTION UFFI::STRLEN (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN))<br>; (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN)<br>; (FLI:DEFINE-FOREIGN-FUNCTION UFFI::STRLEN)

<br>; (DEFTYPE UFFI::CHAR-PTR-DEF)<br>; UFFI::FAST-NATIVE-TO-STRING<br>; (TOP-LEVEL-FORM 3)<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\libraries.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0

<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFVAR UFFI::*LOADED-LIBRARIES*)

<br>; UFFI:DEFAULT-FOREIGN-LIBRARY-TYPE<br>; UFFI:FOREIGN-LIBRARY-TYPES<br>; UFFI:FIND-FOREIGN-LIBRARY<br>; UFFI:LOAD-FOREIGN-LIBRARY<br>; UFFI::CONVERT-SUPPORTING-LIBRARIES-TO-STRING<br>; (TOP-LEVEL-FORM 3)<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\os.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on 

<br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; UFFI:GETENV<br>; UFFI:RUN-SHELL-COMMAND<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\strings.ofasl<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-1.6.0\src\libraries.ofasl<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\uffi-

1.6.0\src\os.ofasl<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\cl-base64-3.3.2\package.ofasl<br>; 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 ...

<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on

<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFPACKAGE "ELEPHANT-UTILS")<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\utils\package.ofasl

<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\utils\convenience.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; ELEPHANT-UTILS:WITH-GENSYMS<br>; ELEPHANT-UTILS:DO-SUBSETS<br>

; ELEPHANT-UTILS:SUBSETS<br>; ELEPHANT-UTILS:REMOVE-KEYWORDS<br>; ELEPHANT-UTILS::CONCAT-SEPARATED-STRINGS<br>; ELEPHANT-UTILS::APPEND-SUBLISTS<br>; ELEPHANT-UTILS:IFRET<br>; ELEPHANT-UTILS:AIF<br>; ELEPHANT-UTILS:AWHEN<br>

; ELEPHANT-UTILS:MKLIST<br>; ELEPHANT-UTILS:REMOVE-INDEXED-ELEMENT-AND-ADJUST<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\utils\convenience.ofasl<br>

;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\utils\locks.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; ELEPHANT-UTILS:ELE-MAKE-LOCK<br>; ELEPHANT-UTILS:ELE-WITH-LOCK

<br>; ELEPHANT-UTILS:ELE-MAKE-FAST-LOCK<br>; ELEPHANT-UTILS:ELE-WITH-FAST-LOCK<br>; ELEPHANT-UTILS:ELE-THREAD-HASH-KEY<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\utils\locks.ofasl

<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\utils\os.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; ELEPHANT-UTILS::IN-DIRECTORY<br>; 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>.

<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\utils\os.ofasl<br>Attempting to load libmemutil.dll...<br>Loaded C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\libmemutil.dll

<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\memutil\memutil.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; 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.

<br>; (DEFTYPE ELEPHANT-MEMUTIL:ARRAY-OR-POINTER-CHAR)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::COPY-BUFS (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-BUFS))<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-BUFS)

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-BUFS)<br>; (DEFVAR ELEPHANT-MEMUTIL:+NULL-VOID+)<br>; (DEFVAR ELEPHANT-MEMUTIL:+NULL-CHAR+)<br>; (DEFVAR ELEPHANT-MEMUTIL::*BUFFER-STREAMS*)<br>; (DEFVAR ELEPHANT-MEMUTIL::*BUFFER-STREAMS-LOCK*)

<br>; (SUBFUNCTION (DEFSETF ELEPHANT-MEMUTIL:BUFFER-STREAM-LENGTH) (DEFSTRUCT ELEPHANT-MEMUTIL:BUFFER-STREAM))<br>; (SUBFUNCTION (DEFSETF ELEPHANT-MEMUTIL::BUFFER-STREAM-POSITION) (DEFSTRUCT ELEPHANT-MEMUTIL:BUFFER-STREAM))

<br>; (SUBFUNCTION (DEFSETF ELEPHANT-MEMUTIL:BUFFER-STREAM-SIZE) (DEFSTRUCT ELEPHANT-MEMUTIL:BUFFER-STREAM))<br>; (SUBFUNCTION (DEFSETF ELEPHANT-MEMUTIL:BUFFER-STREAM-BUFFER) (DEFSTRUCT ELEPHANT-MEMUTIL:BUFFER-STREAM))<br>

; (SUBFUNCTION ELEPHANT-MEMUTIL:MAKE-BUFFER-STREAM (DEFSTRUCT ELEPHANT-MEMUTIL:BUFFER-STREAM))<br>; ELEPHANT-MEMUTIL::GRAB-BUFFER-STREAM<br>;;;*** Warning in ELEPHANT-MEMUTIL::RETURN-BUFFER-STREAM: Inline expansion for ELEPHANT-MEMUTIL:RESET-BUFFER-STREAM not found

<br>;;;*** Warning in ELEPHANT-MEMUTIL::RETURN-BUFFER-STREAM: Inline expansion for ELEPHANT-MEMUTIL:RESET-BUFFER-STREAM not found<br>; ELEPHANT-MEMUTIL::RETURN-BUFFER-STREAM<br>; ELEPHANT-MEMUTIL:WITH-BUFFER-STREAMS<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::READ-INT32 (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT32))

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT32)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT32)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::READ-UINT32 (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT32))

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT32)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT32)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::READ-INT64 (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT64))

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT64)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-INT64)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::READ-UINT64 (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT64))

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT64)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-UINT64)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::READ-FLOAT (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-FLOAT))

<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::READ-FLOAT (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-FLOAT))<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-FLOAT)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-FLOAT)

<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::READ-DOUBLE (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-DOUBLE))<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::READ-DOUBLE (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-DOUBLE))<br>

; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-DOUBLE)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::READ-DOUBLE)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::WRITE-INT32 (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT32))

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT32)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT32)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::WRITE-UINT32 (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT32))

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT32)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT32)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::WRITE-INT64 (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT64))

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT64)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-INT64)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::WRITE-UINT64 (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT64))

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT64)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-UINT64)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::WRITE-FLOAT (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-FLOAT))

<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::WRITE-FLOAT (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-FLOAT))<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-FLOAT)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-FLOAT)

<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::WRITE-DOUBLE (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-DOUBLE))<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::WRITE-DOUBLE (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-DOUBLE))

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-DOUBLE)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::WRITE-DOUBLE)<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER))

<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER))<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::OFFSET-CHAR-POINTER)

<br>; ELEPHANT-MEMUTIL:BYTE-LENGTH<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::COPY-STR-TO-BUF (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-STR-TO-BUF))<br>; (SUBFUNCTION ELEPHANT-MEMUTIL::COPY-STR-TO-BUF (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-STR-TO-BUF))

<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-STR-TO-BUF)<br>; (FLI:DEFINE-FOREIGN-FUNCTION ELEPHANT-MEMUTIL::COPY-STR-TO-BUF)<br>; ELEPHANT-MEMUTIL::PROCESS-STRUCT-SLOT-DEFS<br>; ELEPHANT-MEMUTIL::WITH-STRUCT-SLOTS

<br>;;;*** Warning in ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM: Inline expansion for ELEPHANT-MEMUTIL::COPY-BUFS not found<br>;;;*** Warning in ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM: Inline expansion for ELEPHANT-MEMUTIL::COPY-BUFS not found

<br>;;;*** Warning in ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM: Inline expansion for ELEPHANT-MEMUTIL::COPY-BUFS not found<br>; ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM<br>;;;*** Warning in ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM-NO-COPY: symbol-macro SIZE is bound but not referenced

<br>; ELEPHANT-MEMUTIL:RESIZE-BUFFER-STREAM-NO-COPY<br>; ELEPHANT-MEMUTIL:RESET-BUFFER-STREAM<br>; ELEPHANT-MEMUTIL:RESET-BUFFER-STREAM<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-BYTE<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-BYTE<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-INT32

<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-INT32<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-UINT32<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-UINT32<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-INT64<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-INT64<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-UINT64

<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-UINT64<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-FLOAT<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-FLOAT<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-DOUBLE<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-DOUBLE<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-STRING

<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-STRING<br>; ELEPHANT-MEMUTIL:BUFFER-READ-BYTE<br>; ELEPHANT-MEMUTIL:BUFFER-READ-BYTE<br>; ELEPHANT-MEMUTIL::BUFFER-READ-BYTE-VECTOR<br>; ELEPHANT-MEMUTIL::BUFFER-WRITE-BYTE-VECTOR<br>; ELEPHANT-MEMUTIL:BUFFER-READ-TO-ARRAY-OFFSET

<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-FROM-ARRAY-OFFSET<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-OID<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-OID<br>; ELEPHANT-MEMUTIL:BUFFER-READ-OID<br>; ELEPHANT-MEMUTIL:BUFFER-READ-OID<br>;;;*** Warning in ELEPHANT-MEMUTIL:BUFFER-READ-INT: Inline expansion for ELEPHANT-MEMUTIL:BUFFER-READ-INT32 not found

<br>;;;*** Warning in ELEPHANT-MEMUTIL:BUFFER-READ-INT: Inline expansion for ELEPHANT-MEMUTIL:BUFFER-READ-INT32 not found<br>; ELEPHANT-MEMUTIL:BUFFER-READ-INT<br>; ELEPHANT-MEMUTIL:BUFFER-READ-FIXNUM<br>; ELEPHANT-MEMUTIL:BUFFER-READ-FIXNUM

<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-INT<br>;;;*** Warning in ELEPHANT-MEMUTIL:BUFFER-READ-UINT: Inline expansion for ELEPHANT-MEMUTIL:BUFFER-READ-UINT32 not found<br>;;;*** Warning in ELEPHANT-MEMUTIL:BUFFER-READ-UINT: Inline expansion for ELEPHANT-MEMUTIL:BUFFER-READ-UINT32 not found

<br>; ELEPHANT-MEMUTIL:BUFFER-READ-UINT<br>; ELEPHANT-MEMUTIL:BUFFER-WRITE-UINT<br>; (DEFCONSTANT ELEPHANT-MEMUTIL::+2^32+)<br>; (DEFCONSTANT ELEPHANT-MEMUTIL::+2^64+)<br>; ELEPHANT-MEMUTIL:BUFFER-READ-FIXNUM32<br>; ELEPHANT-MEMUTIL:BUFFER-READ-INT32

<br>; ELEPHANT-MEMUTIL:BUFFER-READ-INT32<br>; ELEPHANT-MEMUTIL:BUFFER-READ-UINT32<br>; ELEPHANT-MEMUTIL:BUFFER-READ-UINT32<br>; ELEPHANT-MEMUTIL:BUFFER-READ-FIXNUM64<br>; ELEPHANT-MEMUTIL:BUFFER-READ-INT64<br>; ELEPHANT-MEMUTIL:BUFFER-READ-INT64

<br>; ELEPHANT-MEMUTIL:BUFFER-READ-UINT64<br>; ELEPHANT-MEMUTIL:BUFFER-READ-UINT64<br>; ELEPHANT-MEMUTIL:BUFFER-READ-FLOAT<br>; ELEPHANT-MEMUTIL:BUFFER-READ-FLOAT<br>; ELEPHANT-MEMUTIL:BUFFER-READ-DOUBLE<br>; ELEPHANT-MEMUTIL:BUFFER-READ-DOUBLE

<br>; ELEPHANT-MEMUTIL:BUFFER-READ-UCS1-STRING<br>; ELEPHANT-MEMUTIL:BUFFER-READ-UCS1-STRING<br>; ELEPHANT-MEMUTIL:BUFFER-READ-UCS2-STRING<br>; ELEPHANT-MEMUTIL:BUFFER-READ-UCS2-STRING<br>; (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>.

<br>Warning: COMPILE-FILE failed while performing #<ASDF:COMPILE-OP NIL 2161666F> on<br>         #<ASDF:CL-SOURCE-FILE "memutil" 2160F93F>.<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\memutil\memutil.ofasl

<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\elephant\package.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFPACKAGE "ELEPHANT")<br>; (TOP-LEVEL-FORM 3)<br>; (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 ...

<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on

<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFVAR ELEPHANT::*ELEPHANT-CODE-VERSION*)<br>; (DEFVAR ELEPHANT::*ELEPHANT-UNMARKED-CODE-VERSION*)<br>; (DEFVAR ELEPHANT::*ELEPHANT-PROPERTIES-LABEL*)<br>; (DEFVAR ELEPHANT::*USER-CONFIGURABLE-PARAMETERS*)

<br>; (DEFVAR ELEPHANT::*CIRCULARITY-INITIAL-HASH-SIZE*)<br>; (DEFPARAMETER ELEPHANT::*MAP-USING-DEGREE2*)<br>; (DEFVAR ELEPHANT::*BERKELEY-DB-CACHESIZE*)<br>; (DEFVAR ELEPHANT:*STORE-CONTROLLER*)<br>; (DEFVAR ELEPHANT::*CURRENT-TRANSACTION*)

<br>; (DEFVAR ELEPHANT::*WARN-ON-MANUAL-CLASS-FINALIZATION*)<br>; (TOP-LEVEL-FORM 3)<br>; (TOP-LEVEL-FORM 4)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\elephant\variables.ofasl

<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\elephant\transactions.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFGENERIC ELEPHANT::EXECUTE-TRANSACTION)<br>; ELEPHANT::MAKE-TRANSACTION-RECORD

<br>; ELEPHANT::TRANSACTION-STORE<br>; ELEPHANT::TRANSACTION-OBJECT<br>; ELEPHANT::TRANSACTION-OBJECT-P<br>; ELEPHANT::OWNED-TXN-P<br>; (SUBFUNCTION (DEFCLASS ELEPHANT:TRANSACTION-RETRY-COUNT-EXCEEDED) (DEFINE-CONDITION ELEPHANT:TRANSACTION-RETRY-COUNT-EXCEEDED))

<br>; (DEFINE-CONDITION ELEPHANT:TRANSACTION-RETRY-COUNT-EXCEEDED)<br>; ELEPHANT:WITH-TRANSACTION<br>; ELEPHANT:ENSURE-TRANSACTION<br>; ELEPHANT::WITH-BATCH-TRANSACTION<br>; (DEFGENERIC ELEPHANT:CONTROLLER-START-TRANSACTION)

<br>; (DEFGENERIC ELEPHANT:CONTROLLER-COMMIT-TRANSACTION)<br>; (DEFGENERIC ELEPHANT:CONTROLLER-ABORT-TRANSACTION)<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\elephant\transactions.ofasl

<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\elephant\metaclasses.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFCLASS ELEPHANT:PERSISTENT)<br>; (METHOD PRINT-OBJECT (ELEPHANT:PERSISTENT T))

<br>; (DEFCLASS ELEPHANT:PERSISTENT-METACLASS)<br>; ELEPHANT:DEFPCLASS<br>; ELEPHANT::ADD-PERSISTENT-METACLASS-ARGUMENT<br>; (METHOD ELEPHANT::PERSISTENT-SLOTS (STANDARD-CLASS))<br>; (METHOD ELEPHANT::PERSISTENT-SLOTS (ELEPHANT:PERSISTENT-METACLASS))

<br>; (METHOD ELEPHANT::OLD-PERSISTENT-SLOTS (ELEPHANT:PERSISTENT-METACLASS))<br>; (METHOD ELEPHANT::UPDATE-PERSISTENT-SLOTS (ELEPHANT:PERSISTENT-METACLASS T))<br>; (DEFCLASS ELEPHANT::PERSISTENT-SLOT-DEFINITION)<br>; (DEFCLASS ELEPHANT::PERSISTENT-DIRECT-SLOT-DEFINITION)

<br>; (DEFCLASS ELEPHANT::PERSISTENT-EFFECTIVE-SLOT-DEFINITION)<br>; (DEFCLASS ELEPHANT::TRANSIENT-SLOT-DEFINITION)<br>; (DEFCLASS ELEPHANT::TRANSIENT-DIRECT-SLOT-DEFINITION)<br>; (DEFCLASS ELEPHANT::TRANSIENT-EFFECTIVE-SLOT-DEFINITION)

<br>; (DEFGENERIC ELEPHANT::TRANSIENT)<br>; (DEFCLASS ELEPHANT::INDEXING-RECORD)<br>; (METHOD PRINT-OBJECT (ELEPHANT::INDEXING-RECORD T))<br>; (METHOD ELEPHANT::INDEXED-RECORD (STANDARD-CLASS))<br>; (METHOD ELEPHANT::INDEXED-RECORD (ELEPHANT:PERSISTENT-METACLASS))

<br>; (METHOD ELEPHANT::OLD-INDEXED-RECORD (ELEPHANT:PERSISTENT-METACLASS))<br>; (METHOD ELEPHANT::UPDATE-INDEXED-RECORD (ELEPHANT:PERSISTENT-METACLASS T))<br>; (METHOD ELEPHANT::MAKE-NEW-INDEXED-RECORD (T T T))<br>; (METHOD ELEPHANT::REMOVED-INDEXING? (ELEPHANT:PERSISTENT-METACLASS))

<br>; ELEPHANT::INDEXED-SLOT-NAMES-FROM-DEFS<br>; (METHOD ELEPHANT::REGISTER-INDEXED-SLOT (ELEPHANT:PERSISTENT-METACLASS T))<br>; (METHOD ELEPHANT::UNREGISTER-INDEXED-SLOT (T T))<br>; (METHOD ELEPHANT::REGISTER-DERIVED-INDEX (T T))

<br>; (METHOD ELEPHANT::UNREGISTER-DERIVED-INDEX (T T))<br>; (METHOD ELEPHANT::INDEXED (ELEPHANT:PERSISTENT-METACLASS))<br>; (METHOD ELEPHANT::PREVIOUSLY-INDEXED (ELEPHANT:PERSISTENT-METACLASS))<br>; (METHOD ELEPHANT::INDEXED (STANDARD-SLOT-DEFINITION))

<br>; (METHOD ELEPHANT::INDEXED (STANDARD-CLASS))<br>; (DEFVAR ELEPHANT::*INHIBIT-INDEXING-LIST*)<br>; ELEPHANT::INHIBIT-INDEXING<br>; ELEPHANT::UNINHIBIT-INDEXING<br>; (METHOD SLOT-DEFINITION-ALLOCATION (ELEPHANT::PERSISTENT-SLOT-DEFINITION))

<br>; (METHOD (SETF SLOT-DEFINITION-ALLOCATION) (T ELEPHANT::PERSISTENT-SLOT-DEFINITION))<br>; (METHOD CLOS:DIRECT-SLOT-DEFINITION-CLASS (ELEPHANT:PERSISTENT-METACLASS))<br>; (METHOD VALIDATE-SUPERCLASS (ELEPHANT:PERSISTENT-METACLASS STANDARD-CLASS))

<br>; (METHOD VALIDATE-SUPERCLASS (STANDARD-CLASS ELEPHANT:PERSISTENT-METACLASS))<br>; (DEFGENERIC ELEPHANT::PERSISTENT-P)<br>; (METHOD CLOS:EFFECTIVE-SLOT-DEFINITION-CLASS (ELEPHANT:PERSISTENT-METACLASS))<br>; ELEPHANT::ENSURE-TRANSIENT-CHAIN

<br>; (METHOD CLOS::COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS (ELEPHANT:PERSISTENT-METACLASS T T))<br>; ELEPHANT::FIND-SLOT-DEF-BY-NAME<br>; ELEPHANT::PERSISTENT-SLOT-DEFS<br>; ELEPHANT::TRANSIENT-SLOT-DEFS<br>; 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 ...

<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on

<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFVAR ELEPHANT::*DEBUG-SI*)<br>; (METHOD INITIALIZE-INSTANCE :BEFORE (ELEPHANT:PERSISTENT))<br>; (DEFCLASS ELEPHANT:PERSISTENT-OBJECT)<br>; (METHOD SHARED-INITIALIZE :AROUND (ELEPHANT:PERSISTENT-METACLASS T))

<br>; (METHOD CLOS:FINALIZE-INHERITANCE :AROUND (ELEPHANT:PERSISTENT-METACLASS))<br>; (METHOD REINITIALIZE-INSTANCE :AROUND (ELEPHANT:PERSISTENT-METACLASS))<br>; (METHOD SHARED-INITIALIZE :AROUND (ELEPHANT:PERSISTENT-OBJECT T))

<br>; ELEPHANT::INITIALIZE-PERSISTENT-SLOTS<br>; (METHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS :AROUND (ELEPHANT:PERSISTENT-OBJECT T T T))<br>; (METHOD CHANGE-CLASS :AROUND (ELEPHANT:PERSISTENT STANDARD-CLASS))<br>; (METHOD CHANGE-CLASS :AROUND (STANDARD-OBJECT ELEPHANT:PERSISTENT-METACLASS))

<br>; (METHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS :AROUND (ELEPHANT:PERSISTENT ELEPHANT:PERSISTENT))<br>; (METHOD CLOS:SLOT-VALUE-USING-CLASS (ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT ELEPHANT::PERSISTENT-SLOT-DEFINITION))

<br>; (METHOD (SETF CLOS:SLOT-VALUE-USING-CLASS) (T ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT ELEPHANT::PERSISTENT-SLOT-DEFINITION))<br>; (METHOD CLOS:SLOT-BOUNDP-USING-CLASS (ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT ELEPHANT::PERSISTENT-SLOT-DEFINITION))

<br>; (METHOD CLOS:SLOT-BOUNDP-USING-CLASS (ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT SYMBOL))<br>; (METHOD CLOS:SLOT-MAKUNBOUND-USING-CLASS (ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT ELEPHANT::PERSISTENT-SLOT-DEFINITION))

<br>; ELEPHANT::VALID-PERSISTENT-REFERENCE-P<br>; (SUBFUNCTION (DEFCLASS ELEPHANT:CROSS-REFERENCE-ERROR) (DEFINE-CONDITION ELEPHANT:CROSS-REFERENCE-ERROR))<br>; (DEFINE-CONDITION ELEPHANT:CROSS-REFERENCE-ERROR)<br>; (DEFINE-CONDITION ELEPHANT:CROSS-REFERENCE-ERROR)

<br>; ELEPHANT::SIGNAL-CROSS-REFERENCE-ERROR<br>; (METHOD CLOS:SLOT-VALUE-USING-CLASS (ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT T))<br>; (METHOD (SETF CLOS:SLOT-VALUE-USING-CLASS) (T ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT T))

<br>; (METHOD CLOS:SLOT-MAKUNBOUND-USING-CLASS (ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT T))<br>; (TOP-LEVEL-FORM 3)<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\elephant\classes.ofasl

<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\elephant\cache.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; ELEPHANT::MAKE-CACHE-TABLE<br>; ELEPHANT::GET-CACHE<br>;;;*** Warning in ELEPHANT::MAKE-FINALIZER: KEY is bound but not referenced

<br>;;;*** Warning in ELEPHANT::MAKE-FINALIZER: CACHE is bound but not referenced<br>; ELEPHANT::MAKE-FINALIZER<br>; ELEPHANT::REMCACHE<br>; ELEPHANT::SETF-CACHE<br>; (DEFSETF ELEPHANT::GET-CACHE)<br>; (TOP-LEVEL-FORM 3)<br>

Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP NIL 2161666F> on #<ASDF:CL-SOURCE-FILE "cache" 215DD237>.<br>; Loading fasl file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\elephant\cache.ofasl

<br>;;; Compiling file C:\Documents and Settings\bobi\My Documents\Lisp Libraries\elephant\src\elephant\serializer.lisp ...<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3

<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; ELEPHANT::SERIALIZE<br>; ELEPHANT::DESERIALIZE<br>; (SUBFUNCTION (DEFCLASS ELEPHANT:ELEPHANT-DESERIALIZATION-ERROR) (DEFINE-CONDITION ELEPHANT:ELEPHANT-DESERIALIZATION-ERROR))

<br>; (DEFINE-CONDITION ELEPHANT:ELEPHANT-DESERIALIZATION-ERROR)<br>; (SUBFUNCTION (DEFCLASS ELEPHANT:ELEPHANT-TYPE-DESERIALIZATION-ERROR) (DEFINE-CONDITION ELEPHANT:ELEPHANT-TYPE-DESERIALIZATION-ERROR))<br>; (DEFINE-CONDITION ELEPHANT:ELEPHANT-TYPE-DESERIALIZATION-ERROR)

<br>; (DEFGENERIC ELEPHANT:STRUCT-CONSTRUCTOR)<br>; (METHOD ELEPHANT:STRUCT-CONSTRUCTOR (T))<br>; ELEPHANT::SERIALIZE-TO-BASE64-STRING<br>; ELEPHANT::CONVERT-BUFFER-TO-BASE64-STRING<br>; ELEPHANT::DESERIALIZE-FROM-BASE64-STRING

<br>; ELEPHANT::CONVERT-BUFFER-FROM-BASE64-STRING<br>; (DEFCONSTANT ELEPHANT::+RESERVED-DBINFO+)<br>; (DEFCONSTANT ELEPHANT::+ELEPHANT-VERSION+)<br>; (DEFCONSTANT ELEPHANT::+ELEPHANT-SERIALIZER-VERSION+)<br>; ELEPHANT::SERIALIZE-DATABASE-VERSION-KEY

<br>; ELEPHANT::SERIALIZE-DATABASE-VERSION-VALUE<br>; ELEPHANT::DESERIALIZE-DATABASE-VERSION-VALUE<br>; ELEPHANT::SERIALIZE-DATABASE-SERIALIZER-VERSION-KEY<br>; ELEPHANT::SERIALIZE-DATABASE-SERIALIZER-VERSION-VALUE<br>; ELEPHANT::DESERIALIZE-DATABASE-SERIALIZER-VERSION-VALUE

<br>; ELEPHANT::SERIALIZE-RESERVED-TAG<br>; ELEPHANT::SERIALIZE-SYSTEM-TAG<br>; ELEPHANT::SERIALIZE-SYSTEM-INTEGER<br>; ELEPHANT::DESERIALIZE-SYSTEM-INTEGER<br>; ELEPHANT::SLOTS-AND-VALUES<br>; ELEPHANT::STRUCT-SLOTS-AND-VALUES

<br>; (TOP-LEVEL-FORM 3)<br>; (DEFVAR ELEPHANT::ARRAY-TYPE-TO-BYTE)<br>; (DEFVAR ELEPHANT::BYTE-TO-ARRAY-TYPE)<br>; (TOP-LEVEL-FORM 4)<br>; (TOP-LEVEL-FORM 5)<br>; (TOP-LEVEL-FORM 6)<br>; (TOP-LEVEL-FORM 7)<br>; (TOP-LEVEL-FORM 8)

<br>; (TOP-LEVEL-FORM 9)<br>; (TOP-LEVEL-FORM 10)<br>; (TOP-LEVEL-FORM 11)<br>; (TOP-LEVEL-FORM 12)<br>; ELEPHANT::TYPE=<br>; (TOP-LEVEL-FORM 13)<br>; (TOP-LEVEL-FORM 14)<br>; ELEPHANT::ARRAY-TYPE-FROM-BYTE<br>; 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 ...

<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on

<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFVAR ELEPHANT::*ELEPHANT-DATA-STORES*)<br>; (DEFVAR ELEPHANT::*ELEPHANT-CONTROLLER-INIT*)<br>; ELEPHANT::REGISTER-DATA-STORE-CON-INIT<br>; ELEPHANT::LOOKUP-DATA-STORE-CON-INIT

<br>; (DEFVAR ELEPHANT::*DBCONNECTION-SPEC*)<br>; (DEFVAR ELEPHANT::*DBCONNECTION-LOCK*)<br>; (DEFGENERIC ELEPHANT::GET-CON)<br>; (SUBFUNCTION (DEFCLASS ELEPHANT:CONTROLLER-LOST-ERROR) (DEFINE-CONDITION ELEPHANT:CONTROLLER-LOST-ERROR))

<br>; (DEFINE-CONDITION ELEPHANT:CONTROLLER-LOST-ERROR)<br>; ELEPHANT::SIGNAL-CONTROLLER-LOST-ERROR<br>; (METHOD ELEPHANT::GET-CON (ELEPHANT:PERSISTENT))<br>; ELEPHANT::GET-CONTROLLER<br>; ELEPHANT::BUILD-CONTROLLER<br>; ELEPHANT::LOAD-DATA-STORE

<br>; ELEPHANT::SATISFY-ASDF-DEPENDENCIES<br>; ELEPHANT::GET-USER-CONFIGURATION-PARAMETER<br>;;;*** Warning in ELEPHANT::INITIALIZE-USER-PARAMETERS: VARIABLE is bound but not referenced<br>; ELEPHANT::INITIALIZE-USER-PARAMETERS

<br>; (DEFCLASS ELEPHANT:STORE-CONTROLLER)<br>; (METHOD PRINT-OBJECT (ELEPHANT:STORE-CONTROLLER T))<br>; (METHOD ELEPHANT::CACHE-INSTANCE (ELEPHANT:STORE-CONTROLLER T))<br>; (METHOD ELEPHANT::GET-CACHED-INSTANCE (ELEPHANT:STORE-CONTROLLER T T))

<br>; (METHOD ELEPHANT::UNCACHE-INSTANCE (ELEPHANT:STORE-CONTROLLER T))<br>; (METHOD ELEPHANT:FLUSH-INSTANCE-CACHE (ELEPHANT:STORE-CONTROLLER))<br>; (DEFGENERIC ELEPHANT::DATABASE-VERSION)<br>; (METHOD ELEPHANT::DATABASE-VERSION :AROUND (T))

<br>; ELEPHANT::PRIOR-VERSION-P<br>; (DEFPARAMETER ELEPHANT::*ELEPHANT-UPGRADE-TABLE*)<br>; (METHOD ELEPHANT::UP-TO-DATE-P (ELEPHANT:STORE-CONTROLLER))<br>; (METHOD ELEPHANT::UPGRADABLE-P (ELEPHANT:STORE-CONTROLLER))<br>; (DEFGENERIC ELEPHANT:UPGRADE)

<br>; (METHOD ELEPHANT:UPGRADE (ELEPHANT:STORE-CONTROLLER T))<br>; (METHOD ELEPHANT::INITIALIZE-SERIALIZER (ELEPHANT:STORE-CONTROLLER))<br>; (DEFVAR ELEPHANT:*ALWAYS-CONVERT*)<br>; (DEFPARAMETER ELEPHANT::*LEGACY-SYMBOL-CONVERSIONS*)

<br>; ELEPHANT:ADD-SYMBOL-CONVERSION<br>; ELEPHANT::MAP-LEGACY-SYMBOLS<br>; (DEFPARAMETER ELEPHANT::*LEGACY-PACKAGE-CONVERSIONS*)<br>; ELEPHANT:ADD-PACKAGE-CONVERSION<br>; ELEPHANT::MAP-LEGACY-PACKAGE-NAMES<br>; ELEPHANT::MAP-LEGACY-NAMES

<br>; ELEPHANT:TRANSLATE-AND-INTERN-SYMBOL<br>; (DEFGENERIC ELEPHANT::OPEN-CONTROLLER)<br>; (DEFGENERIC ELEPHANT::CLOSE-CONTROLLER)<br>; (METHOD ELEPHANT::CLOSE-CONTROLLER :AFTER (ELEPHANT:STORE-CONTROLLER))<br>; (DEFGENERIC ELEPHANT::CONNECTION-IS-INDEED-OPEN)

<br>; (DEFGENERIC ELEPHANT::NEXT-OID)<br>; (DEFGENERIC ELEPHANT:OPTIMIZE-LAYOUT)<br>; (DEFGENERIC ELEPHANT::PERSISTENT-SLOT-READER)<br>; (DEFGENERIC ELEPHANT::PERSISTENT-SLOT-WRITER)<br>; (DEFGENERIC ELEPHANT::PERSISTENT-SLOT-BOUNDP)

<br>; (DEFGENERIC ELEPHANT::PERSISTENT-SLOT-MAKUNBOUND)<br>; ELEPHANT:OPEN-STORE<br>; ELEPHANT:CLOSE-STORE<br>; ELEPHANT:WITH-OPEN-STORE<br>; ELEPHANT:ADD-TO-ROOT<br>; ELEPHANT:GET-FROM-ROOT<br>; ELEPHANT:ROOT-EXISTSP<br>

; ELEPHANT:REMOVE-FROM-ROOT<br>; ELEPHANT:MAP-ROOT<br>; (DEFGENERIC ELEPHANT:DROP-POBJECT)<br>; (METHOD ELEPHANT:DROP-POBJECT (ELEPHANT:PERSISTENT-OBJECT))<br>; (DEFVAR ELEPHANT::*RESTRICTED-PROPERTIES*)<br>; (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 ...

<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on

<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFCLASS ELEPHANT:PERSISTENT-COLLECTION)<br>; ELEPHANT:MAKE-BTREE<br>; (DEFGENERIC ELEPHANT::BUILD-BTREE)<br>; (DEFCLASS ELEPHANT:BTREE)<br>; (DEFGENERIC ELEPHANT:GET-VALUE)

<br>; (DEFGENERIC (SETF ELEPHANT:GET-VALUE))<br>; (DEFGENERIC ELEPHANT:REMOVE-KV)<br>; (DEFGENERIC ELEPHANT:EXISTSP)<br>; (METHOD ELEPHANT:OPTIMIZE-LAYOUT (T))<br>; (DEFGENERIC ELEPHANT:DROP-BTREE)<br>; ELEPHANT:MAKE-INDEXED-BTREE

<br>; (DEFGENERIC ELEPHANT::BUILD-INDEXED-BTREE)<br>; (DEFCLASS ELEPHANT:INDEXED-BTREE)<br>; (DEFGENERIC ELEPHANT:ADD-INDEX)<br>; (DEFGENERIC ELEPHANT:GET-INDEX)<br>; (DEFGENERIC ELEPHANT:REMOVE-INDEX)<br>; (DEFGENERIC ELEPHANT:MAP-INDICES)

<br>; (DEFGENERIC ELEPHANT::BUILD-BTREE-INDEX)<br>; (DEFCLASS ELEPHANT:BTREE-INDEX)<br>; (METHOD SHARED-INITIALIZE :AFTER (ELEPHANT:BTREE-INDEX T))<br>; (DEFGENERIC ELEPHANT:GET-PRIMARY-KEY)<br>; (METHOD (SETF ELEPHANT:GET-VALUE) (T T ELEPHANT:BTREE-INDEX))

<br>; (METHOD ELEPHANT:REMOVE-KV (T ELEPHANT:BTREE-INDEX))<br>; (DEFCLASS ELEPHANT:CURSOR)<br>; (DEFGENERIC ELEPHANT:MAKE-CURSOR)<br>; (DEFGENERIC ELEPHANT:MAKE-SIMPLE-CURSOR)<br>; (DEFGENERIC ELEPHANT:CURSOR-CLOSE)<br>; (DEFGENERIC ELEPHANT:CURSOR-DUPLICATE)

<br>; (DEFGENERIC ELEPHANT:CURSOR-CURRENT)<br>; (DEFGENERIC ELEPHANT:CURSOR-FIRST)<br>; (DEFGENERIC ELEPHANT:CURSOR-LAST)<br>; (DEFGENERIC ELEPHANT:CURSOR-NEXT)<br>; (DEFGENERIC ELEPHANT:CURSOR-PREV)<br>; (DEFGENERIC ELEPHANT:CURSOR-SET)

<br>; (DEFGENERIC ELEPHANT:CURSOR-SET-RANGE)<br>; (DEFCLASS ELEPHANT:SECONDARY-CURSOR)<br>; (DEFGENERIC ELEPHANT:CURSOR-GET-BOTH)<br>; (DEFGENERIC ELEPHANT:CURSOR-GET-BOTH-RANGE)<br>; (DEFGENERIC ELEPHANT:CURSOR-DELETE)<br>

; (DEFGENERIC ELEPHANT:CURSOR-PUT)<br>; (DEFGENERIC ELEPHANT:CURSOR-PCURRENT)<br>; (DEFGENERIC ELEPHANT:CURSOR-PFIRST)<br>; (DEFGENERIC ELEPHANT:CURSOR-PLAST)<br>; (DEFGENERIC ELEPHANT:CURSOR-PNEXT)<br>; (DEFGENERIC ELEPHANT:CURSOR-PPREV)

<br>; (DEFGENERIC ELEPHANT:CURSOR-PSET)<br>; (DEFGENERIC ELEPHANT:CURSOR-PSET-RANGE)<br>; (DEFGENERIC ELEPHANT:CURSOR-PGET-BOTH)<br>; (DEFGENERIC ELEPHANT:CURSOR-PGET-BOTH-RANGE)<br>; (DEFGENERIC ELEPHANT:CURSOR-NEXT-DUP)

<br>; (DEFGENERIC ELEPHANT:CURSOR-NEXT-NODUP)<br>; (DEFGENERIC ELEPHANT:CURSOR-PNEXT-DUP)<br>; (DEFGENERIC ELEPHANT:CURSOR-PNEXT-NODUP)<br>; (DEFGENERIC ELEPHANT:CURSOR-PREV-DUP)<br>; (METHOD ELEPHANT:CURSOR-PREV-DUP (ELEPHANT:CURSOR))

<br>; (DEFGENERIC ELEPHANT:CURSOR-PREV-NODUP)<br>; (DEFGENERIC ELEPHANT:CURSOR-PPREV-DUP)<br>; (METHOD ELEPHANT:CURSOR-PPREV-DUP (ELEPHANT:CURSOR))<br>; (DEFGENERIC ELEPHANT:CURSOR-PPREV-NODUP)<br>; 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).

<br>;;;*** 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).<br>; (METHOD ELEPHANT:MAP-BTREE (T ELEPHANT:BTREE))

<br>; (DEFGENERIC ELEPHANT:MAP-INDEX)<br>; (METHOD ELEPHANT:MAP-INDEX (T ELEPHANT:BTREE-INDEX))<br>; ELEPHANT::PSET-RANGE-FOR-DESCENDING<br>; ELEPHANT::PPREV-DUP-HACK<br>; (METHOD ELEPHANT:EMPTY-BTREE-P (ELEPHANT:BTREE))<br>

; ELEPHANT::PRINT-BTREE-ENTRY<br>; ELEPHANT:DUMP-BTREE<br>; ELEPHANT::PRINT-BTREE-KEY-AND-TYPE<br>; ELEPHANT:BTREE-KEYS<br>; (METHOD ELEPHANT:BTREE-DIFFER-P (ELEPHANT:BTREE ELEPHANT:BTREE))<br>; (TOP-LEVEL-FORM 3)<br>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 ...

<br>;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0<br>;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3<br>;;; Source level debugging is on <br>;;; Source file recording is  on <br>;;; Cross referencing is on

<br>; (TOP-LEVEL-FORM 1)<br>; (TOP-LEVEL-FORM 2)<br>; (DEFCLASS ELEPHANT:PSET)<br>; (DEFGENERIC ELEPHANT:INSERT-ITEM)<br>; (DEFGENERIC ELEPHANT:REMOVE-ITEM)<br>; (DEFGENERIC ELEPHANT:MAP-PSET)<br>; (DEFGENERIC ELEPHANT:FIND-ITEM)

<br>; (DEFGENERIC ELEPHANT:PSET-LIST)<br>; (DEFGENERIC ELEPHANT::BUILD-PSET)<br>; (DEFGENERIC ELEPHANT:DROP-PSET)<br>; (DEFCLASS ELEPHANT::DEFAULT-PSET)<br>; (METHOD ELEPHANT::BUILD-PSET (ELEPHANT:STORE-CONTROLLER))<br>; ELEPHANT:MAKE-PSET

<br>; (METHOD ELEPHANT:INSERT-ITEM (T ELEPHANT::DEFAULT-PSET))<br>; (METHOD ELEPHANT:REMOVE-ITEM (T ELEPHANT::DEFAULT-PSET))<br>; (METHOD ELEPHANT:FIND-ITEM (T ELEPHANT::DEFAULT-PSET))<br>; (METHOD ELEPHANT:MAP-PSET (T ELEPHANT::DEFAULT-PSET))

<br>;;;*** Warning in (METHOD ELEPHANT:PSET-LIST (ELEPHANT::DEFAULT-PSET)): Failed to find name ELEPHANT::COLLECT in declaration (DYNAMIC-EXTENT ELEPHANT::COLLECT).<br>; (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>.

<br>   9 Continue, treating #<ASDF:LOAD-OP NIL 21D39C8B> on #<ASDF:CL-SOURCE-FILE "pset" 21C9A7BF> as having been successful.<br>  10 (abort) Return to level 0.<br>  11 Return to top loop level 0.<br>

<br>Type :b for backtrace, :c <option number> to proceed,  or :? for other options<br><br>ELEPHANT 2 : 1 > :b<br>Call to (METHOD REINITIALIZE-INSTANCE :AROUND (PERSISTENT-METACLASS))<br>Call to CLOS::METHOD-COMBINATION-TEMPLATE

<br>Call to CLOS::ENSURE-CLASS-USING-CLASS-INTERNAL<br>Call to CLOS::ENSURE-CLASS-WITHOUT-LOD<br>Call to (HARLEQUIN-COMMON-LISP:SUBFUNCTION 1 LOAD)<br>Call to LOAD<br>Call to (METHOD ASDF:PERFORM (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE))

<br>Call to CLOS::METHOD-COMBINATION-TEMPLATE<br>Call to CLOS::CALL-NEXT-METHOD-WITH-ARGS<br>Interpreted call to CALL-NEXT-METHOD<br>Interpreted call to (METHOD ASDF:PERFORM :AROUND (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE))<br>

Call to CLOS::METHOD-COMBINATION-TEMPLATE<br>Call to (HARLEQUIN-COMMON-LISP:SUBFUNCTION 1 ASDF:OPERATE)<br>Call to ASDF:OPERATE<br>Call to ASDF:OOS<br>Interpreted call to COMMON-LISP-USER::ASDF<br>Call to EVAL<br>Call to CAPI::CAPI-TOP-LEVEL-FUNCTION

<br>Call to CAPI::INTERACTIVE-PANE-TOP-LOOP<br>Call to (HARLEQUIN-COMMON-LISP:SUBFUNCTION MP::PROCESS-SG-FUNCTION MP::INITIALIZE-PROCESS-STACK)<br><br>Slobodan<br>