jdg@gs2.sp.cs.cmu.edu (John Greiner) (03/22/90)
I'm trying to translate some IBUKI CL specific code to other versions, so that my code will be reasonably portable. I can test the code under Allegro, Kyoto, Lucid, and CMU CL, but I'd appreciate help in translating the following to any CL dialect. 1) (gbc <x>) -- force GC at specified level of completeness 2) (system:getenv "FOO") -- get a csh environment value 3) (handler-case <x> ...) -- to handle exceptions raised in <x> 4) (defun system:terminal-interrupt ...) -- to route control on ^C, avoiding lisp's top-level loop 5) (setf (symbol-function 'system:top-level) ...) -- to define my own top-level loop so that the normal one is never used [the code is a Scheme interpreter] 6) (system:save-system "FOO") -- dump the lisp image into an executable file, which calls the (redefined) system:top-level upon startup 7) (system "FOO BAR") -- to execute the csh command "FOO" with argument "BAR" I'd also appreciate pointers to things like (setq *gc-silence* t) which is necessary in Lucid, that I wouldn't necessarily guess. -- John Greiner ===== John.Greiner@cs.cmu.edu ===== Carnegie Mellon University -- John Greiner ===== John.Greiner@cs.cmu.edu ===== Carnegie Mellon University