16 lines
320 B
Scheme
16 lines
320 B
Scheme
(user)
|
|
(open 'dynamic-externals)
|
|
(open 'external-calls)
|
|
|
|
(run
|
|
'(let ((initializer-name "scsh_yp_main")
|
|
(module-file "/Users/knauel/cool-stuff/scsh-yp/c/yp.dylib"))
|
|
(dynamic-load module-file)
|
|
(call-external (get-external initializer-name))))
|
|
|
|
(config)
|
|
(load "yp-interfaces.scm")
|
|
(load "yp-packages.scm")
|
|
|
|
|
|
|