SBCL 2.5.9.105-56015d7ab / ASDF 3.3.5
; file: /home/quicklisp/quicklisp-controller/dist/build-cache/cl-factoring/773a33d4c38725d5eb0282dc64e2c880c48c38a5/cl-factoring-20251102-git/ulimyhmpqs-1.0.lisp ; in: DEFUN A-GENERATOR ; (IF ULIMY-HMPQS::REPORT2 ; (FORMAT T "Out of hypercubes at ~S~%" ULIMY-HMPQS::LOG10N)) ; ; note: deleting unreachable code ; (- ULIMY-HMPQS::*NR-OF-STORED-PRIMES* 1 (RANDOM 10000)) ; ; note: deleting unreachable code ; (MULTIPLE-VALUE-BIND (ULIMY-HMPQS::HELPF ULIMY-HMPQS::TTLT) ; (ULIMY-HMPQS::QS (* ULIMY-HMPQS::N ULIMY-HMPQS::HELP) :REPORT2 ; ULIMY-HMPQS::REPORT2) ; (LET ((ULIMY-HMPQS::F (REMOVE ULIMY-HMPQS::HELP ULIMY-HMPQS::HELPF))) ; (ULIMY-HMPQS::CENTERED-REPORT2 ULIMY-HMPQS::F) ; (VALUES ULIMY-HMPQS::F ULIMY-HMPQS::TTLT))) ; ; note: deleting unreachable code Unhandled SB-EXT:DEFCONSTANT-UNEQL in thread #<SB-THREAD:THREAD tid=928232 "main thread" RUNNING {1200030003}>: The constant MINUTES-PER-INTERNAL-TIME-UNIT is being redefined (from 1.6666668e-8 to 1.6666666e-8) See also: The ANSI Standard, Macro DEFCONSTANT The SBCL Manual, Node "Idiosyncrasies" Backtrace for: #<SB-THREAD:THREAD tid=928232 "main thread" RUNNING {1200030003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<SB-EXT:DEFCONSTANT-UNEQL {12081C6FA3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK SB-EXT:*INVOKE-DEBUGGER-HOOK* #<SB-EXT:DEFCONSTANT-UNEQL {12081C6FA3}>) 2: (INVOKE-DEBUGGER #<SB-EXT:DEFCONSTANT-UNEQL {12081C6FA3}>) 3: (CERROR "Go ahead and change the value." #<SB-EXT:DEFCONSTANT-UNEQL {12081C6FA3}>) 4: (SB-KERNEL:WITH-SIMPLE-CONDITION-RESTARTS CERROR "Go ahead and change the value." SB-EXT:DEFCONSTANT-UNEQL :NAME MINUTES-PER-INTERNAL-TIME-UNIT :OLD-VALUE 1.6666668e-8 :NEW-VALUE 1.6666666e-8) 5: (SB-IMPL::%DEFCONSTANT MINUTES-PER-INTERNAL-TIME-UNIT 1.6666666e-8 #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING "/home/quicklisp/quicklisp-controller/dist/build-cache/cl-factoring/773a33d4c38725d5eb0282dc64e2c880c48c38a5/cl-factoring-20251102-git/ulimyhmpqs-1.0.lisp" :INDICES 2260993) NIL) 6: ("top level form") [toplevel] 7: (SB-FASL::LOAD-FASL-GROUP #S(SB-FASL::FASL-INPUT :STREAM #<SB-SYS:FD-STREAM for #<(SIMPLE-BASE-STRING 227) file /home/quicklisp/.cache/common-lisp/sbcl-2.5.9.105-56015d7ab-linux-x64/home/quicklisp/quicklisp-controller/dist/build-cache/cl-factoring/773a33d4c38725d5eb0282dc64e2c880c48c38a5/cl-factoring-20251... {12080C5F3F}> {12080C6083}> :TABLE #(1625 #1="/home/quicklisp/quicklisp-controller/dist/build-cache/cl-factoring/773a33d4c38725d5eb0282dc64e2c880c48c38a5/cl-factoring-20251102-git/ulimyhmpqs-1.0.lisp" #2="ULIMY-HMPQS" #3="CL" (#3#) #4="HMPQS" (#4#) (#2#) #<SB-KERNEL:LAYOUT (ID=-4) for SB-C:DEFINITION-SOURCE-LOCATION {50000683}> #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING #1# :INDICES 32769) #5="top level form" #<PACKAGE "COMMON-LISP-USER"> ...) :STACK #(0 #<FUNCTION #5# {120396B78B}> SIEVE-FOR-AB B-GENERATOR FB-LOG-SUM TOPOFF-INDEX #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING #1# :INDICES 2031617) TOPOFF-BUCKET #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING #1# :INDICES 2064385) MAKE-TOPOFF-N-CUBES #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING #1# :INDICES 2097153) MERGE-CUBES ...) :NAME-BUFFER #("