[elephant-devel] error at delivery on LispWorks

Sun Nov 4 17:01:42 UTC 2007

When delivering my application 
with Lispworks on win32 at delivery level 2, the
delivery process produces an error. For example:

Error: An error of type CONDITIONS:ARITHMETIC-TYPE-ERROR occured, arguments : (:EXPECTED-TYPE REAL :DATUM ELEPHANT:PRIMARY :OPERATION < :OPERANDS (2 ELEPHANT:PRIMARY))

This error is not exactly reproducible. "ELEPHANT:PRIMARY" can be replaced by one or the other 
slot name of my persistent class. But it generates always a CONDITIONS:ARITHMETIC-TYPE-ERROR. 
Complete output is reproduced below.

Do you have an idea where to start solving this ?

At delivery levels 0 and 1, a perfectly working executable file is produced,
having a size of 40MB. It should be possible to reduce this size at higher levels.

Best regards, 

Frank Schorr

Shaking stage : Shaking (1)
 Generation 0:  Total Size 4358K, Allocated 349K, Free 4000K 
 Generation 1:  Total Size 4982K, Allocated 2196K, Free 2765K 
 Generation 2:  Total Size 25604K, Allocated 12112K, Free 13475K 
 Generation 3:  Total Size 18263K, Allocated 8611K, Free 9643K 

Total Size 53504K, Allocated 23269K, Free 29885K
Broke pointers from 2982 gfs

Number of symbols 29616 (keywords 2742 fbound 15687 bound 4070 uninterned 677)

Number of classes 966

Unwinding shaking-action "?SYSTEM::ACTION-TUPLE-SYM"

Unwinding shaking-action "?SYSTEM::ACTION-ITEM-OWNER"

Unwinding shaking-action "?TYPE::CLEAR-TYPE-EXPANSION-CACHE"

Unwinding shaking-action "?SYSTEM::*LINE-ARGUMENT-ACTIONS*"

Unwinding shaking-action "?CLOS::*ISL-TABLE*"

Unwinding shaking-action "?CLOS::CLASS-SHARED-INITIALIZE"
Error: An error of type CONDITIONS:ARITHMETIC-TYPE-ERROR occured, arguments : (:EXPECTED-TYPE REAL :DATUM ELEPHANT:PRIMARY :OPERATION < :OPERANDS (2 ELEPHANT:PRIMARY))

Backtrace:
#<The COMMON-LISP-USER package, 6/128 internal, 0/4 external>

Call to "GET-CALL-FRAME"
  "FRAME-POINTER" : NIL
  "PREV-FRAME"    : NIL

Binding frame:
  *DEBUGGER-HOOK*                                 : NIL
  SYSTEM::*INSIDE-RUN-BUILD-SCRIPT-DEBUGGER-HOOK* : NIL

Call to "RUN-BUILD-SCRIPT-DEBUGGER-HOOK" (offset 145)
  "CC" : #<SIMPLE-ERROR 200D929F>

Catch frame: CONDITIONS::NEW-IGNORE-ERRORS-HANDLER

Binding frame:
  MP:*CURRENT-PROCESS* : NIL

Call to "DEBUG2" (offset 3141)
  "CONDITION" : #<SIMPLE-ERROR 200D929F>
  "PROCESS"   : NIL
  "SKIP-TO"   : NIL

Tag environment contour:
Function environment contour
Block environment contour:
Variable environment contour: ()
Call to "DEBUG1" (offset 215)
  "(DATUM NIL)" : #<SIMPLE-ERROR 200D929F>
  "ARGUMENTS"   : NIL

Binding frame:
  MP::*PROCESSING-INTERRUPTS* : NIL
  *EVALHOOK*                  : NIL

Call to "INVOKE-DEBUGGER" (offset 111)
  "CONDITION" : #<SIMPLE-ERROR 200D929F>

Binding frame:
  CONDITIONS::*BROKEN-ON-SIGNALS* : NIL

Call to "CONDITIONS-ERROR" (offset 356)
  "DATUM"     : CONDITIONS:ARITHMETIC-TYPE-ERROR
  "ARGUMENTS" : (:EXPECTED-TYPE REAL :DATUM ELEPHANT:PRIMARY :OPERATION < :OPERANDS (2 ELEPHANT:PRIMARY))

Catch frame: (NIL)

Catch frame: (NIL)

Call to "REPORT-THE-BINARY-FN-ERROR" (offset 329)
  "FN-NAME"     : <
  "ARG1"        : 2
  "ARG2"        : ELEPHANT:PRIMARY
  "TYPE"        : REAL
  "ARG1-IS-BAD" : NIL
  "PROMPT"      : "Supply a new second argument."

Call to "ARGS-TO-BINARY-ARITHMETIC-FN-NOT-OF-TYPE" (offset 197)
  "FN-NAME" : <
  "ARG1"    : 2
  "ARG2"    : ELEPHANT:PRIMARY
  "TYPE"    : REAL

Call to "MERGE-LISTS*" (offset 87)
  "LIST-1" : ((ELEPHANT:PRIMARY #<Slot Unbound Marker> (:PRIMARY)))
  "LIST-2" : ((2 #<Slot Unbound Marker> NIL))
  "PRED"   : #<Function "<$ANY" 209A4702>
  "KEY"    : #<Function "CAR" 201C7C72>

Call to "SORT-LIST" (offset 279)
  "LIST" : ((1 #<Slot Unbound Marker> (:DBCONNECTION-SPEC-PST)) (0 #<Slot Unbound Marker> (:FROM-OID)))
  "PRED" : #<Function "<$ANY" 209A4702>
  "KEY"  : #<Function "CAR" 201C7C72>

Call to "(METHOD COMPUTE-CLASS-SHARED-INITIALIZE-INFO (T T))" (offset 258)
  "CLASS"        : #<ELEPHANT:PERSISTENT-METACLASS DB-BDB::BDB-BTREE-INDEX 21D0254B>
  "JUST-SLOTS-P" : T

Call to "(METHOD COMPUTE-CLASS-SHARED-INITIALIZE T .  NIL)" (offset 56)
  "CLASS" : #<ELEPHANT:PERSISTENT-METACLASS DB-BDB::BDB-BTREE-INDEX 21D0254B>

Call to "INSTALL-ALL-CLASS-SHARED-INITIALIZE" (offset 138)
  "NAME"             : DB-BDB::BDB-BTREE-INDEX
  "CLASS"            : #<ELEPHANT:PERSISTENT-METACLASS DB-BDB::BDB-BTREE-INDEX 21D0254B>
  "METACLASSES-KEEP" : :DONT-KNOW
  "KEEP"             : :DONT-KNOW

Catch frame: #<Unbound Marker>

Call to "MAPHASH" (offset 356)
  "FUNCTION"   : #<Closure "INSTALL-ALL-CLASS-SHARED-INITIALIZE" 20269642>
  "HASH-TABLE" : #<EQ Hash Table{966} 2023B153>

Call to "INSTALL-ALL-CLASS-SHARED-INITIALIZE" (offset 90)
  "KEEP"             : NIL
  "METACLASSES-KEEP" : (#<STANDARD-CLASS STRUCTURE-CLASS 209503CF> #<STANDARD-CLASS BUILT-IN-CLASS 2094FE6F> #<STANDARD-CLASS FUNCALLABLE-STANDARD-CLASS 2095033F>)

Call to "UNWIND-SHAKING-ACTIONS" (offset 456)
  "TESTING-ONLY" : NIL

Binding frame:
  SYSTEM::*BUILT-IN-CLASSES* : NIL

Catch frame: #<Unbound Marker>

Binding frame:
  *PACKAGES-FOR-WARN-ON-REDEFINITION* : ("AMD64" "ATSUI" "CAPI" "CAPI-COCOA-LIBRARY" "CAPI-INTERNALS" "CAPI-LAYOUT" "CAPI-LIBRARY" "CAPI-MOTIF-LIBRARY" "CAPI-POSTSCRIPT-LIBRARY" "CAPI-TOOLKIT" "CAPI-WIN32-LIB" "CARBON" "CLIM" "CLIM-DEFSYSTEM" "CLIM-INTERNALS" "CLIM-LISP" "CLIM-SILICA" "CLIM-SYS" "CLIM-UTILS" "CLOG-VAR" "CLOS" "COCOA" "COLOR" "COM" "COMM" "COMMON-LISP" "COMMON-PROLOG" "COMMON-UTILITIES" "COMPILER" "CONDITIONS" "CONSTANTS" "CORBA" "CORBA-INTERNAL" "CORE-GRAPHICS" "COSNAMING" "DBG" "DELIVERY" "DSPEC" "EDITOR" "ENVIRONMENT" "ENVIRONMENT-INTERNALS" "EXE-PARSER" "EXTERNAL-FORMAT" "FLI" "FLI-INTERNALS" "FOREIGN" "FOREIGN-PARSER" "GENERATOR" "GRAPHICS-PORTS" "HARLEQUIN-COMMON-LISP" "HARP" "HQN-WEB" "INS" "INTERFACE-BUILDER" "KEYWORD" "KW" "KW-TOOLS" "LISPWORKS" "LISPWORKS-TOOLS" "LOOP" "LOW64" "LW-XP" "MAIL" "MATCH" "MP" "OBJC" "ODBC-COMMON" "OMG.ORG/OPERATION" "OMG.ORG/PORTABLESERVER" "OMG.ORG/ROOT" "PARSERGEN" "PC386" "PKG" "POSTGRESQL" "POSTSCRIPT-CLIM" "RAW" "RC-PARSER" "REG" "RS6K" "RUNTIME" "SAVED-STUFF" "SCM" "SERIAL-PORT" "SETF" "SHELL" "SNAKE" "SQL" "SQL-COMMON" "STEPPER" "STREAM" "STRUCTURE" "SYSTEM" "TRANS" "TYPE" "WALKER" "WIN32" "WIN32-LIB-CLIM" "WSPARC" "X-INTERNALS" "X-LIBRARY" "X-TOOLS" "X-UTILITIES" "XM-INTERNALS" "XM-LIB-CLIM" "XM-LIBRARY" "XMA-LIBRARY" "XT-INTERNALS" "XT-LIBRARY")

Binding frame:
  SYSTEM::*SHAKE-CLASS-DIRECT-METHODS* : NIL

Binding frame:
  SYSTEM::*SHAKE-CLASS-ACCESSORS* : NIL

Binding frame:
  SYSTEM::*SHAKE-CLASSES* : NIL

Call to "DELIVER-SHAKE" (offset 2655)

Catch frame: #<Unbound Marker>

Binding frame:
  SYSTEM::*CLEANING* : NIL

Call to "DELIVER-FROM-MAIN" (offset 371)

Catch frame: SYSTEM::EXIT-LISPWORKS

Catch frame: SYSTEM::START-UP

Catch frame: (NIL)

Call to "START-FUNCTION" (offset 116)
  "GC-MESSAGES" : #<Raw value #x00000028 (40)>

"START-FUNCTION"
Quitting
_________________________________________________________________________
Mit der Gruppen-SMS von WEB.DE FreeMail können Sie eine SMS an alle 
Freunde gleichzeitig schicken: http://freemail.web.de/features/?mc=021179