fails to build with sbcl 0.9.11
Peter De Wachter <[email protected]> Sat, 08 Apr 2006 22:16:48 +0200
| Newsgroups | gmane.lisp.clg.devel |
|---|---|
| Message-ID | <877j5zu8jz.wl%[email protected]> |
clg 0.92 fails to build for me with sbcl 0.9.11 on amd64. Earlier
versions of sbcl work ok. I've attached a build log and a backtrace.
It seems this is the sbcl patch that broke clg:
http://article.gmane.org/gmane.lisp.steel-bank.cvs/8116
If I revert that, clg works. I hope this is useful, I don't understand
this CLOS magic at all.
Oh, and this is a patch for the sbcl version detection. CVS versions
of sbcl have a fourth version component, which confused clg.
--- clg-0.92/glib/glib.asd 2006-03-06 15:28:01.000000000 +0100
+++ clg-foo/glib/glib.asd 2006-04-08 17:08:10.000000000 +0200
@@ -29,12 +29,12 @@
#+sbcl
(progn
(defun sbcl-version ()
- (let ((dot1 (position #\. (lisp-implementation-version)))
- (dot2 (position #\. (lisp-implementation-version) :from-end t)))
+ (let* ((dot1 (position #\. (lisp-implementation-version)))
+ (dot2 (position #\. (lisp-implementation-version) :start (1+ dot1))))
(values
(parse-integer (lisp-implementation-version) :end dot1)
(parse-integer (lisp-implementation-version) :start (1+ dot1) :end dot2)
- (parse-integer (lisp-implementation-version) :start (1+ dot2)))))
+ (parse-integer (lisp-implementation-version) :start (1+ dot2) :junk-allowed t))))
(defun sbcl-version>= (req-major req-minor req-micro)
(multiple-value-bind (major minor micro) (sbcl-version)
(or
build-log.txt
(text/plain, 118.5 KB) - not displayed
backtrace.txt
(text/plain, 31.5 KB)
0: ((SB-PCL::FAST-METHOD SLOT-UNBOUND (T T T))
#<unavailable argument>
#<unavailable argument>
#<unavailable argument>
#<GOBJECT-CLASS DIALOG>
SIZE)
1: ((SB-PCL::FAST-METHOD SLOT-UNBOUND (T "#<...>" . "#<...>"))
#<unavailable argument>
#<unavailable argument>
#<unavailable argument>
#<GOBJECT-CLASS DIALOG>
SIZE)
2: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2.))
#<unavailable argument>
#<unavailable argument>
#<unavailable argument>)
3: ((SB-PCL::FAST-METHOD SLOT-VALUE-USING-CLASS
(SB-PCL::STD-CLASS STANDARD-OBJECT
STANDARD-EFFECTIVE-SLOT-DEFINITION))
#<unavailable argument>
#<unavailable argument>
#<STANDARD-CLASS GOBJECT-CLASS>
#<GOBJECT-CLASS DIALOG>
#<STANDARD-EFFECTIVE-SLOT-DEFINITION SIZE>)
4: (SLOT-VALUE #<GOBJECT-CLASS DIALOG> SIZE)
5: ((SB-PCL::FAST-METHOD COMPUTE-SLOTS (PROXY-CLASS))
#<unused argument>
#S(SB-PCL::FAST-METHOD-CALL
:FUNCTION #<FUNCTION #>
:PV-CELL NIL
:NEXT-METHOD-CALL NIL
:ARG-INFO (1))
#<GOBJECT-CLASS COLOR-SELECTION-DIALOG>)
6: ((SB-PCL::FAST-METHOD COMPUTE-SLOTS :AROUND (STANDARD-CLASS))
#<unavailable argument>
#S(SB-PCL::FAST-METHOD-CALL
:FUNCTION #<FUNCTION #>
:PV-CELL NIL
:NEXT-METHOD-CALL #S(SB-PCL::FAST-METHOD-CALL
:FUNCTION #
:PV-CELL NIL
:NEXT-METHOD-CALL NIL
:ARG-INFO (1))
:ARG-INFO (1))
#<GOBJECT-CLASS COLOR-SELECTION-DIALOG>)
7: (SB-PCL::UPDATE-CLASS #<GOBJECT-CLASS COLOR-SELECTION-DIALOG> T)
8: (SB-PCL::UPDATE-CLASS #<GOBJECT-CLASS COLOR-SELECTION-DIALOG> T)
9: ((SB-PCL::FAST-METHOD FINALIZE-INHERITANCE (GINSTANCE-CLASS))
#<unused argument>
#S(SB-PCL::FAST-METHOD-CALL
:FUNCTION #<FUNCTION #>
:PV-CELL NIL
:NEXT-METHOD-CALL NIL
:ARG-INFO (1))
#<GOBJECT-CLASS COLOR-SELECTION-DIALOG>)
10: (SB-PCL::UPDATE-CLASS #<GOBJECT-CLASS COLOR-SELECTION-DIALOG> NIL)
11: (SB-PCL::UPDATE-CLASS #<GOBJECT-CLASS DIALOG> T)
12: (SB-PCL::UPDATE-CLASS #<GOBJECT-CLASS DIALOG> T)
13: ((SB-PCL::FAST-METHOD FINALIZE-INHERITANCE (GINSTANCE-CLASS))
#<unused argument>
#S(SB-PCL::FAST-METHOD-CALL
:FUNCTION #<FUNCTION #>
:PV-CELL NIL
:NEXT-METHOD-CALL NIL
:ARG-INFO (1))
#<GOBJECT-CLASS DIALOG>)
14: (SB-PCL::UPDATE-CLASS #<GOBJECT-CLASS DIALOG> NIL)
15: (SB-PCL::UPDATE-CLASS #<GOBJECT-CLASS WINDOW> T)
16: (SB-PCL::UPDATE-CLASS #<GOBJECT-CLASS WINDOW> T)
17: ((SB-PCL::FAST-METHOD FINALIZE-INHERITANCE (GINSTANCE-CLASS))
#<unused argument>
#S(SB-PCL::FAST-METHOD-CALL
:FUNCTION #<FUNCTION #>
:PV-CELL NIL
:NEXT-METHOD-CALL NIL
:ARG-INFO (1))
#<GOBJECT-CLASS WINDOW>)
18: (SB-PCL::UPDATE-CLASS #<GOBJECT-CLASS WINDOW> NIL)
19: (SB-PCL::UPDATE-CLASS #<GOBJECT-CLASS WINDOW> NIL)
20: ((SB-PCL::FAST-METHOD SHARED-INITIALIZE :AFTER (SB-PCL::STD-CLASS T))
(#(NIL 16 5 17) . #())
#<unavailable argument>
#<GOBJECT-CLASS WINDOW>
(INSTANCE-SLOTS-P GTYPE SIZE SB-PCL::SLOTS SB-PCL::DIRECT-SLOTS)
(:DIRECT-SUPERCLASSES
(#<GOBJECT-CLASS BIN> #<GINTERFACE-CLASS ATK:IMPLEMENTOR-IFACE>)
:DIRECT-SLOTS
((:NAME HAS-TOPLEVEL-FOCUS
:READERS
(WINDOW-HAS-TOPLEVEL-FOCUS-P)
:WRITERS
NIL
:INITARGS
NIL
:DOCUMENTATION
"Of het invoeraandacht zich in dit GtkWindow bevindt"
:TYPE
BOOLEAN
...)
(:NAME IS-ACTIVE
:READERS
(WINDOW-IS-ACTIVE-P)
:WRITERS
NIL
:INITARGS
NIL
:DOCUMENTATION
"Of het topniveau het huidige actieve venster is"
:TYPE
BOOLEAN
...)
(:NAME GRAVITY
:READERS
(WINDOW-GRAVITY)
:WRITERS
((SETF WINDOW-GRAVITY))
:INITARGS
(:GRAVITY)
:DOCUMENTATION
"De zwaartekrachtstijl voor het venster"
:TYPE
GDK:GRAVITY
...)
(:NAME DECORATED
:READERS
(WINDOW-DECORATED-P)
:WRITERS
((SETF WINDOW-DECORATED-P))
:INITARGS
(:DECORATED)
:DOCUMENTATION
"Of het venster de versiering van de window-manager moet krijgen."
:TYPE
BOOLEAN
...)
(:NAME FOCUS-ON-MAP
:READERS
(WINDOW-FOCUS-ON-MAP-P)
:WRITERS
((SETF WINDOW-FOCUS-ON-MAP-P))
:INITARGS
(:FOCUS-ON-MAP)
:DOCUMENTATION
"WAAR (TRUE) als het venster de invoeraandacht moet krijgen bij realisering."
:TYPE
BOOLEAN
...)
(:NAME ACCEPT-FOCUS
:READERS
(WINDOW-ACCEPT-FOCUS-P)
:WRITERS
((SETF WINDOW-ACCEPT-FOCUS-P))
:INITARGS
(:ACCEPT-FOCUS)
:DOCUMENTATION
"WAAR (TRUE) als het venster de invoeraandacht moet krijgen."
:TYPE
BOOLEAN
...)
(:NAME URGENCY-HINT
:READERS
(WINDOW-URGENCY-HINT-P)
:WRITERS
((SETF WINDOW-URGENCY-HINT-P))
:INITARGS
(:URGENCY-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster onder de aandacht van de gebruiker moet worden gebracht."
:TYPE
BOOLEAN
...)
(:NAME SKIP-PAGER-HINT
:READERS
(WINDOW-SKIP-PAGER-HINT-P)
:WRITERS
((SETF WINDOW-SKIP-PAGER-HINT-P))
:INITARGS
(:SKIP-PAGER-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster niet in de werkbladwisselaar hoort"
:TYPE
BOOLEAN
...)
(:NAME SKIP-TASKBAR-HINT
:READERS
(WINDOW-SKIP-TASKBAR-HINT-P)
:WRITERS
((SETF WINDOW-SKIP-TASKBAR-HINT-P))
:INITARGS
(:SKIP-TASKBAR-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster niet in de taakbalk hoort"
:TYPE
BOOLEAN
...)
(:NAME TYPE-HINT
:READERS
(WINDOW-TYPE-HINT)
:WRITERS
((SETF WINDOW-TYPE-HINT))
:INITARGS
(:TYPE-HINT)
:DOCUMENTATION
"Hint waarmee de werkomgeving wordt geholpen te begrijpen wat voor soort venster dit is, en hoe het moet worden behandeld"
:TYPE
GDK:WINDOW-TYPE-HINT
...)
(:NAME SCREEN
:READERS
(WINDOW-SCREEN)
:WRITERS
((SETF WINDOW-SCREEN))
:INITARGS
(:SCREEN)
:DOCUMENTATION
"Het scherm waar dit venster wordt getoond"
:TYPE
GDK:SCREEN
...)
(:NAME ICON-NAME
:READERS
(WINDOW-ICON-NAME)
:WRITERS
((SETF WINDOW-ICON-NAME))
:INITARGS
(:ICON-NAME)
:DOCUMENTATION
"Naam van het themapictogram voor dit venster"
:TYPE
STRING
...)
...)
:DEFINITION-SOURCE
#S(SB-C:DEFINITION-SOURCE-LOCATION
:NAMESTRING "/home/pdewacht/clg/clg-0.92/gtk/gtktypes.lisp"
:TOPLEVEL-FORM-NUMBER 12
:PLIST NIL)
:GTYPE
(|gtk_window_get_type|)))
21: ((LAMBDA
(SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. SB-PCL::.ARG0.
SB-PCL::.ARG1. SB-PCL::.DFUN-REST-ARG.))
#<unavailable argument>
#<unavailable argument>
#<GOBJECT-CLASS WINDOW>
(INSTANCE-SLOTS-P GTYPE SIZE SB-PCL::SLOTS SB-PCL::DIRECT-SLOTS)
(:DIRECT-SUPERCLASSES
(#<GOBJECT-CLASS BIN> #<GINTERFACE-CLASS ATK:IMPLEMENTOR-IFACE>)
:DIRECT-SLOTS
((:NAME HAS-TOPLEVEL-FOCUS
:READERS
(WINDOW-HAS-TOPLEVEL-FOCUS-P)
:WRITERS
NIL
:INITARGS
NIL
:DOCUMENTATION
"Of het invoeraandacht zich in dit GtkWindow bevindt"
:TYPE
BOOLEAN
...)
(:NAME IS-ACTIVE
:READERS
(WINDOW-IS-ACTIVE-P)
:WRITERS
NIL
:INITARGS
NIL
:DOCUMENTATION
"Of het topniveau het huidige actieve venster is"
:TYPE
BOOLEAN
...)
(:NAME GRAVITY
:READERS
(WINDOW-GRAVITY)
:WRITERS
((SETF WINDOW-GRAVITY))
:INITARGS
(:GRAVITY)
:DOCUMENTATION
"De zwaartekrachtstijl voor het venster"
:TYPE
GDK:GRAVITY
...)
(:NAME DECORATED
:READERS
(WINDOW-DECORATED-P)
:WRITERS
((SETF WINDOW-DECORATED-P))
:INITARGS
(:DECORATED)
:DOCUMENTATION
"Of het venster de versiering van de window-manager moet krijgen."
:TYPE
BOOLEAN
...)
(:NAME FOCUS-ON-MAP
:READERS
(WINDOW-FOCUS-ON-MAP-P)
:WRITERS
((SETF WINDOW-FOCUS-ON-MAP-P))
:INITARGS
(:FOCUS-ON-MAP)
:DOCUMENTATION
"WAAR (TRUE) als het venster de invoeraandacht moet krijgen bij realisering."
:TYPE
BOOLEAN
...)
(:NAME ACCEPT-FOCUS
:READERS
(WINDOW-ACCEPT-FOCUS-P)
:WRITERS
((SETF WINDOW-ACCEPT-FOCUS-P))
:INITARGS
(:ACCEPT-FOCUS)
:DOCUMENTATION
"WAAR (TRUE) als het venster de invoeraandacht moet krijgen."
:TYPE
BOOLEAN
...)
(:NAME URGENCY-HINT
:READERS
(WINDOW-URGENCY-HINT-P)
:WRITERS
((SETF WINDOW-URGENCY-HINT-P))
:INITARGS
(:URGENCY-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster onder de aandacht van de gebruiker moet worden gebracht."
:TYPE
BOOLEAN
...)
(:NAME SKIP-PAGER-HINT
:READERS
(WINDOW-SKIP-PAGER-HINT-P)
:WRITERS
((SETF WINDOW-SKIP-PAGER-HINT-P))
:INITARGS
(:SKIP-PAGER-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster niet in de werkbladwisselaar hoort"
:TYPE
BOOLEAN
...)
(:NAME SKIP-TASKBAR-HINT
:READERS
(WINDOW-SKIP-TASKBAR-HINT-P)
:WRITERS
((SETF WINDOW-SKIP-TASKBAR-HINT-P))
:INITARGS
(:SKIP-TASKBAR-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster niet in de taakbalk hoort"
:TYPE
BOOLEAN
...)
(:NAME TYPE-HINT
:READERS
(WINDOW-TYPE-HINT)
:WRITERS
((SETF WINDOW-TYPE-HINT))
:INITARGS
(:TYPE-HINT)
:DOCUMENTATION
"Hint waarmee de werkomgeving wordt geholpen te begrijpen wat voor soort venster dit is, en hoe het moet worden behandeld"
:TYPE
GDK:WINDOW-TYPE-HINT
...)
(:NAME SCREEN
:READERS
(WINDOW-SCREEN)
:WRITERS
((SETF WINDOW-SCREEN))
:INITARGS
(:SCREEN)
:DOCUMENTATION
"Het scherm waar dit venster wordt getoond"
:TYPE
GDK:SCREEN
...)
(:NAME ICON-NAME
:READERS
(WINDOW-ICON-NAME)
:WRITERS
((SETF WINDOW-ICON-NAME))
:INITARGS
(:ICON-NAME)
:DOCUMENTATION
"Naam van het themapictogram voor dit venster"
:TYPE
STRING
...)
...)
:DEFINITION-SOURCE
#S(SB-C:DEFINITION-SOURCE-LOCATION
:NAMESTRING "/home/pdewacht/clg/clg-0.92/gtk/gtktypes.lisp"
:TOPLEVEL-FORM-NUMBER 12
:PLIST NIL)
:GTYPE
(|gtk_window_get_type|)))
22: (SB-PCL::CHANGE-CLASS-INTERNAL
#<GOBJECT-CLASS WINDOW>
#<STANDARD-CLASS GOBJECT-CLASS>
(:DIRECT-SUPERCLASSES
(#<GOBJECT-CLASS BIN> #<GINTERFACE-CLASS ATK:IMPLEMENTOR-IFACE>)
:DIRECT-SLOTS
((:NAME HAS-TOPLEVEL-FOCUS
:READERS
(WINDOW-HAS-TOPLEVEL-FOCUS-P)
:WRITERS
NIL
:INITARGS
NIL
:DOCUMENTATION
"Of het invoeraandacht zich in dit GtkWindow bevindt"
:TYPE
BOOLEAN
...)
(:NAME IS-ACTIVE
:READERS
(WINDOW-IS-ACTIVE-P)
:WRITERS
NIL
:INITARGS
NIL
:DOCUMENTATION
"Of het topniveau het huidige actieve venster is"
:TYPE
BOOLEAN
...)
(:NAME GRAVITY
:READERS
(WINDOW-GRAVITY)
:WRITERS
((SETF WINDOW-GRAVITY))
:INITARGS
(:GRAVITY)
:DOCUMENTATION
"De zwaartekrachtstijl voor het venster"
:TYPE
GDK:GRAVITY
...)
(:NAME DECORATED
:READERS
(WINDOW-DECORATED-P)
:WRITERS
((SETF WINDOW-DECORATED-P))
:INITARGS
(:DECORATED)
:DOCUMENTATION
"Of het venster de versiering van de window-manager moet krijgen."
:TYPE
BOOLEAN
...)
(:NAME FOCUS-ON-MAP
:READERS
(WINDOW-FOCUS-ON-MAP-P)
:WRITERS
((SETF WINDOW-FOCUS-ON-MAP-P))
:INITARGS
(:FOCUS-ON-MAP)
:DOCUMENTATION
"WAAR (TRUE) als het venster de invoeraandacht moet krijgen bij realisering."
:TYPE
BOOLEAN
...)
(:NAME ACCEPT-FOCUS
:READERS
(WINDOW-ACCEPT-FOCUS-P)
:WRITERS
((SETF WINDOW-ACCEPT-FOCUS-P))
:INITARGS
(:ACCEPT-FOCUS)
:DOCUMENTATION
"WAAR (TRUE) als het venster de invoeraandacht moet krijgen."
:TYPE
BOOLEAN
...)
(:NAME URGENCY-HINT
:READERS
(WINDOW-URGENCY-HINT-P)
:WRITERS
((SETF WINDOW-URGENCY-HINT-P))
:INITARGS
(:URGENCY-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster onder de aandacht van de gebruiker moet worden gebracht."
:TYPE
BOOLEAN
...)
(:NAME SKIP-PAGER-HINT
:READERS
(WINDOW-SKIP-PAGER-HINT-P)
:WRITERS
((SETF WINDOW-SKIP-PAGER-HINT-P))
:INITARGS
(:SKIP-PAGER-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster niet in de werkbladwisselaar hoort"
:TYPE
BOOLEAN
...)
(:NAME SKIP-TASKBAR-HINT
:READERS
(WINDOW-SKIP-TASKBAR-HINT-P)
:WRITERS
((SETF WINDOW-SKIP-TASKBAR-HINT-P))
:INITARGS
(:SKIP-TASKBAR-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster niet in de taakbalk hoort"
:TYPE
BOOLEAN
...)
(:NAME TYPE-HINT
:READERS
(WINDOW-TYPE-HINT)
:WRITERS
((SETF WINDOW-TYPE-HINT))
:INITARGS
(:TYPE-HINT)
:DOCUMENTATION
"Hint waarmee de werkomgeving wordt geholpen te begrijpen wat voor soort venster dit is, en hoe het moet worden behandeld"
:TYPE
GDK:WINDOW-TYPE-HINT
...)
(:NAME SCREEN
:READERS
(WINDOW-SCREEN)
:WRITERS
((SETF WINDOW-SCREEN))
:INITARGS
(:SCREEN)
:DOCUMENTATION
"Het scherm waar dit venster wordt getoond"
:TYPE
GDK:SCREEN
...)
(:NAME ICON-NAME
:READERS
(WINDOW-ICON-NAME)
:WRITERS
((SETF WINDOW-ICON-NAME))
:INITARGS
(:ICON-NAME)
:DOCUMENTATION
"Naam van het themapictogram voor dit venster"
:TYPE
STRING
...)
...)
:DEFINITION-SOURCE
#S(SB-C:DEFINITION-SOURCE-LOCATION
:NAMESTRING "/home/pdewacht/clg/clg-0.92/gtk/gtktypes.lisp"
:TOPLEVEL-FORM-NUMBER 12
:PLIST NIL)
:GTYPE
(|gtk_window_get_type|)))
23: ((SB-PCL::FAST-METHOD ENSURE-CLASS-USING-CLASS (SB-PCL::PCL-CLASS T))
#<unavailable argument>
#<unavailable argument>
#<GOBJECT-CLASS WINDOW>
WINDOW
(:METACLASS GOBJECT-CLASS
:DIRECT-SUPERCLASSES
(BIN ATK:IMPLEMENTOR-IFACE)
:DIRECT-SLOTS
((:NAME HAS-TOPLEVEL-FOCUS
:READERS
(WINDOW-HAS-TOPLEVEL-FOCUS-P)
:WRITERS
NIL
:INITARGS
NIL
:DOCUMENTATION
"Of het invoeraandacht zich in dit GtkWindow bevindt"
:TYPE
BOOLEAN
...)
(:NAME IS-ACTIVE
:READERS
(WINDOW-IS-ACTIVE-P)
:WRITERS
NIL
:INITARGS
NIL
:DOCUMENTATION
"Of het topniveau het huidige actieve venster is"
:TYPE
BOOLEAN
...)
(:NAME GRAVITY
:READERS
(WINDOW-GRAVITY)
:WRITERS
((SETF WINDOW-GRAVITY))
:INITARGS
(:GRAVITY)
:DOCUMENTATION
"De zwaartekrachtstijl voor het venster"
:TYPE
GDK:GRAVITY
...)
(:NAME DECORATED
:READERS
(WINDOW-DECORATED-P)
:WRITERS
((SETF WINDOW-DECORATED-P))
:INITARGS
(:DECORATED)
:DOCUMENTATION
"Of het venster de versiering van de window-manager moet krijgen."
:TYPE
BOOLEAN
...)
(:NAME FOCUS-ON-MAP
:READERS
(WINDOW-FOCUS-ON-MAP-P)
:WRITERS
((SETF WINDOW-FOCUS-ON-MAP-P))
:INITARGS
(:FOCUS-ON-MAP)
:DOCUMENTATION
"WAAR (TRUE) als het venster de invoeraandacht moet krijgen bij realisering."
:TYPE
BOOLEAN
...)
(:NAME ACCEPT-FOCUS
:READERS
(WINDOW-ACCEPT-FOCUS-P)
:WRITERS
((SETF WINDOW-ACCEPT-FOCUS-P))
:INITARGS
(:ACCEPT-FOCUS)
:DOCUMENTATION
"WAAR (TRUE) als het venster de invoeraandacht moet krijgen."
:TYPE
BOOLEAN
...)
(:NAME URGENCY-HINT
:READERS
(WINDOW-URGENCY-HINT-P)
:WRITERS
((SETF WINDOW-URGENCY-HINT-P))
:INITARGS
(:URGENCY-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster onder de aandacht van de gebruiker moet worden gebracht."
:TYPE
BOOLEAN
...)
(:NAME SKIP-PAGER-HINT
:READERS
(WINDOW-SKIP-PAGER-HINT-P)
:WRITERS
((SETF WINDOW-SKIP-PAGER-HINT-P))
:INITARGS
(:SKIP-PAGER-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster niet in de werkbladwisselaar hoort"
:TYPE
BOOLEAN
...)
(:NAME SKIP-TASKBAR-HINT
:READERS
(WINDOW-SKIP-TASKBAR-HINT-P)
:WRITERS
((SETF WINDOW-SKIP-TASKBAR-HINT-P))
:INITARGS
(:SKIP-TASKBAR-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster niet in de taakbalk hoort"
:TYPE
BOOLEAN
...)
(:NAME TYPE-HINT
:READERS
(WINDOW-TYPE-HINT)
:WRITERS
((SETF WINDOW-TYPE-HINT))
:INITARGS
(:TYPE-HINT)
:DOCUMENTATION
"Hint waarmee de werkomgeving wordt geholpen te begrijpen wat voor soort venster dit is, en hoe het moet worden behandeld"
:TYPE
GDK:WINDOW-TYPE-HINT
...)
(:NAME SCREEN
:READERS
(WINDOW-SCREEN)
:WRITERS
((SETF WINDOW-SCREEN))
:INITARGS
(:SCREEN)
:DOCUMENTATION
"Het scherm waar dit venster wordt getoond"
:TYPE
GDK:SCREEN
...)
(:NAME ICON-NAME
:READERS
(WINDOW-ICON-NAME)
:WRITERS
((SETF WINDOW-ICON-NAME))
:INITARGS
(:ICON-NAME)
:DOCUMENTATION
"Naam van het themapictogram voor dit venster"
:TYPE
STRING
...)
...)
:DEFINITION-SOURCE
#S(SB-C:DEFINITION-SOURCE-LOCATION
:NAMESTRING "/home/pdewacht/clg/clg-0.92/gtk/gtktypes.lisp"
:TOPLEVEL-FORM-NUMBER 12
:PLIST NIL)
:GTYPE
(|gtk_window_get_type|)))
24: (SB-PCL::REAL-LOAD-DEFCLASS
WINDOW
GOBJECT-CLASS
(BIN ATK:IMPLEMENTOR-IFACE)
((:NAME HAS-TOPLEVEL-FOCUS
:READERS
(WINDOW-HAS-TOPLEVEL-FOCUS-P)
:WRITERS
NIL
:INITARGS
NIL
:DOCUMENTATION
"Of het invoeraandacht zich in dit GtkWindow bevindt"
:TYPE
BOOLEAN
...)
(:NAME IS-ACTIVE
:READERS
(WINDOW-IS-ACTIVE-P)
:WRITERS
NIL
:INITARGS
NIL
:DOCUMENTATION
"Of het topniveau het huidige actieve venster is"
:TYPE
BOOLEAN
...)
(:NAME GRAVITY
:READERS
(WINDOW-GRAVITY)
:WRITERS
((SETF WINDOW-GRAVITY))
:INITARGS
(:GRAVITY)
:DOCUMENTATION
"De zwaartekrachtstijl voor het venster"
:TYPE
GDK:GRAVITY
...)
(:NAME DECORATED
:READERS
(WINDOW-DECORATED-P)
:WRITERS
((SETF WINDOW-DECORATED-P))
:INITARGS
(:DECORATED)
:DOCUMENTATION
"Of het venster de versiering van de window-manager moet krijgen."
:TYPE
BOOLEAN
...)
(:NAME FOCUS-ON-MAP
:READERS
(WINDOW-FOCUS-ON-MAP-P)
:WRITERS
((SETF WINDOW-FOCUS-ON-MAP-P))
:INITARGS
(:FOCUS-ON-MAP)
:DOCUMENTATION
"WAAR (TRUE) als het venster de invoeraandacht moet krijgen bij realisering."
:TYPE
BOOLEAN
...)
(:NAME ACCEPT-FOCUS
:READERS
(WINDOW-ACCEPT-FOCUS-P)
:WRITERS
((SETF WINDOW-ACCEPT-FOCUS-P))
:INITARGS
(:ACCEPT-FOCUS)
:DOCUMENTATION
"WAAR (TRUE) als het venster de invoeraandacht moet krijgen."
:TYPE
BOOLEAN
...)
(:NAME URGENCY-HINT
:READERS
(WINDOW-URGENCY-HINT-P)
:WRITERS
((SETF WINDOW-URGENCY-HINT-P))
:INITARGS
(:URGENCY-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster onder de aandacht van de gebruiker moet worden gebracht."
:TYPE
BOOLEAN
...)
(:NAME SKIP-PAGER-HINT
:READERS
(WINDOW-SKIP-PAGER-HINT-P)
:WRITERS
((SETF WINDOW-SKIP-PAGER-HINT-P))
:INITARGS
(:SKIP-PAGER-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster niet in de werkbladwisselaar hoort"
:TYPE
BOOLEAN
...)
(:NAME SKIP-TASKBAR-HINT
:READERS
(WINDOW-SKIP-TASKBAR-HINT-P)
:WRITERS
((SETF WINDOW-SKIP-TASKBAR-HINT-P))
:INITARGS
(:SKIP-TASKBAR-HINT)
:DOCUMENTATION
"WAAR (TRUE) als het venster niet in de taakbalk hoort"
:TYPE
BOOLEAN
...)
(:NAME TYPE-HINT
:READERS
(WINDOW-TYPE-HINT)
:WRITERS
((SETF WINDOW-TYPE-HINT))
:INITARGS
(:TYPE-HINT)
:DOCUMENTATION
"Hint waarmee de werkomgeving wordt geholpen te begrijpen wat voor soort venster dit is, en hoe het moet worden behandeld"
:TYPE
GDK:WINDOW-TYPE-HINT
...)
(:NAME SCREEN
:READERS
(WINDOW-SCREEN)
:WRITERS
((SETF WINDOW-SCREEN))
:INITARGS
(:SCREEN)
:DOCUMENTATION
"Het scherm waar dit venster wordt getoond"
:TYPE
GDK:SCREEN
...)
(:NAME ICON-NAME
:READERS
(WINDOW-ICON-NAME)
:WRITERS
((SETF WINDOW-ICON-NAME))
:INITARGS
(:ICON-NAME)
:DOCUMENTATION
"Naam van het themapictogram voor dit venster"
:TYPE
STRING
...)
...)
(:GTYPE (|gtk_window_get_type|))
(WINDOW-DEFAULT-HEIGHT WINDOW-DEFAULT-WIDTH
WINDOW-GROUP
WINDOW-TRANSIENT-FOR
WINDOW-MNEMONIC-MODIFIER
WINDOW-ICON-LIST
WINDOW-HAS-FRAME-P
WINDOW-DEFAULT-WIDGET
WINDOW-FOCUS-WIDGET
WINDOW-TYPE
WINDOW-TITLE
WINDOW-ROLE
...)
((SETF WINDOW-DEFAULT-HEIGHT) (SETF WINDOW-DEFAULT-WIDTH)
(SETF WINDOW-TRANSIENT-FOR) (SETF WINDOW-MNEMONIC-MODIFIER)
(SETF WINDOW-ICON-LIST) (SETF WINDOW-HAS-FRAME-P)
(SETF WINDOW-DEFAULT-WIDGET) (SETF WINDOW-FOCUS-WIDGET)
(SETF WINDOW-TITLE) (SETF WINDOW-ROLE) (SETF WINDOW-ALLOW-SHRINK-P)
(SETF WINDOW-ALLOW-GROW-P) ...)
(DEFAULT-HEIGHT DEFAULT-WIDTH
GROUP
TRANSIENT-FOR
MNEMONIC-MODIFIER
ICON-LIST
HAS-FRAME
DEFAULT-WIDGET
FOCUS-WIDGET
TYPE
TITLE
ROLE
...)
#S(SB-C:DEFINITION-SOURCE-LOCATION
:NAMESTRING "/home/pdewacht/clg/clg-0.92/gtk/gtktypes.lisp"
:TOPLEVEL-FORM-NUMBER 12
:PLIST NIL))
25: ((SB-C::TOP-LEVEL-FORM
(LET ()
(SB-PCL::LOAD-DEFCLASS "#<...>" . "#<...>"))))
26: (SB-FASL::LOAD-FASL-GROUP
#<SB-SYS:FD-STREAM for "file /home/pdewacht/clg/clg-0.92/gtk/gtktypes.fasl" {1003C83191}>)
27: (SB-FASL::LOAD-AS-FASL
#<SB-SYS:FD-STREAM for "file /home/pdewacht/clg/clg-0.92/gtk/gtktypes.fasl" {1003C83191}>
NIL
#<unavailable argument>)
28: (SB-FASL::INTERNAL-LOAD
#P"/home/pdewacht/clg/clg-0.92/gtk/gtktypes.fasl"
#P"/home/pdewacht/clg/clg-0.92/gtk/gtktypes.fasl"
:ERROR
NIL
NIL
:BINARY
NIL)
29: (SB-FASL::INTERNAL-LOAD
#P"/home/pdewacht/clg/clg-0.92/gtk/gtktypes.fasl"
#P"/home/pdewacht/clg/clg-0.92/gtk/gtktypes.fasl"
:ERROR
NIL
NIL
NIL
:DEFAULT)
30: (LOAD #P"/home/pdewacht/clg/clg-0.92/gtk/gtktypes.fasl")
31: ((SB-PCL::FAST-METHOD ASDF:PERFORM (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE))
#<unavailable argument>
#<unavailable argument>
#<ASDF:LOAD-OP NIL {100295F0D1}>
#<ASDF:CL-SOURCE-FILE "gtktypes" {10032CA6F1}>)
32: ((LAMBDA
(SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. SB-PCL::.ARG0.
SB-PCL::.ARG1.))
#<unavailable argument>
#<unavailable argument>
#<ASDF:LOAD-OP NIL {100295F0D1}>
#<ASDF:CL-SOURCE-FILE "gtktypes" {10032CA6F1}>)
33: ((LAMBDA ()))
34: (SB-C::%WITH-COMPILATION-UNIT #<CLOSURE (LAMBDA #) {1002FAB569}>)
35: (ASDF:OPERATE ASDF:LOAD-OP :GTK)
36: (SB-INT:EVAL-IN-LEXENV (ASDF:OOS 'ASDF:LOAD-OP :GTK) #<NULL-LEXENV>)
37: (INTERACTIVE-EVAL (ASDF:OOS 'ASDF:LOAD-OP :GTK))
38: (SB-IMPL::REPL-FUN NIL)
39: ((LAMBDA ()))
40: ((LAMBDA ()))
41: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA #) {1002BB1E59}>)
42: (SB-IMPL::TOPLEVEL-REPL NIL)
43: (SB-IMPL::TOPLEVEL-INIT)
44: ((LABELS SB-IMPL::RESTART-LISP))