<html><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div><div>if I understand it right ;</div><div>i load urwerk</div><div>i load my file</div><div>i do meta dot on a function in my file</div><div>and here is the console :</div><div>was this the procedure you expected me to do ?</div><div>sincerely</div><div>joakim<br></div><div><br></div></div><div><br></div><div><div>Lisp error: "Array index 197 out of bounds for #(515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515) ."</div><div> (34B764) : 0 (PRINT-CALL-HISTORY :CONTEXT NIL :PROCESS NIL :ORIGIN NIL :DETAILED-P T :COUNT 536870911 :START-FRAME-NUMBER 0 :STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #xC613EC6> :PRINT-LEVEL 2 :PRINT-LENGTH 5 :SHOW-INTERNAL-FRAMES NIL :FORMAT :TRADITIONAL) 735</div><div>  (&KEY :CONTEXT :PROCESS :ORIGIN :DETAILED-P :COUNT :START-FRAME-NUMBER :STREAM :PRINT-LEVEL :PRINT-LENGTH :SHOW-INTERNAL-FRAMES :FORMAT)</div><div>   <a href="CCL::CONTEXT">CCL::CONTEXT</a>: NIL</div><div>   PROCESS: NIL</div><div>   <a href="CCL::ORIGIN">CCL::ORIGIN</a>: NIL</div><div>   <a href="CCL::DETAILED-P">CCL::DETAILED-P</a>: T</div><div>   COUNT: 536870911</div><div>   <a href="CCL::START-FRAME-NUMBER">CCL::START-FRAME-NUMBER</a>: 0</div><div>   STREAM: #<SYNONYM-STREAM to *TERMINAL-IO* #xC613EC6></div><div>   <a href="CCL::PRINT-LEVEL">CCL::PRINT-LEVEL</a>: 2</div><div>   <a href="CCL::PRINT-LENGTH">CCL::PRINT-LENGTH</a>: 5</div><div>   <a href="CCL::SHOW-INTERNAL-FRAMES">CCL::SHOW-INTERNAL-FRAMES</a>: NIL</div><div>   FORMAT: :TRADITIONAL</div><div><br></div><div>  <a href="CCL::FRAME-NUMBER">CCL::FRAME-NUMBER</a>: 0</div><div>  *BACKTRACE-PRINT-LEVEL*: 2</div><div>  *BACKTRACE-PRINT-LENGTH*: 5</div><div>  *BACKTRACE-FORMAT*: :TRADITIONAL</div><div>  *STANDARD-OUTPUT*: #<SYNONYM-STREAM to *TERMINAL-IO* #xC613EC6></div><div>  *PRINT-CIRCLE*: NIL</div><div><br></div><div> (34B818) : 1 (MAYBE-LOG-CALLBACK-ERROR #<SIMPLE-ERROR #xC8D2CDE>) 1599</div><div>  (CONDITION)</div><div>   CONDITION: #<SIMPLE-ERROR #xC8D2CDE></div><div><br></div><div>  GUI::EMSG: "Array index 197 out of bounds for #(515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515 515) ."</div><div>  #:G24021: (ERROR)</div><div>  CCL::%HANDLERS%: ((ERROR) (ERROR) (ERROR) (ERROR #) (CONDITION #) ...)</div><div><br></div><div> (34B83C) : 2 (FUNCALL #'#<#<STANDARD-METHOD HEMLOCK-EXT:REPORT-HEMLOCK-ERROR (HI:HEMLOCK-VIEW T T)>> #<HI:HEMLOCK-VIEW #xC8BBDD6> #<SIMPLE-ERROR #xC8D2CDE> T) 55</div><div>  (GUI::VIEW CONDITION GUI::DEBUG-P)</div><div>   GUI::VIEW: #<HI:HEMLOCK-VIEW #xC8BBDD6></div><div>   CONDITION: #<SIMPLE-ERROR #xC8D2CDE></div><div>   GUI::DEBUG-P: T</div><div><br></div><div><br></div><div><br></div><div> (34B850) : 3 (LISP-ERROR-ERROR-HANDLER #<SIMPLE-ERROR #xC8D2CDE> :DEBUG-P T) 399</div><div>  (CONDITION &KEY :DEBUG-P)</div><div>   CONDITION: #<SIMPLE-ERROR #xC8D2CDE></div><div>   HI::DEBUG-P: T</div><div><br></div><div>  *STANDARD-OUTPUT*: #<SYNONYM-STREAM to *TERMINAL-IO* #xC613F06></div><div>  #:G28057: (ERROR)</div><div>  CCL::%HANDLERS%: ((ERROR) (ERROR) (ERROR #) (CONDITION #) (CONDITION #))</div><div><br></div><div> (34B880) : 4 (SIGNAL #<SIMPLE-ERROR #xC8D2CDE>) 903</div><div>  (CONDITION &REST <a href="CCL::ARGS)">CCL::ARGS)</a></div><div>   CONDITION: #<SIMPLE-ERROR #xC8D2CDE></div><div>   <a href="CCL::ARGS">CCL::ARGS</a>: NIL</div><div><br></div><div>  CCL::%HANDLERS%: ((ERROR) (ERROR #) (CONDITION #) (CONDITION #))</div><div>  <a href="CCL::TAG">CCL::TAG</a>: (ERROR #<Compiled-function # (Non-Global)  #x52888F6>)</div><div>  <a href="CCL::HANDLERS">CCL::HANDLERS</a>: (ERROR #<Compiled-function # (Non-Global)  #x52888F6>)</div><div>  <a href="CCL::FN">CCL::FN</a>: #<Compiled-function (:INTERNAL #) (Non-Global)  #x52888F6></div><div><br></div><div> (34B8A8) : 5 (%ERROR #<SIMPLE-ERROR #xC8D2CDE> (197 #(515 515 515 515 515 ...)) 863834) 119</div><div>  (CONDITION <a href="CCL::ARGS">CCL::ARGS</a> <a href="CCL::ERROR-POINTER)">CCL::ERROR-POINTER)</a></div><div>   CONDITION: #<SIMPLE-ERROR #xC8D2CDE></div><div>   <a href="CCL::ARGS">CCL::ARGS</a>: (197 #(515 515 515 515 515 ...))</div><div>   <a href="CCL::ERROR-POINTER">CCL::ERROR-POINTER</a>: 863834</div><div><br></div><div><br></div><div><br></div><div> (34B8BC) : 6 (FUNCALL #'#<(:INTERNAL CCL::%XERR-DISP)>) 2399</div><div>  NIL</div><div><br></div><div>  <a href="CCL::FRAME-PTR">CCL::FRAME-PTR</a>: 863834</div><div>  <a href="CCL::FN">CCL::FN</a>: #<Compiled-function HI::COMPUTE-BOYER-MOORE-JUMPS #x53058E6></div><div>  <a href="CCL::OP0">CCL::OP0</a>: 205</div><div>  <a href="CCL::OP1">CCL::OP1</a>: 200</div><div>  <a href="CCL::OP2">CCL::OP2</a>: 97</div><div>  <a href="CCL::SKIP">CCL::SKIP</a>: -1</div><div>  <a href="CCL::XP">CCL::XP</a>: #<A Foreign Pointer #xBFFFF370></div><div>  <a href="CCL::XCF">CCL::XCF</a>: #<A Foreign Pointer #x34B968></div><div><br></div><div> (34B8E4) : 7 (FUNCALL-WITH-ERROR-REENTRY-DETECTION #<COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::%XERR-DISP) #xCC7B6>) 183</div><div>  (<a href="CCL::THUNK">CCL::THUNK</a>)</div><div>   <a href="CCL::THUNK">CCL::THUNK</a>: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::%XERR-DISP) #xCC7B6></div><div><br></div><div>  COUNT: 0</div><div>  <a href="CCL::*ERROR-REENTRY-COUNT*">CCL::*ERROR-REENTRY-COUNT*</a>: 0</div><div><br></div><div> (34B904) : 8 (FUNCALL #'#<CCL::%XERR-DISP> -268436758) 495</div><div>  (#:G139934)</div><div>   #:G139934: -268436758</div><div><br></div><div>  #:G139943: #<A Foreign Pointer [stack-allocated] #xBFFFEBA8></div><div>  <a href="CCL::XP">CCL::XP</a>: #<A Foreign Pointer #xBFFFF370></div><div>  <a href="CCL::XCF">CCL::XCF</a>: #<A Foreign Pointer #x34B968></div><div>  #:G139944: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::%XERR-DISP) #xCC7B6></div><div><br></div><div> (34B920) : 9 (%PASCAL-FUNCTIONS% 2 -268436758) 343</div><div>  (<a href="CCL::INDEX">CCL::INDEX</a> <a href="CCL::ARGS-PTR-FIXNUM)">CCL::ARGS-PTR-FIXNUM)</a></div><div>   <a href="CCL::INDEX">CCL::INDEX</a>: 2</div><div>   <a href="CCL::ARGS-PTR-FIXNUM">CCL::ARGS-PTR-FIXNUM</a>: -268436758</div><div><br></div><div>  <a href="CCL::LISP-FUNCTION">CCL::LISP-FUNCTION</a>: #<Compiled-function CCL::%XERR-DISP (Non-Global)  #x44FC4A6></div><div>  WITHOUT-INTERRUPTS: NIL</div><div>  <a href="CCL::*CALLBACK-TRACE-P*">CCL::*CALLBACK-TRACE-P*</a>: NIL</div><div><br></div><div>*(34B968) : 10 (COMPUTE-BOYER-MOORE-JUMPS #(40 68 69 70 77 ...) #<Compiled-function SVREF #x40FDE7E>) 232</div><div>  (HI::VEC HI::ACCESS-FUN)</div><div>   HI::VEC: #(40 68 69 70 77 ...)</div><div>   HI::ACCESS-FUN: #<Compiled-function SVREF #x40FDE7E></div><div><br></div><div>  HI::JUMPS: #(515 515 515 515 515 ...)</div><div>  HI::LEN: 515</div><div>  #:G31365: 515</div><div>  HI::I: 197</div><div><br></div><div> Search-Pattern for </div><div> (34B9A4) : 11 (FUNCALL #'#<Anonymous Function #x5312366> :FORWARD "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak)</div><div>   (if (remove nil värden)</div><div>      (let (minv maxv)</div><div>         (setf minv (reduce #'min värden))</div><div>         (setf maxv (reduce #'max värden))</div><div>         (map 'list #'(lambda (värde) </div><div>                             (räkna-om-float värde </div><div>                                                      minv</div><div>                                                      maxv </div><div>                                                      nytt-golv nytt-tak))</div><div>                  värden))</div><div>      " #<Hemlock forward string-insensitive"(defmethod skala-om-float ((värden list) nytt-golv nytt-tak)</div><div>   (if (remove nil värden)</div><div>      (let (minv maxv)</div><div>         (setf minv (reduce #'min värden))</div><div>         (setf maxv (reduce #'max värden))</div><div>         (map 'list #'(lambda (värde) </div><div>                             (räkna-om-float värde </div><div>                                                      minv</div><div>                                                      maxv </div><div>                                                      nytt-golv nytt-tak))</div><div>                  värden))</div><div>      "></div><div>) 1143</div><div>  (HI::DIRECTION HI::PATTERN HI::OLD)</div><div>   HI::DIRECTION: :FORWARD</div><div>   HI::PATTERN: "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak)</div><div>   (if (remove nil värden)</div><div>      (let (minv maxv)</div><div>         (setf minv (reduce #'min värden))</div><div>         (setf maxv (reduce #'max värden))</div><div>         (map 'list #'(lambda (värde) </div><div>                             (räkna-om-float värde </div><div>                                                      minv</div><div>                                                      maxv </div><div>                                                      nytt-golv nytt-tak))</div><div>                  värden))</div><div>      "</div><div>   HI::OLD: #<Hemlock forward string-insensitive Search-Pattern for "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak)</div><div>   (if (remove nil värden)</div><div>      (let (minv maxv)</div><div>         (setf minv (reduce #'min värden))</div><div>         (setf maxv (reduce #'max värden))</div><div>         (map 'list #'(lambda (värde) </div><div>                             (räkna-om-float värde </div><div>                                                      minv</div><div>                                                      maxv </div><div>                                                      nytt-golv nytt-tak))</div><div>                  värden))</div><div>      "></div><div><br></div><div><br></div><div>  HI::FOLDED-STRING: "(DEFMETHOD SKALA-OM-FLOAT ((VÄRDEN LIST) NYTT-GOLV NYTT-TAK)</div><div>   (IF (REMOVE NIL VÄRDEN)</div><div>      (LET (MINV MAXV)</div><div>         (SETF MINV (REDUCE #'MIN VÄRDEN))</div><div>         (SETF MAXV (REDUCE #'MAX VÄRDEN))</div><div>         (MAP 'LIST #'(LAMBDA (VÄRDE) </div><div>                             (RÄKNA-OM-FLOAT VÄRDE </div><div>                                                      MINV</div><div>                                                      MAXV </div><div>                                                      NYTT-GOLV NYTT-TAK))</div><div>                  VÄRDEN))</div><div>      "</div><div>  HI::HASHED-STRING: #(40 68 69 70 77 ...)</div><div><br></div><div> (34B9C4) : 12 (MOVE-TO-SOURCE-NOTE #<SOURCE-NOTE *"ejs:environnement js 37.05.o;utilities;UTILITIES.LISP":12450-12973 "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak) (if (remove nil värden) (let (minv maxv) (setf minv (reduce...">) 503</div><div>  (HEMLOCK::SOURCE)</div><div>   HEMLOCK::SOURCE: #<SOURCE-NOTE *"ejs:environnement js 37.05.o;utilities;UTILITIES.LISP":12450-12973 "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak) (if (remove nil värden) (let (minv maxv) (setf minv (reduce..."></div><div><br></div><div>  HEMLOCK::START-POS: 12450</div><div>  HEMLOCK::FULL-TEXT: "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak)</div><div>   (if (remove nil värden)</div><div>      (let (minv maxv)</div><div>         (setf minv (reduce #'min värden))</div><div>         (setf maxv (reduce #'max värden))</div><div>         (map 'list #'(lambda (värde) </div><div>                             (räkna-om-float värde </div><div>                                                      minv</div><div>                                                      maxv </div><div>                                                      nytt-golv nytt-tak))</div><div>                  värden))</div><div>      "</div><div>  HEMLOCK::PATTERN: NIL</div><div>  HEMLOCK::OFFSET: 0</div><div>  HEMLOCK::TEMP-MARK: #<Hemlock Mark "^(defmethod skala-om-float ((värden list) nytt-golv nytt-tak)"></div><div>  HEMLOCK-INTERFACE:MARK: #<Hemlock Mark "^(defmethod skala-om-float ((värden list) nytt-golv nytt-tak)"></div><div>  STRING: "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak)</div><div>   (if (remove nil värden)</div><div>      (let (minv maxv)</div><div>         (setf minv (reduce #'min värden))</div><div>         (setf maxv (reduce #'max värden))</div><div>         (map 'list #'(lambda (värde) </div><div>                             (räkna-om-float värde </div><div>                                                      minv</div><div>                                                      maxv </div><div>                                                      nytt-golv nytt-tak))</div><div>                  värden))</div><div>      "</div><div><br></div><div> (34B9EC) : 13 (FIND-DEFINITION-IN-BUFFER #<METHOD-DEFINITION-TYPE METHOD #xC13017E> #<STANDARD-METHOD UTILITAIRES:SKALA-OM-FLOAT (LIST T T)> #<SOURCE-NOTE *"ejs:environnement js 37.05.o;utilities;UTILITIES.LISP":12450-12973 "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak) (if (remove nil värden) (let (minv maxv) (setf minv (reduce...">) 87</div><div>  (HEMLOCK::DEF-TYPE HEMLOCK::FULL-NAME HEMLOCK::SOURCE)</div><div>   HEMLOCK::DEF-TYPE: #<METHOD-DEFINITION-TYPE METHOD #xC13017E></div><div>   HEMLOCK::FULL-NAME: #<STANDARD-METHOD UTILITAIRES:SKALA-OM-FLOAT (LIST T T)></div><div>   HEMLOCK::SOURCE: #<SOURCE-NOTE *"ejs:environnement js 37.05.o;utilities;UTILITIES.LISP":12450-12973 "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak) (if (remove nil värden) (let (minv maxv) (setf minv (reduce..."></div><div><br></div><div><br></div><div><br></div><div> (34BA00) : 14 (FUNCALL #'#<#<STANDARD-METHOD HI::EXECUTE-HEMLOCK-KEY (HI:HEMLOCK-VIEW T)>> #<HI:HEMLOCK-VIEW #xC86FB46> #<COMPILED-LEXICAL-CLOSURE (:INTERNAL HEMLOCK::DEFN-ACTION HEMLOCK::EDIT-DEFINITION) #xC8077B6>) 287</div><div>  (HI::VIEW HI::KEY)</div><div>   HI::VIEW: #<HI:HEMLOCK-VIEW #xC86FB46></div><div>   HI::KEY: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL HEMLOCK::DEFN-ACTION HEMLOCK::EDIT-DEFINITION) #xC8077B6></div><div><br></div><div>  HI::*SAVED-STANDARD-OUTPUT*: #<SYNONYM-STREAM to *TERMINAL-IO* #xC613F06></div><div>  *STANDARD-OUTPUT*: #<GUI::COCOA-LISTENER-OUTPUT-STREAM #xC64D4FE></div><div><br></div><div> (34BA2C) : 15 (FUNCALL #'#<(:INTERNAL (HI::HANDLE-HEMLOCK-EVENT (HI:HEMLOCK-VIEW T)))>) 479</div><div>  NIL</div><div><br></div><div>  #:G28228: #<RESTART HI::EXIT-EVENT-HANDLER #xCC866></div><div>  #:G28224: (#<RESTART HI::EXIT-EVENT-HANDLER #xCC866>)</div><div>  CCL::%RESTARTS%: ((#<# # #xCC866>) (#<# # #xCC976> #<# # #xCC99E>) (#<# # #xCCB56>) (#<# # #xCCC66> #<# # #xCCC8E>) (#<# # #xCCFB6>))</div><div>  #:G28229: #<Compiled-function (:INTERNAL #) (Non-Global)  #x52888F6></div><div>  #:G28230: (ERROR #<Compiled-function # (Non-Global)  #x52888F6>)</div><div>  CCL::%HANDLERS%: ((ERROR #) (ERROR) (ERROR #) (CONDITION #) (CONDITION #))</div><div>  HI::KEY: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL HEMLOCK::DEFN-ACTION HEMLOCK::EDIT-DEFINITION) #xC8077B6></div><div>  HI::VIEW: #<HI:HEMLOCK-VIEW #xC86FB46></div><div><br></div><div> (34BA68) : 16 (INVOKE-MODIFYING-BUFFER-STORAGE #<Hemlock Buffer "UTILITIES.LISP /Users/js/ejs/environnement js 37.05.o/utilities/"> #<COMPILED-LEXICAL-CLOSURE (:INTERNAL #) #xC8809CE>) 415</div><div>  (GUI::BUFFER GUI::THUNK)</div><div>   GUI::BUFFER: #<Hemlock Buffer "UTILITIES.LISP /Users/js/ejs/environnement js 37.05.o/utilities/"></div><div>   GUI::THUNK: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL #) #xC8809CE></div><div><br></div><div>  GUI::OLD: #<Hemlock Buffer "Untitled 2"></div><div><br></div><div> (34BA98) : 17 (FUNCALL #'#<#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT (HI:HEMLOCK-VIEW T)>> #<HI:HEMLOCK-VIEW #xC86FB46> #<COMPILED-LEXICAL-CLOSURE (:INTERNAL HEMLOCK::DEFN-ACTION HEMLOCK::EDIT-DEFINITION) #xC8077B6>) 783</div><div>  (HI::VIEW HI::KEY)</div><div>   HI::VIEW: #<HI:HEMLOCK-VIEW #xC86FB46></div><div>   HI::KEY: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL HEMLOCK::DEFN-ACTION HEMLOCK::EDIT-DEFINITION) #xC8077B6></div><div><br></div><div>  #:ABORT-BREAK: #<RESTART ABORT-BREAK #xCC99E></div><div>  #:ABORT: #<RESTART ABORT #xCC976></div><div>  #:G28221: (#<RESTART ABORT #xCC976> #<RESTART ABORT-BREAK #xCC99E>)</div><div>  CCL::%RESTARTS%: ((#<# # #xCC976> #<# # #xCC99E>) (#<# # #xCCB56>) (#<# # #xCCC66> #<# # #xCCC8E>) (#<# # #xCCFB6>))</div><div>  HI::*CURRENT-VIEW*: #<HI:HEMLOCK-VIEW #xC86FB46></div><div>  HI::*CURRENT-BUFFER*: #<Hemlock Buffer "UTILITIES.LISP /Users/js/ejs/environnement js 37.05.o/utilities/"></div><div>  HI::*NEXT-VIEW-START*: NIL</div><div>  HI::TEXT-BUFFER: #<Hemlock Buffer "UTILITIES.LISP /Users/js/ejs/environnement js 37.05.o/utilities/"></div><div>  MOD: (223 0 . 0)</div><div><br></div><div> (34BAEC) : 18 (%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 863976)) 1055</div><div>  (<a href="CCL::MAGIC">CCL::MAGIC</a> &REST <a href="CCL::ARGS)">CCL::ARGS)</a></div><div>   <a href="CCL::MAGIC">CCL::MAGIC</a>: (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 863976)</div><div>   <a href="CCL::ARGS">CCL::ARGS</a>: NIL</div><div><br></div><div>  <a href="CCL::NEXT-METHODS">CCL::NEXT-METHODS</a>: (#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #>)</div><div>  <a href="CCL::ARGS">CCL::ARGS</a>: 863976</div><div>  CDR: NIL</div><div>  METHOD-FUNCTION: #<METHOD-FUNCTION HI::HANDLE-HEMLOCK-EVENT (HI:HEMLOCK-VIEW T)></div><div>  #:G103440: (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 863976)</div><div>  #:G103441: #<METHOD-FUNCTION HI::HANDLE-HEMLOCK-EVENT (HI:HEMLOCK-VIEW T)></div><div>  #:G103442: 863976</div><div><br></div><div> (34BB34) : 19 (FUNCALL #'#<#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT :AROUND (HI:HEMLOCK-VIEW T)>> #<HI:HEMLOCK-VIEW #xC86FB46> #<COMPILED-LEXICAL-CLOSURE (:INTERNAL HEMLOCK::DEFN-ACTION HEMLOCK::EDIT-DEFINITION) #xC8077B6>) 175</div><div>  (GUI::VIEW GUI::EVENT)</div><div>   GUI::VIEW: #<HI:HEMLOCK-VIEW #xC86FB46></div><div>   GUI::EVENT: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL HEMLOCK::DEFN-ACTION HEMLOCK::EDIT-DEFINITION) #xC8077B6></div><div><br></div><div>  #:NEXT-METHOD-CONTEXT: (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 863976)</div><div>  #:G45732: #<NS-AUTORELEASE-POOL <NSAutoreleasePool: 0x114060> (#x114060)></div><div><br></div><div> (34BB68) : 20 (%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT :AROUND #> #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #>) 863976) 679</div><div>  (<a href="CCL::METHODS">CCL::METHODS</a> <a href="CCL::ARGS)">CCL::ARGS)</a></div><div>   <a href="CCL::METHODS">CCL::METHODS</a>: (#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT :AROUND #> #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #>)</div><div>   <a href="CCL::ARGS">CCL::ARGS</a>: 863976</div><div><br></div><div>  <a href="CCL::CAR-METHS">CCL::CAR-METHS</a>: #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT :AROUND (HI:HEMLOCK-VIEW T)></div><div>  <a href="CCL::CELL-2">CCL::CELL-2</a>: (#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 863976)</div><div>  <a href="CCL::MAGIC">CCL::MAGIC</a>: (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 863976)</div><div>  #:G103376: (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 863976)</div><div>  #:G103377: #<METHOD-FUNCTION HI::HANDLE-HEMLOCK-EVENT :AROUND (HI:HEMLOCK-VIEW T)></div><div>  #:G103378: 863976</div><div><br></div><div> (34BBAC) : 21 (HANDLE-INVOKING-LISP-FUNCTION #<COMPILED-LEXICAL-CLOSURE (:INTERNAL HEMLOCK-EXT:EXECUTE-IN-FILE-VIEW) #xC807786> NIL NIL #<APPKIT-PROCESS Initial(0) [Active] #xC05C44E>) 575</div><div>  (GUI::THUNK GUI::RESULT-HANDLER GUI::CONTEXT &OPTIONAL GUI::INVOKING-PROCESS)</div><div>   GUI::THUNK: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL HEMLOCK-EXT:EXECUTE-IN-FILE-VIEW) #xC807786></div><div>   GUI::RESULT-HANDLER: NIL</div><div>   GUI::CONTEXT: NIL</div><div>   GUI::INVOKING-PROCESS: #<APPKIT-PROCESS Initial(0) [Active] #xC05C44E></div><div><br></div><div>  GUI::*INVOKING-EVENT-PROCESS*: #<APPKIT-PROCESS Initial(0) [Active] #xC05C44E></div><div>  GUI::*INVOKING-EVENT-CONTEXT*: NIL</div><div><br></div><div> (34BBE4) : 22 (FUNCALL #'#<(:INTERNAL HEMLOCK::DEFN-ACTION HEMLOCK::EDIT-DEFINITION)> ((#<# # #xC13017E> . #<#>) . #<SOURCE-NOTE *"ejs:environnement js 37.05.o;utilities;UTILITIES.LISP":12450-12973 "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak) (if (remove nil värden) (let (minv maxv) (setf minv (reduce...">) NIL) 407</div><div>  (HEMLOCK::DEFN &OPTIONAL HEMLOCK::MSG)</div><div>   HEMLOCK::DEFN: ((#<# # #xC13017E> . #<#>) . #<SOURCE-NOTE *"ejs:environnement js 37.05.o;utilities;UTILITIES.LISP":12450-12973 "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak) (if (remove nil värden) (let (minv maxv) (setf minv (reduce...">)</div><div>   HEMLOCK::MSG: NIL</div><div><br></div><div>  #:WHOLE38944: ((#<# # #xC13017E> . #<#>) . #<SOURCE-NOTE *"ejs:environnement js 37.05.o;utilities;UTILITIES.LISP":12450-12973 "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak) (if (remove nil värden) (let (minv maxv) (setf minv (reduce...">)</div><div>  #:ARGS38945: #<<a href="CCL::DESTRUCTURE-STATE">CCL::DESTRUCTURE-STATE</a> #xCCA6E></div><div>  #:REQ38946: (#<METHOD-DEFINITION-TYPE METHOD #xC13017E> . #<STANDARD-METHOD UTILITAIRES:SKALA-OM-FLOAT #>)</div><div>  #:WHOLE38947: (#<METHOD-DEFINITION-TYPE METHOD #xC13017E> . #<STANDARD-METHOD UTILITAIRES:SKALA-OM-FLOAT #>)</div><div>  #:ARGS38948: #<<a href="CCL::DESTRUCTURE-STATE">CCL::DESTRUCTURE-STATE</a> #xCCA4E></div><div>  HEMLOCK::DEF-TYPE: #<METHOD-DEFINITION-TYPE METHOD #xC13017E></div><div>  #:REST38949: #<STANDARD-METHOD UTILITAIRES:SKALA-OM-FLOAT (LIST T T)></div><div>  HEMLOCK::FULL-NAME: #<STANDARD-METHOD UTILITAIRES:SKALA-OM-FLOAT (LIST T T)></div><div>  #:REST38950: #<SOURCE-NOTE *"ejs:environnement js 37.05.o;utilities;UTILITIES.LISP":12450-12973 "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak) (if (remove nil värden) (let (minv maxv) (setf minv (reduce..."></div><div>  HEMLOCK::SOURCE: #<SOURCE-NOTE *"ejs:environnement js 37.05.o;utilities;UTILITIES.LISP":12450-12973 "(defmethod skala-om-float ((värden list) nytt-golv nytt-tak) (if (remove nil värden) (let (minv maxv) (setf minv (reduce..."></div><div><br></div><div> (34BC20) : 23 (GET-DEF-INFO-AND-GO-TO-IT "ut:skala-om-float" #<Package "COMMON-LISP-USER">) 951</div><div>  (STRING PACKAGE)</div><div>   STRING: "ut:skala-om-float"</div><div>   PACKAGE: #<Package "COMMON-LISP-USER"></div><div><br></div><div>  HEMLOCK::FUN-NAME: UTILITAIRES:SKALA-OM-FLOAT</div><div>  ERROR: NIL</div><div>  #:G38832: (ERROR)</div><div>  CCL::%HANDLERS%: ((ERROR) (ERROR #) (CONDITION #) (CONDITION #))</div><div><br></div><div> (34BC4C) : 24 (FUNCALL #'#<#<STANDARD-METHOD HI::EXECUTE-HEMLOCK-KEY (HI:HEMLOCK-VIEW T)>> #<HI:HEMLOCK-VIEW #xC80199E> #<Key-Event M-.>) 975</div><div>  (HI::VIEW HI::KEY)</div><div>   HI::VIEW: #<HI:HEMLOCK-VIEW #xC80199E></div><div>   HI::KEY: #<Key-Event M-.></div><div><br></div><div>  HI::*SAVED-STANDARD-OUTPUT*: #<SYNONYM-STREAM to *TERMINAL-IO* #xC613F06></div><div>  *STANDARD-OUTPUT*: #<GUI::COCOA-LISTENER-OUTPUT-STREAM #xC64D4FE></div><div>  HI::MAIN-BINDING: #<Hemlock Command "Goto Definition"></div><div>  HI::TRANSPARENT-BINDINGS: NIL</div><div>  HI::*LAST-LAST-COMMAND-TYPE*: NIL</div><div>  HI::*LAST-PREFIX-ARGUMENT*: NIL</div><div><br></div><div> (34BC98) : 25 (FUNCALL #'#<(:INTERNAL (HI::HANDLE-HEMLOCK-EVENT (HI:HEMLOCK-VIEW T)))>) 479</div><div>  NIL</div><div><br></div><div>  #:G28228: #<RESTART HI::EXIT-EVENT-HANDLER #xCCB56></div><div>  #:G28224: (#<RESTART HI::EXIT-EVENT-HANDLER #xCCB56>)</div><div>  CCL::%RESTARTS%: ((#<# # #xCCB56>) (#<# # #xCCC66> #<# # #xCCC8E>) (#<# # #xCCFB6>))</div><div>  #:G28229: #<Compiled-function (:INTERNAL #) (Non-Global)  #x52888F6></div><div>  #:G28230: (ERROR #<Compiled-function # (Non-Global)  #x52888F6>)</div><div>  CCL::%HANDLERS%: ((ERROR #) (CONDITION #) (CONDITION #))</div><div>  HI::KEY: #<Key-Event M-.></div><div>  HI::VIEW: #<HI:HEMLOCK-VIEW #xC80199E></div><div><br></div><div> (34BCD4) : 26 (INVOKE-MODIFYING-BUFFER-STORAGE #<Hemlock Buffer "Untitled 2"> #<COMPILED-LEXICAL-CLOSURE (:INTERNAL #) #xC807B2E>) 415</div><div>  (GUI::BUFFER GUI::THUNK)</div><div>   GUI::BUFFER: #<Hemlock Buffer "Untitled 2"></div><div>   GUI::THUNK: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL #) #xC807B2E></div><div><br></div><div>  GUI::OLD: NIL</div><div><br></div><div> (34BD04) : 27 (FUNCALL #'#<#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT (HI:HEMLOCK-VIEW T)>> #<HI:HEMLOCK-VIEW #xC80199E> #<Key-Event M-.>) 783</div><div>  (HI::VIEW HI::KEY)</div><div>   HI::VIEW: #<HI:HEMLOCK-VIEW #xC80199E></div><div>   HI::KEY: #<Key-Event M-.></div><div><br></div><div>  #:ABORT-BREAK: #<RESTART ABORT-BREAK #xCCC8E></div><div>  #:ABORT: #<RESTART ABORT #xCCC66></div><div>  #:G28221: (#<RESTART ABORT #xCCC66> #<RESTART ABORT-BREAK #xCCC8E>)</div><div>  CCL::%RESTARTS%: ((#<# # #xCCC66> #<# # #xCCC8E>) (#<# # #xCCFB6>))</div><div>  HI::*CURRENT-VIEW*: #<HI:HEMLOCK-VIEW #xC80199E></div><div>  HI::*CURRENT-BUFFER*: #<Hemlock Buffer "Untitled 2"></div><div>  HI::*NEXT-VIEW-START*: NIL</div><div>  HI::TEXT-BUFFER: #<Hemlock Buffer "Untitled 2"></div><div>  MOD: (221 17 . 17)</div><div><br></div><div> (34BD58) : 28 (%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 864130)) 1055</div><div>  (<a href="CCL::MAGIC">CCL::MAGIC</a> &REST <a href="CCL::ARGS)">CCL::ARGS)</a></div><div>   <a href="CCL::MAGIC">CCL::MAGIC</a>: (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 864130)</div><div>   <a href="CCL::ARGS">CCL::ARGS</a>: NIL</div><div><br></div><div>  <a href="CCL::NEXT-METHODS">CCL::NEXT-METHODS</a>: (#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #>)</div><div>  <a href="CCL::ARGS">CCL::ARGS</a>: 864130</div><div>  CDR: NIL</div><div>  METHOD-FUNCTION: #<METHOD-FUNCTION HI::HANDLE-HEMLOCK-EVENT (HI:HEMLOCK-VIEW T)></div><div>  #:G103440: (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 864130)</div><div>  #:G103441: #<METHOD-FUNCTION HI::HANDLE-HEMLOCK-EVENT (HI:HEMLOCK-VIEW T)></div><div>  #:G103442: 864130</div><div><br></div><div> (34BDA0) : 29 (FUNCALL #'#<#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT :AROUND (HI:HEMLOCK-VIEW T)>> #<HI:HEMLOCK-VIEW #xC80199E> #<Key-Event M-.>) 175</div><div>  (GUI::VIEW GUI::EVENT)</div><div>   GUI::VIEW: #<HI:HEMLOCK-VIEW #xC80199E></div><div>   GUI::EVENT: #<Key-Event M-.></div><div><br></div><div>  #:NEXT-METHOD-CONTEXT: (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 864130)</div><div>  #:G45732: #<NS-AUTORELEASE-POOL <NSAutoreleasePool: 0x1d31c0> (#x1D31C0)></div><div><br></div><div> (34BDD4) : 30 (%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT :AROUND #> #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #>) 864130) 679</div><div>  (<a href="CCL::METHODS">CCL::METHODS</a> <a href="CCL::ARGS)">CCL::ARGS)</a></div><div>   <a href="CCL::METHODS">CCL::METHODS</a>: (#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT :AROUND #> #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #>)</div><div>   <a href="CCL::ARGS">CCL::ARGS</a>: 864130</div><div><br></div><div>  <a href="CCL::CAR-METHS">CCL::CAR-METHS</a>: #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT :AROUND (HI:HEMLOCK-VIEW T)></div><div>  <a href="CCL::CELL-2">CCL::CELL-2</a>: (#<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 864130)</div><div>  <a href="CCL::MAGIC">CCL::MAGIC</a>: (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 864130)</div><div>  #:G103376: (NIL #<STANDARD-METHOD HI::HANDLE-HEMLOCK-EVENT #> . 864130)</div><div>  #:G103377: #<METHOD-FUNCTION HI::HANDLE-HEMLOCK-EVENT :AROUND (HI:HEMLOCK-VIEW T)></div><div>  #:G103378: 864130</div><div><br></div><div> (34BE14) : 31 (FUNCALL #'#<GUI::|-[HemlockTextstorageTextView keyDown:]|> -268436182) 1215</div><div>  (#:G45698)</div><div>   #:G45698: -268436182</div><div><br></div><div>  #:G45713: #<A Foreign Pointer [stack-allocated] #xBFFFF4A8></div><div>  #:G45699: #<A Foreign Pointer [stack-allocated] #xBFFFF4A8></div><div>  #:COMPILER-VAR: (NIL)</div><div>  #:G45703: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL GUI::|-[HemlockTextstorageTextView keyDown:]|) #xCCD66></div><div>  #:G45714: (CONDITION #<COMPILED-LEXICAL-CLOSURE # #xCCD66>)</div><div>  CCL::%HANDLERS%: ((CONDITION #) (CONDITION #))</div><div>  GUI::SELF: #<HEMLOCK-TEXT-VIEW <HemlockTextView: 0x88002000></div><div>    Frame = {{0.00, 0.00}, {585.00, 336.00}}, Bounds = {{0.00, 0.00}, {585.00, 336.00}}</div><div>    Horizontally resizable: YES, Vertically resizable: YES</div><div>    MinSize = {585.00, 336.00}, MaxSize = {10000000.00, 10000000.00}</div><div> (#x88002000)></div><div>  GUI::EVENT: #<NS-EVENT NSEvent: type=KeyDown loc=(0,392) time=65682.4 flags=0xa0122 win=0x0 winNum=1808 ctxt=0x12687 chars="" unmodchars="." repeat=0 keyCode=43 (#x3AE3390)></div><div>  GUI::VIEW: #<HI:HEMLOCK-VIEW #xC80199E></div><div>  GUI::QUOTE-P: NIL</div><div>  GUI::HEMLOCK-KEY: #<Key-Event M-.></div><div><br></div><div> (34BE54) : 32 (%PASCAL-FUNCTIONS% 73 -268436182) 343</div><div>  (<a href="CCL::INDEX">CCL::INDEX</a> <a href="CCL::ARGS-PTR-FIXNUM)">CCL::ARGS-PTR-FIXNUM)</a></div><div>   <a href="CCL::INDEX">CCL::INDEX</a>: 73</div><div>   <a href="CCL::ARGS-PTR-FIXNUM">CCL::ARGS-PTR-FIXNUM</a>: -268436182</div><div><br></div><div>  <a href="CCL::LISP-FUNCTION">CCL::LISP-FUNCTION</a>: #<Compiled-function GUI::|-[HemlockTextstorageTextView keyDown:]| (Non-Global)  #x54D51BE></div><div>  WITHOUT-INTERRUPTS: NIL</div><div>  <a href="CCL::*CALLBACK-TRACE-P*">CCL::*CALLBACK-TRACE-P*</a>: NIL</div><div><br></div><div> (34BE9C) : 33 (FUNCALL #'#<Anonymous Function #x4D73CCE> #<A Foreign Pointer [stack-allocated] (:* #) #xBFFFF900> #<A Foreign Pointer #x92DF24B8> #<NS-EVENT NSEvent: type=KeyDown loc=(0,392) time=65682.4 flags=0xa0122 win=0x0 winNum=1808 ctxt=0x12687 chars="" unmodchars="." repeat=0 keyCode=43 (#x3AE3390)>) 407</div><div>  (#:G6384 #:G6385 <a href="CCL::ARG0)">CCL::ARG0)</a></div><div>   #:G6384: #<A Foreign Pointer [stack-allocated] (:* #) #xBFFFF900></div><div>   #:G6385: #<A Foreign Pointer #x92DF24B8></div><div>   <a href="CCL::ARG0">CCL::ARG0</a>: #<NS-EVENT NSEvent: type=KeyDown loc=(0,392) time=65682.4 flags=0xa0122 win=0x0 winNum=1808 ctxt=0x12687 chars="" unmodchars="." repeat=0 keyCode=43 (#x3AE3390)></div><div><br></div><div><br></div><div><br></div><div> (34BEB0) : 34 (%CALL-NEXT-OBJC-METHOD #<LISP-APPLICATION <LispApplication: 0x80fc00> (#x80FC00)> #<OBJC:OBJC-CLASS GUI::LISP-APPLICATION (#x1148B0)> #<A Foreign Pointer #x92DF24B8> (:VOID :ID) #<NS-EVENT NSEvent: type=KeyDown loc=(0,392) time=65682.4 flags=0xa0122 win=0x0 winNum=1808 ctxt=0x12687 chars="" unmodchars="." repeat=0 keyCode=43 (#x3AE3390)>) 1191</div><div>  (<a href="CCL::SELF">CCL::SELF</a> CLASS <a href="CCL::SELECTOR">CCL::SELECTOR</a> <a href="CCL::SIG">CCL::SIG</a> &REST <a href="CCL::ARGS)">CCL::ARGS)</a></div><div>   <a href="CCL::SELF">CCL::SELF</a>: #<LISP-APPLICATION <LispApplication: 0x80fc00> (#x80FC00)></div><div>   CLASS: #<OBJC:OBJC-CLASS GUI::LISP-APPLICATION (#x1148B0)></div><div>   <a href="CCL::SELECTOR">CCL::SELECTOR</a>: #<A Foreign Pointer #x92DF24B8></div><div>   <a href="CCL::SIG">CCL::SIG</a>: (:VOID :ID)</div><div>   <a href="CCL::ARGS">CCL::ARGS</a>: (#<NS-EVENT NSEvent: type=KeyDown loc=(0,392) time=65682.4 flags=0xa0122 win=0x0 winNum=1808 ctxt=0x12687 chars="" unmodchars="." repeat=0 keyCode=43 (#x3AE3390)>)</div><div><br></div><div>  <a href="CCL::S">CCL::S</a>: #<A Foreign Pointer [stack-allocated] (:* #) #xBFFFF900></div><div>  <a href="CCL::SIGINFO">CCL::SIGINFO</a>: #S(<a href="CCL::OBJC-METHOD-SIGNATURE-INFO">CCL::OBJC-METHOD-SIGNATURE-INFO</a> :TYPE-SIGNATURE (:VOID :ID) :FUNCTION #<Anonymous Function #x4D73AAE> ...)</div><div>  FUNCTION: #<Anonymous Function #x4D73CCE></div><div>  #:G2753: #<A Foreign Pointer [stack-allocated] (:* #) #xBFFFF890></div><div>  #:G2754: -268435942</div><div><br></div><div> (34BF00) : 35 (FUNCALL #'#<GUI::|-[LispApplication sendEvent:]|> -268435870) 919</div><div>  (#:G24204)</div><div>   #:G24204: -268435870</div><div><br></div><div>  #:G24219: #<A Foreign Pointer [stack-allocated] #xBFFFF988></div><div>  #:G24205: #<A Foreign Pointer [stack-allocated] #xBFFFF988></div><div>  #:COMPILER-VAR: (NIL)</div><div>  #:G24209: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL GUI::|-[LispApplication sendEvent:]|) #xCCE86></div><div>  #:G24220: (CONDITION #<COMPILED-LEXICAL-CLOSURE # #xCCE86>)</div><div>  CCL::%HANDLERS%: ((CONDITION #))</div><div>  GUI::SELF: #<LISP-APPLICATION <LispApplication: 0x80fc00> (#x80FC00)></div><div>  GUI::E: #<NS-EVENT NSEvent: type=KeyDown loc=(0,392) time=65682.4 flags=0xa0122 win=0x0 winNum=1808 ctxt=0x12687 chars="" unmodchars="." repeat=0 keyCode=43 (#x3AE3390)></div><div>  <a href="CCL::ARGS">CCL::ARGS</a>: (#<NS-EVENT NSEvent: type=KeyDown loc=(0,392) time=65682.4 flags=0xa0122 win=0x0 winNum=1808 ctxt=0x12687 chars="" unmodchars="." repeat=0 keyCode=43 (#x3AE3390)>)</div><div><br></div><div> (34BF38) : 36 (%PASCAL-FUNCTIONS% 15 -268435870) 343</div><div>  (<a href="CCL::INDEX">CCL::INDEX</a> <a href="CCL::ARGS-PTR-FIXNUM)">CCL::ARGS-PTR-FIXNUM)</a></div><div>   <a href="CCL::INDEX">CCL::INDEX</a>: 15</div><div>   <a href="CCL::ARGS-PTR-FIXNUM">CCL::ARGS-PTR-FIXNUM</a>: -268435870</div><div><br></div><div>  <a href="CCL::LISP-FUNCTION">CCL::LISP-FUNCTION</a>: #<Compiled-function GUI::|-[LispApplication sendEvent:]| (Non-Global)  #x5180DF6></div><div>  WITHOUT-INTERRUPTS: NIL</div><div>  <a href="CCL::*CALLBACK-TRACE-P*">CCL::*CALLBACK-TRACE-P*</a>: NIL</div><div><br></div><div> (34BF80) : 37 (FUNCALL #'#<Anonymous Function #x4CB01FE> #<LISP-APPLICATION <LispApplication: 0x80fc00> (#x80FC00)> #S(<a href="CCL::OBJC-SELECTOR">CCL::OBJC-SELECTOR</a> :NAME "run" :%SEL #<A Foreign Pointer #x92E9CA24>)) 199</div><div>  (#:G3305 #:G3306)</div><div>   #:G3305: #<LISP-APPLICATION <LispApplication: 0x80fc00> (#x80FC00)></div><div>   #:G3306: #S(<a href="CCL::OBJC-SELECTOR">CCL::OBJC-SELECTOR</a> :NAME "run" :%SEL #<A Foreign Pointer #x92E9CA24>)</div><div><br></div><div><br></div><div><br></div><div> (34BF90) : 38 (FUNCALL #'#<(:OBJC-DISPATCH NEXTSTEP-FUNCTIONS:|run|)> ???) 983</div><div>  NIL</div><div><br></div><div><br></div><div><br></div><div> (34BFC8) : 39 (EVENT-LOOP NIL) 383</div><div>  (&OPTIONAL GUI::END-TEST)</div><div>   GUI::END-TEST: NIL</div><div><br></div><div>  GUI::APP: #<LISP-APPLICATION <LispApplication: 0x80fc00> (#x80FC00)></div><div>  GUI::THREAD: #<APPKIT-PROCESS Initial(0) [Active] #xC05C44E></div><div>  #:ABORT: #<RESTART ABORT #xCCFB6></div><div>  #:G26660: (#<RESTART ABORT #xCCFB6>)</div><div>  CCL::%RESTARTS%: ((#<# # #xCCFB6>))</div><div><br></div></div><br><div><div>Le 4 avr. 10 ā 09:15, Walker Sigismund a écrit :</div><br class="Apple-interchange-newline"><blockquote type="cite"><div><br>Obviously I am starting off with inattention, I blame failure to make a pot of coffee first thing.  Doing it afresh with apologies (please make coffee first).  <br><br><br>For the third and hopefully last time--I have tried it this time and it works for me from a fresh copy of CCL--here is an example file for debugging purposes of the "sky is falling" problem.<br><br>First place the file on your desktop (its just any old file created in MCL).<br><br><span><UrWerk.lisp></span><br><br><br><br>Second load it (load "/Users/muse/Desktop/UrWerk.lisp")<br><br>Third do meta dot on one of the containing definitions and the "Sky will fall":  Urwerk-file-create-date<br><br><br><br><br></div></blockquote></div><br><div> <span class="Apple-style-span" style="font-size: 12px; "><div><font class="Apple-style-span" color="#595959" face="'Trebuchet MS'"><br class="Apple-interchange-newline"><br></font></div><div><font class="Apple-style-span" color="#595959" face="'Trebuchet MS'"><br></font></div><div><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">Joakim Sandgren</font></div><div><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">joakim sandgren musik</font></div><div><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">42, rue de Maubeuge</font></div><div><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">75009 Paris</font></div><div><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">France</font></div><div><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">+33 (0)1 45 26 43 90</font></div><div><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959"><a href="mailto:info@joakimsandgren.com">info@joakimsandgren.com</a></font></div><div><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959"><a href="http://www.joakimsandgren.com/">http://www.joakimsandgren.com</a></font></div></span> </div><br></body></html>