Skip to content
Snippets Groups Projects
Commit e662d591 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Add preliminary CLASP support

parent cae5fb1b
No related branches found
No related tags found
No related merge requests found
......@@ -121,6 +121,21 @@
:quit-format "(let ((x ~A)) (finish-output *standard-output*) (finish-output *error-output*) (ccl:quit x))"
:dump-format "(save-application ~S :prepend-kernel t)")
(define-lisp-implementation :ecl () ;; Not actually tested
:fullname "CLASP"
:name "clasp"
:feature :clasp
:flags () ;; ("-norc")
:eval-flag "-eval" ; -e ???
:load-flag "-load"
:image-flag nil
:image-executable-p t
:arguments-end "--"
:argument-control t ;; must be fixed now, but double-checking needed.
:disable-debugger ()
:quit-format "(si:quit ~A)"
:dump-format nil) ;; Cannot dump with CLASP. Link instead.
(define-lisp-implementation :clisp ()
:fullname "GNU CLISP"
:name "clisp"
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment