- updated.

This commit is contained in:
frese 2002-04-26 08:29:05 +00:00
parent 2b2cdd70dd
commit b15642d63d
3 changed files with 21 additions and 11 deletions

View File

@ -304,7 +304,12 @@
(define-interface xlib-event-interface (define-interface xlib-event-interface
(export (export
wait-event wait-event
next-event
send-event send-event
event-ready?
events-pending
events-queued
((queued-mode) :syntax)
((event-type) :syntax) ((event-type) :syntax)
any-event-type any-event-type
@ -714,7 +719,9 @@
change-save-set change-save-set
set-close-down-mode set-close-down-mode
get-pointer-mapping get-pointer-mapping
set-pointer-mapping)) set-pointer-mapping
((wm-state) :syntax)
get-wm-state set-wm-state))
(define-interface xlib-client-interface (define-interface xlib-client-interface
(export iconify-window (export iconify-window
@ -846,31 +853,33 @@
display? display-after-function display? display-after-function
display-set-after-function! close-display display-set-after-function! close-display
special-time:current-time special-time:current-time
display-Xdisplay
window? destroy-window window-display window? destroy-window window-display
window-tag window-set-tag! window-tag window-set-tag!
special-window:none special-window:pointer-window special-window:none special-window:pointer-window
special-window:input-focus special-window:pointer-root special-window:input-focus special-window:pointer-root
window-Xwindow
drawable? drawable-display drawable? drawable-display drawable-Xobject
color? color? color-Xcolor
colormap? free-colormap colormap-display colormap? free-colormap colormap-display colormap-Xcolormap
pixel? pixel? pixel-Xpixel pixel-colormap
gcontext? free-gcontext gcontext? gcontext-display gcontext? free-gcontext gcontext? gcontext-display
special-gcontext:none special-gcontext:none gcontext-Xgcontext
pixmap? free-pixmap pixmap-display pixmap? free-pixmap pixmap-display pixmap-Xpixmap
font? font-display font-name open-font close-font font? font-display font-name open-font close-font
special-font:none special-font:none font-Xfont font-Xfontstruct
atom? make-atom intern-atom special-atom:none atom? make-atom intern-atom special-atom:none atom-Xatom
cursor? cursor-display free-cursor cursor? cursor-display free-cursor cursor-Xcursor
visual? visual?

View File

@ -25,7 +25,7 @@
colormap? make-colormap free-colormap colormap-display colormap-Xcolormap colormap? make-colormap free-colormap colormap-display colormap-Xcolormap
pixel? make-pixel pixel-Xpixel pixel? make-pixel pixel-Xpixel pixel-colormap
gcontext? make-gcontext free-gcontext gcontext? gcontext-display gcontext? make-gcontext free-gcontext gcontext? gcontext-display
gcontext-Xgcontext special-gcontext:none gcontext-Xgcontext special-gcontext:none

View File

@ -141,6 +141,7 @@
external-calls external-calls
xlib-internal-types xlib-internal-types
signals ;; for error signals ;; for error
xlib-property ;; get-property and change-property
finite-types finite-types
xlib-helper) xlib-helper)
(files wm)) (files wm))