Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Loading of McClim fails under Roswell but not plain SBCL [Win & Linux] #570

Open
Mr-Dispatch opened this issue Sep 29, 2023 · 0 comments
Open

Comments

@Mr-Dispatch
Copy link

Mr-Dispatch commented Sep 29, 2023

Environment

$ winver
Win10 22h2 (build 19045.3086)
$ ros --version
roswell 21.01.14.108
$ ros config
sbcl.version=2.3.6
msys2.version=20220603
emacs.type=sly
sly.version=git
setup.time=3899261854
sbcl-bin.version=2.3.2
default.lisp=sbcl

How to reproduce the issue

(I have ultralisp enabled; even tried latest cloned repo - led to the same issue)

(ql:quickload :mcclim)

Expected behavior

McClim loads.

Actual result

The name "CLIMI" does not designate any package.
   [Condition of type PACKAGE-DOES-NOT-EXIST]

Restarts:
 0: [CONTINUE] Use the current package, COMMON-LISP-USER.
 1: [RETRY] Retry finding the package.
 2: [USE-VALUE] Specify a different package
 3: [RETRY] Retry compiling #<CL-SOURCE-FILE "mcclim-fonts/truetype" "truetype-package">.
 4: [ACCEPT] Continue, treating compiling #<CL-SOURCE-FILE "mcclim-fonts/truetype" "truetype-package"> as having been successful.
 5: [RETRY] Retry ASDF operation.
 --more--

Backtrace:
 0: (SB-INT:%FIND-PACKAGE-OR-LOSE "CLIMI")
 1: (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "CLIMI")
 2: (SB-IMPL::USE-LIST-PACKAGES NIL ("CLIMI" "CLIM" "CLIM-LISP" "CLIMB" "CLIME"))
 3: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-IMPL::%DEFPACKAGE))
 4: ((FLET "WITHOUT-INTERRUPTS-BODY-12" :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
 5: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<FUNCTION (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-IMPL::%DEFPACKAGE) {580CC7B}> #<SB-THREAD:MUTEX "Package Graph Lock" taken owner=sly-channel-1-mrepl-r..
 6: (SB-IMPL::%DEFPACKAGE "MCCLIM-TRUETYPE" NIL NIL NIL NIL ("CLIMI" "CLIM" "CLIM-LISP" "CLIMB" "CLIME") (("ALEXANDRIA" "ENSURE-GETHASH" "WHEN-LET" "IF-LET" "MINF" "MAXF" ...)) NIL ("*TRUETYPE-FONT-PATH*"..
 7: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SB-IMPL::%DEFPACKAGE "MCCLIM-TRUETYPE" (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) ...) #<NULL-LEXENV>)
 8: (SB-INT:SIMPLE-EVAL-IN-LEXENV (PROGN (SB-IMPL::%DEFPACKAGE "MCCLIM-TRUETYPE" (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) ...)) #<NULL-LEXENV>)
 9: (EVAL-TLF (PROGN (SB-IMPL::%DEFPACKAGE "MCCLIM-TRUETYPE" (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) ...)) 0 #<NULL-LEXENV>)
10: ((FLET SB-C::FROB :IN SB-C::EVAL-COMPILE-TOPLEVEL))
11: (SB-C::EVAL-COMPILE-TOPLEVEL ((SB-IMPL::%DEFPACKAGE "MCCLIM-TRUETYPE" (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) ...)) (#1=(SB-IMPL::%DEFPACKAGE "MCCLIM-TRUETYPE" (QUOTE NIL) (QUOTE NIL) (QUOTE N..
12: (SB-C::PROCESS-TOPLEVEL-FORM (SB-IMPL::%DEFPACKAGE "MCCLIM-TRUETYPE" (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) ...) ((EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (SB-IMPL::%DEFPACKAGE ..
13: (SB-C::PROCESS-TOPLEVEL-PROGN ((SB-IMPL::%DEFPACKAGE "MCCLIM-TRUETYPE" (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) ...)) ((EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (SB-IMPL::%DEFPACKA..
14: (SB-C::PROCESS-TOPLEVEL-FORM (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (SB-IMPL::%DEFPACKAGE "MCCLIM-TRUETYPE" (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) (QUOTE NIL) ...)) (SB-C::ORIGINAL-SOURCE..
15: (SB-C::PROCESS-TOPLEVEL-FORM (DEFPACKAGE #:MCCLIM-TRUETYPE (:USE #:CLIMI #:CLIM #:CLIM-LISP #:CLIMB #:CLIME) (:IMPORT-FROM :ALEXANDRIA #:ENSURE-GETHASH #:WHEN-LET #:IF-LET #:MINF ...) (:EXPORT #:*TRUE..
16: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-C::SUB-COMPILE-FILE) (DEFPACKAGE #:MCCLIM-TRUETYPE (:USE #:CLIMI #:CLIM #:CLIM-LISP #:CLIMB #:CLIME) (:IMPORT-FROM :ALEXANDRIA #:..
17: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-C::SUB-COMPILE-FILE) {21C5821B}> #<SB-C::SOURCE-INFO {10016CA753}> SB-C::INPUT-ERROR-IN-COMP..
18: ((LAMBDA NIL :IN SB-C::SUB-COMPILE-FILE))
19: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
20: (SB-C::SUB-COMPILE-FILE #<SB-C::SOURCE-INFO {10016CA753}> NIL)
21: (COMPILE-FILE #P"C:/Users/ares/.roswell/local-projects/McCLIM/Extensions/fonts/truetype-package.lisp" :OUTPUT-FILE #P"C:/Users/ares/AppData/Local/cache/common-lisp/sbcl-2.3.8-win-x64/C/Users/ares/.ros..
22: (UIOP/UTILITY:CALL-WITH-MUFFLED-CONDITIONS #<FUNCTION (LAMBDA NIL :IN UIOP/LISP-BUILD:COMPILE-FILE*) {100180936B}> NIL)
23: (UIOP/PATHNAME:CALL-WITH-ENOUGH-PATHNAME #P"C:/Users/ares/.roswell/local-projects/McCLIM/Extensions/fonts/truetype-package.lisp" NIL #<FUNCTION (LAMBDA (UIOP/LISP-BUILD::INPUT-FILE) :IN UIOP/LISP-BUIL..
24: (UIOP/LISP-BUILD:COMPILE-FILE* #P"C:/Users/ares/.roswell/local-projects/McCLIM/Extensions/fonts/truetype-package.lisp" :OUTPUT-FILE #P"C:/Users/ares/AppData/Local/cache/common-lisp/sbcl-2.3.8-win-x64/..
25: (ASDF/LISP-ACTION:PERFORM-LISP-COMPILATION #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "mcclim-fonts/truetype" "truetype-package">)
26: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "mcclim-fonts/truetype" "truetype-package">)
27: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
28: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "mcclim-fonts/truetype" "truetype-package">) [fast-method]
29: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1001A52ED3}>) [fast-method]
30: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
31: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1001A52ED3}>) [fast-method]
32: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "mcclim"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
33: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "mcclim"> :VERBOSE NIL)
34: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
35: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "mcclim"> :VERBOSE NIL) [fast-method]
36: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "mcclim" :VERBOSE NIL)
37: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
38: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "mcclim" :VERBOSE NIL) [fast-method]
39: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1001A758DB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
40: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
41: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1001A6988B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
42: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "mcclim" :VERBOSE NIL) [fast-method]
43: (ASDF/OPERATE:LOAD-SYSTEM "mcclim" :VERBOSE NIL)
44: (QUICKLISP-CLIENT::CALL-WITH-MACROEXPAND-PROGRESS #<FUNCTION (LAMBDA NIL :IN QUICKLISP-CLIENT::APPLY-LOAD-STRATEGY) {1001A6941B}>)
45: (QUICKLISP-CLIENT::AUTOLOAD-SYSTEM-AND-DEPENDENCIES "mcclim" :PROMPT NIL)
46: ((:METHOD QL-IMPL-UTIL::%CALL-WITH-QUIET-COMPILATION (T T)) #<unused argument> #<FUNCTION (FLET QUICKLISP-CLIENT::QL :IN QUICKLISP-CLIENT:QUICKLOAD) {10018F1CBB}>) [fast-method]
47: ((:METHOD QL-IMPL-UTIL::%CALL-WITH-QUIET-COMPILATION :AROUND (QL-IMPL:SBCL T)) #<QL-IMPL:SBCL {1004A89003}> #<FUNCTION (FLET QUICKLISP-CLIENT::QL :IN QUICKLISP-CLIENT:QUICKLOAD) {10018F1CBB}>) [fast-m..
48: ((:METHOD QUICKLISP-CLIENT:QUICKLOAD (T)) :MCCLIM :PROMPT NIL :SILENT NIL :VERBOSE NIL) [fast-method]
49: (QL-DIST::CALL-WITH-CONSISTENT-DISTS #<FUNCTION (LAMBDA NIL :IN QUICKLISP-CLIENT:QUICKLOAD) {10018CD4EB}>)
50: (SB-INT:SIMPLE-EVAL-IN-LEXENV (QUICKLISP-CLIENT:QUICKLOAD :MCCLIM) #<NULL-LEXENV>)
51: (EVAL (QUICKLISP-CLIENT:QUICKLOAD :MCCLIM))
52: ((LAMBDA NIL :IN SLYNK-MREPL::MREPL-EVAL-1))
53: (SLYNK::CALL-WITH-RETRY-RESTART "Retry SLY mREPL evaluation request." #<FUNCTION (LAMBDA NIL :IN SLYNK-MREPL::MREPL-EVAL-1) {10018CCADB}>)
54: ((LAMBDA NIL :IN SLYNK-MREPL::MREPL-EVAL-1))
55: ((LAMBDA NIL :IN SLYNK::CALL-WITH-LISTENER))
56: (SLYNK::CALL-WITH-BINDINGS ((*PACKAGE* . #<PACKAGE "COMMON-LISP-USER">) (*DEFAULT-PATHNAME-DEFAULTS* . #P"c:/Users/ares/.roswell/local-projects/") (*) (**) (***) (/) ...) #<FUNCTION (LAMBDA NIL :IN SL..
57: (SLYNK-MREPL::MREPL-EVAL-1 #<SLYNK-MREPL::MREPL mrepl-1-1> "(ql:quickload :mcclim)")
58: (SLYNK-MREPL::MREPL-EVAL #<SLYNK-MREPL::MREPL mrepl-1-1> "(ql:quickload :mcclim)")
59: (SLYNK:PROCESS-REQUESTS NIL)
60: ((LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD))
61: ((LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD))
62: (SLYNK-SBCL::CALL-WITH-BREAK-HOOK #<FUNCTION SLYNK:SLYNK-DEBUGGER-HOOK> #<FUNCTION (LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD) {1002877FDB}>)
63: ((FLET SLYNK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "C:/Users/ares/.roswell/lisp/quicklisp/dists/ultralisp/software/joaotavora-sly-20230626113619/slynk/backend/sbcl.lisp") #<FUNCTION SLYNK:SLYNK-DEBUGGER..
64: ((LAMBDA NIL :IN SLYNK::CALL-WITH-LISTENER))
65: (SLYNK::CALL-WITH-BINDINGS ((*PACKAGE* . #<PACKAGE "COMMON-LISP-USER">) (*DEFAULT-PATHNAME-DEFAULTS* . #P"c:/Users/ares/.roswell/local-projects/") (*) (**) (***) (/) ...) #<FUNCTION (LAMBDA NIL :IN SL..
66: ((LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD))
67: ((FLET SB-UNIX::BODY :IN SB-THREAD::RUN))
68: ((FLET "WITHOUT-INTERRUPTS-BODY-156" :IN SB-THREAD::RUN))
69: ((FLET SB-UNIX::BODY :IN SB-THREAD::RUN))
70: ((FLET "WITHOUT-INTERRUPTS-BODY-149" :IN SB-THREAD::RUN))
71: (SB-THREAD::RUN)
72: ("foreign function: #x14003E865")
73: ("foreign function: #x14000BCEA")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

1 participant