Hello,
Xlib has a function 'XSetErrorHandler'. You pass a callback to it to
specify the new error handler. Here's the relevant code from 'Xlib.h':
----------------------------------------------------------------------
typedef int (*XErrorHandler) (
Display* /* display */,
XErrorEvent* /* error_event */
);
extern XErrorHandler XSetErrorHandler (
XErrorHandler /* handler */
);
----------------------------------------------------------------------
Here's how I'm defining 'XSetErrorHandler' on the Chicken side:
(define XSetErrorHandler
(foreign-safe-lambda c-pointer XSetErrorHandler
(function int (c-pointer c-pointer))))
And finally, a test error handler:
(define-external (xerrorhandler (c-pointer dpy) (c-pointer ev)) int
(display "Error handler called\n"))
If I trigger an X error, I get a pretty wacky error:
Error: bad argument count - received 134902918 but expected 2: #()
Anywho, do the definitions above look OK? Just wanted to make sure
before I debug further...
Thanks!
Ed
_______________________________________________
Chicken-users mailing list
[email protected]
http://lists.nongnu.org/mailman/listinfo/chicken-users
