added the error, extension, utility and grab packages. added
parse-color to the colormap package.
This commit is contained in:
parent
aa1926d027
commit
b0a1f88472
|
@ -140,6 +140,7 @@
|
||||||
colormap-display
|
colormap-display
|
||||||
alloc-color
|
alloc-color
|
||||||
alloc-named-color
|
alloc-named-color
|
||||||
|
parse-color
|
||||||
))
|
))
|
||||||
|
|
||||||
(define-interface xlib-pixel-interface
|
(define-interface xlib-pixel-interface
|
||||||
|
@ -393,6 +394,42 @@
|
||||||
rebind-keysym
|
rebind-keysym
|
||||||
refresh-keyboard-mapping))
|
refresh-keyboard-mapping))
|
||||||
|
|
||||||
|
(define-interface xlib-error-interface
|
||||||
|
(export x-error-handler
|
||||||
|
x-fatal-error-handler))
|
||||||
|
|
||||||
|
(define-interface xlib-extension-interface
|
||||||
|
(export list-extensions
|
||||||
|
query-extension))
|
||||||
|
|
||||||
|
(define-interface xlib-utility-interface
|
||||||
|
(export xlib-release-4-or-later?
|
||||||
|
xlib-release-5-or-later?
|
||||||
|
xlib-release-6-or-later?
|
||||||
|
get-default
|
||||||
|
resource-manager-string
|
||||||
|
parse-geometry
|
||||||
|
store-buffer
|
||||||
|
fetch-buffer
|
||||||
|
fetch-bytes
|
||||||
|
rotate-buffers))
|
||||||
|
|
||||||
|
(define-interface xlib-grab-interface
|
||||||
|
(export grab-pointer
|
||||||
|
ungrab-pointer
|
||||||
|
grab-button
|
||||||
|
ungrab-button
|
||||||
|
change-active-pointer-grab
|
||||||
|
grab-keyboard
|
||||||
|
ungrab-keyboard
|
||||||
|
grab-key
|
||||||
|
ungrab-key
|
||||||
|
allow-events
|
||||||
|
grab-server
|
||||||
|
ungrab-server
|
||||||
|
;; syntax: with-server-grabbed
|
||||||
|
))
|
||||||
|
|
||||||
;; all together
|
;; all together
|
||||||
|
|
||||||
(define-interface xlib-interface
|
(define-interface xlib-interface
|
||||||
|
@ -413,4 +450,8 @@
|
||||||
xlib-wm-interface
|
xlib-wm-interface
|
||||||
xlib-client-interface
|
xlib-client-interface
|
||||||
xlib-key-interface
|
xlib-key-interface
|
||||||
|
xlib-error-interface
|
||||||
|
xlib-extension-interface
|
||||||
|
xlib-utility-interface
|
||||||
|
xlib-grab-interface
|
||||||
))
|
))
|
|
@ -123,6 +123,33 @@
|
||||||
xlib-types)
|
xlib-types)
|
||||||
(files key))
|
(files key))
|
||||||
|
|
||||||
|
(define-structure xlib-error xlib-error-interface
|
||||||
|
(open scheme
|
||||||
|
external-calls
|
||||||
|
xlib-types)
|
||||||
|
(files error))
|
||||||
|
|
||||||
|
(define-structure xlib-extension xlib-extension-interface
|
||||||
|
(open scheme
|
||||||
|
external-calls
|
||||||
|
xlib-types)
|
||||||
|
(files extension))
|
||||||
|
|
||||||
|
(define-structure xlib-utility xlib-utility-interface
|
||||||
|
(open scheme
|
||||||
|
external-calls
|
||||||
|
receiving
|
||||||
|
xlib-types
|
||||||
|
xlib-display
|
||||||
|
xlib-property)
|
||||||
|
(files utility))
|
||||||
|
|
||||||
|
(define-structure xlib-grab xlib-grab-interface
|
||||||
|
(open scheme
|
||||||
|
external-calls
|
||||||
|
xlib-types)
|
||||||
|
(files grab))
|
||||||
|
|
||||||
;; all together
|
;; all together
|
||||||
|
|
||||||
(define-structure xlib xlib-interface
|
(define-structure xlib xlib-interface
|
||||||
|
@ -143,5 +170,9 @@
|
||||||
xlib-wm
|
xlib-wm
|
||||||
xlib-client
|
xlib-client
|
||||||
xlib-key
|
xlib-key
|
||||||
|
xlib-error
|
||||||
|
xlib-extension
|
||||||
|
xlib-utility
|
||||||
|
xlib-grab
|
||||||
)
|
)
|
||||||
(optimize auto-integrate))
|
(optimize auto-integrate))
|
Loading…
Reference in New Issue