CLX on sbcl

[bpecsek]

I use sbcl 2.0.0 on cygwin64 on WIN10 and when I try to load clx with quickload I get the following error during the compilation process.

$ sbcl This is SBCL 2.0.0, an implementation of ANSI Common Lisp. More information about SBCL is available at http://www.sbcl.org/.

SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information.

WARNING: the Windows port is fragile, particularly for multithreaded code. Unfortunately, the development team currently lacks the time and resources this platform demands.

• (ql:quickload 'clx) To load "clx": Load 1 ASDF system: clx ; Loading "clx" [package xlib].................................... .................................................. .................................................. .............................. ; file: D:/cygwin64/home/pbela/quicklisp/local-projects/clx/input.lisp ; in: DEFINE-CONDITION UNEXPECTED-REPLY ; (FORMAT STREAM "Display ~s received a server reply when none was expected. ~@ ; Last request sequence ~d Reply Sequence ~d Reply Length ~d bytes." ; (XLIB::UNEXPECTED-REPLY-DISPLAY CONDITION) ; (XLIB::UNEXPECTED-REPLY-REQ-SEQUENCE CONDITION) ; (XLIB::UNEXPECTED-REPLY-MSG-SEQUENCE CONDITION) ; (XLIB::UNEXPECTED-REPLY-LENGTH CONDITION)) ; ; caught ERROR: ; during macroexpansion of ; (FORMATTER "Display ~s received a server reply when none was expected.~@
  ; Last request sequence ~d Reply Sequence ~d Reply Length ~d bytes."). ; Use BREAK-ON-SIGNALS to intercept. ; ; error in FORMAT: Unknown directive (character: Return) ; Display ~s received a server reply when none was expected.~@ ; Last request sequence ~d Reply Sequence ~d Reply Length ~d bytes. ; ^ .. debugger invoked on a UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<THREAD "main thread" RUNNING {10010B0523}>: COMPILE-FILE-ERROR while compiling #<CLX-SOURCE-FILE "clx" "input">

Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name): 0: [RETRY ] Retry compiling #<CLX-SOURCE-FILE "clx" "input">.

1: [ACCEPT ] Continue, treating compiling #<CLX-SOURCE-FILE "clx" "input"> as having been successful. 2: Retry ASDF operation. 3: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the
configuration. 4: Retry ASDF operation. 5: Retry ASDF operation after resetting the
configuration. 6: [ABORT ] Give up on "clx" 7: Exit debugger, returning to top level.

(UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-actio n/" ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<CLX-SYSTEM::CLX-SOURCE-FILE "clx" "inp ut">))) error finding frame source: Bogus form-number: the source file has probably
changed too much to cope with. source: NIL 0]

[bpecsek]

Hi there,

I have also tried to quickload :clx without downloading it into ~/quicklisp/local-projects/. It installes but then when I try to install the demo I get the following.

$ sbcl This is SBCL 2.0.0, an implementation of ANSI Common Lisp. More information about SBCL is available at http://www.sbcl.org/.

SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information.

WARNING: the Windows port is fragile, particularly for multithreaded code. Unfortunately, the development team currently lacks the time and resources this platform demands.

• (ql:quickload :clx) To load "clx": Load 1 ASDF system: asdf Install 1 Quicklisp release: clx ; Fetching #<URL "http://beta.quicklisp.org/archive/clx/2019-11-30/clx-20191130- git.tgz"> ; 446.62KB ================================================== 457,343 bytes in 0.43 seconds (1043.51KB/sec) ; Loading "clx" [package xlib].................................... .................................................. .................................................. .................................................. .................................................. .................................................. .................................................. .................................................. .................................................. [package xlib/glx]................................ [package xlib/gl]................................. .................................................. [package xlib/dpms]............................... [package xlib/xtest].............................. .................................................. [package xlib/xinerama]................... (:CLX)
• (ql:quickload 'clx/demo) To load "clx/demo": Load 1 ASDF system: clx/demo ; Loading "clx/demo" .................................................. [package xlib-demo/clclock]. debugger invoked on a UNDEFINED-FUNCTION in thread #<THREAD "main thread" RUNNING {10010B0523}>: The function XLIB::GET-DEFAULT-DISPLAY is undefined.

Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name): 0: [CONTINUE ] Retry calling XLIB::GET-DEFAULT-DISPLAY. 1: [USE-VALUE ] Call specified function. 2: [RETURN-VALUE ] Return specified values. 3: [RETURN-NOTHING ] Return zero values. 4: [TRY-RECOMPILING ] Recompile clclock and try loading it again 5: [RETRY ] Retry loading FASL for #<CL-SOURCE-FILE "clx/demo " "demo" "clclock">. 6: [ACCEPT ] Continue, treating loading FASL for #<CL-SOURCE-FILE "clx/demo " "demo" "clclock"> as having been successful. 7: Retry ASDF operation. 8: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the configuration. 9: Retry ASDF operation. 10: Retry ASDF operation after resetting the configuration. 11: [ABORT ] Give up on "clx/demo" 12: Exit debugger, returning to top level.

("undefined function" NIL) 0]

[dkochmanski]

Function "get-default-display" is implemented only for unix (see dependent.lisp). on windows you are expected to use open-display. that said, cygwin should be accounted for as some kind of a unix. One way to circumvent that could be passing :unix to *features* before loading the server. open-display should work as expected.