diff options
Diffstat (limited to 'Lisp/moxie/compat/compat-clisp.lib')
| -rw-r--r-- | Lisp/moxie/compat/compat-clisp.lib | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/Lisp/moxie/compat/compat-clisp.lib b/Lisp/moxie/compat/compat-clisp.lib new file mode 100644 index 0000000..6d4ac37 --- /dev/null +++ b/Lisp/moxie/compat/compat-clisp.lib @@ -0,0 +1,17 @@ +#0Y UTF-8 +(COMMON-LISP::SETQ COMMON-LISP::*PACKAGE* (SYSTEM::%FIND-PACKAGE "MOXIE")) +(SYSTEM::C-DEFUN 'MOXIE::MAKE-RESULT-STREAM + (SYSTEM::LAMBDA-LIST-TO-SIGNATURE 'COMMON-LISP::NIL)) +(SYSTEM::C-DEFUN 'MOXIE::COERCE-INET-ADDRESS-DESIGNATOR + (SYSTEM::LAMBDA-LIST-TO-SIGNATURE '(MOXIE::HOST))) +(SYSTEM::C-DEFUN 'MOXIE::OPEN-CONNECTION + (SYSTEM::LAMBDA-LIST-TO-SIGNATURE + '(MOXIE::HOST MOXIE::PORT COMMON-LISP::&KEY (MOXIE::BUFFERING :FULL)))) +(SYSTEM::C-DEFUN 'MOXIE::CLOSE-CONNECTION + (SYSTEM::LAMBDA-LIST-TO-SIGNATURE '(COMMON-LISP::STREAM))) +(SYSTEM::C-DEFUN 'MOXIE::ADD-INPUT-HANDLER + (SYSTEM::LAMBDA-LIST-TO-SIGNATURE '(COMMON-LISP::STREAM MOXIE::HANDLER))) +(SYSTEM::C-DEFUN 'MOXIE::REMOVE-INPUT-HANDLER + (SYSTEM::LAMBDA-LIST-TO-SIGNATURE '(MOXIE::HANDLER))) +(SYSTEM::C-DEFUN 'MOXIE::SAVE-LISP-AND-DIE + (SYSTEM::LAMBDA-LIST-TO-SIGNATURE '(MOXIE::PATH))) |