scsh-yp/scheme/load-yp.scm.in

16 lines
494 B
Scheme

(config)
(load "@ypschemedir@/configure.scm")
(user)
(load-package 'dynamic-externals)
(load-package 'configure)
(open 'dynamic-externals)
(open 'external-calls)
(open 'configure)
(run '(let ((initializer-name "scsh_yp_main")
(module-file (string-append "@yplibsysdir@/" @yphost@ "/libscshyp.so")))
(dynamic-load module-file)
(call-external (get-external initializer-name))))
(config)
(load "@ypschemedir@/yp-interfaces.scm")
(load "@ypschemedir@/yp-packages.scm")