Using a freshly updated version of McCLIM under CMUCL 19C and FreeBSD I get the following:
* (require :clim-examples) Warning: Silly argument for a unix PATHNAME-NAME: "Goatee/presentation-history" Warning: Silly argument for a unix PATHNAME-NAME: "Goatee/presentation-history" Warning: Silly argument for a unix PATHNAME-NAME: "Looks/pixie" Warning: Silly argument for a unix PATHNAME-NAME: "Looks/pixie" Warning: Silly argument for a unix PATHNAME-NAME: "Goatee/presentation-history" Warning: Silly argument for a unix PATHNAME-NAME: "Looks/pixie"
; Loading #P"/usr/local/share/lisp/asdf-packages/spatial-trees-0.1/spatial-tree-viz.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/calculator.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/colorslider.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/menutest.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/address-book.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/traffic-lights.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/clim-fig.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/postscript-test.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/puzzle.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/transformations-test.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/demodemo.x86f". ;; try (CLIM-DEMO::DEMODEMO) ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/stream-test.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/presentation-test.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/dragndrop.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/gadget-test.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/accepting-values.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/method-browser.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/dragndrop-translator.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/draggable-graph.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/text-size-test.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Examples/drawing-benchmark.x86f". ; Loading #P"/usr/local/lib/cmucl/mcclim/Goatee/goatee-test.x86f". NIL * (clim-demo::demodemo)
(now I click on the "Address Book" button)
Error in function KERNEL:CLASS-TYPEP: Class is currently invalid: #<KERNEL::STANDARD-CLASS CLIM-INTERNALS::BASIC-OUTPUT-RECORD {29269CB5}> [Condition of type SIMPLE-ERROR]
Restarts: 0: [ABORT ] Return to application command loop 1: Return to application command loop 2: Return to Top-Level. 3: [DESTROY] Destroy the process
Debug (type H for help)
Here is some of the backtrace:
0: (KERNEL:CLASS-TYPEP #<unavailable-arg> #<unavailable-arg> #<unavailable-arg>) 1: (CLIM-INTERNALS::FIND-OUTPUT-RECORD-SHEET #<CLIM:STANDARD-PRESENTATION 0:99,0:14 CLIM-DEMO::ADDRESS {48109D8D}>) 2: ((METHOD CLIM:ADD-OUTPUT-RECORD (:AFTER) (T CLIM-INTERNALS::COMPOUND-OUTPUT-RECORD)) #<unused-arg> #<unused-arg> #<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 0,0 ("Scott McKay") {483D8C4D}> #<CLIM:STANDARD-PRESENTATION 0:99,0:14 CLIM-DEMO::ADDRESS {48109D8D}>) 3: ("LAMBDA (G3106 G3107 G3108)" #<unused-arg> #<unused-arg> #<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 0,0 ("Scott McKay") {483D8C4D}> #<CLIM:STANDARD-PRESENTATION 0:99,0:14 CLIM-DEMO::ADDRESS {48109D8D}>) 4: ("LAMBDA (G8342 G8343 G8344)" #<unused-arg> #<unused-arg> #<CLIM:APPLICATION-PANE CLIM-DEMO::NAMES {4955927D}>) 5: (FINISH-OUTPUT #<CLIM:APPLICATION-PANE CLIM-DEMO::NAMES {4955927D}>) 6: ((METHOD CLIM:INVOKE-WITH-NEW-OUTPUT-RECORD NIL (CLIM:OUTPUT-RECORDING-STREAM T T T)) (#() . #(#)) #<unused-arg> #<CLIM:APPLICATION-PANE CLIM-DEMO::NAMES {4955927D}> #<Closure Over Function (FLET #:CONTINUATION38 ) {48109749}> ...) 7: ((METHOD CLIM:STREAM-PRESENT NIL (CLIM:OUTPUT-RECORDING-STREAM T T)) (#() . #(#)) #<unused-arg> #<CLIM:APPLICATION-PANE CLIM-DEMO::NAMES {4955927D}> #<CLIM-DEMO::ADDRESS {499AC1F5}> ...) 8: ((FLET #:UPDATING-OUTPUT-CONTINUATION37 ) #<CLIM:APPLICATION-PANE CLIM-DEMO::NAMES {4955927D}>) 9: ((METHOD CLIM:INVOKE-WITH-NEW-OUTPUT-RECORD NIL (CLIM:OUTPUT-RECORDING-STREAM T T T)) (#() . #(#)) #<unused-arg> #<CLIM:APPLICATION-PANE CLIM-DEMO::NAMES {4955927D}> #<Closure Over Function (FLET #:CONTINUATION14 CLIM-INTERNALS::%INVOKE-UPDATING) {48107FC1}> ...) 10: (CLIM-INTERNALS::%INVOKE-UPDATING #<CLIM:STANDARD-UPDATING-OUTPUT-RECORD X 0.0d0:0.0d0 Y 0.0d0:0.0d0 #<CLIM-DEMO::ADDRESS {499AC1F5}> {48105185}> #<CLIM:APPLICATION-PANE CLIM-DEMO::NAMES {4955927D}> #<Closure Over Function (FLET #:UPDATING-OUTPUT-CONTINUATION37 ) {48103A39}>)