14 lines
384 B
Scheme
14 lines
384 B
Scheme
|
(user)
|
||
|
|
(load-package 'dynamic-externals)
|
||
|
|
(open 'dynamic-externals)
|
||
|
|
(open 'external-calls)
|
||
|
|
(run '(let ((initializer-name "scx_init_xlib")
|
||
|
|
(module-file "@scxlibdir@/libscx.so"))
|
||
|
|
(dynamic-load module-file)
|
||
|
|
(call-external (get-external initializer-name))))
|
||
|
|
(config)
|
||
|
|
(load "@scxdatadir@/xlib/xlib-interfaces.scm")
|
||
|
|
(load "@scxdatadir@/xlib/xlib-packages.scm")
|
||
|
|
|
||
|
|
|