diff options
Diffstat (limited to 'src/interp/vmlisp.lisp')
| -rw-r--r-- | src/interp/vmlisp.lisp | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/src/interp/vmlisp.lisp b/src/interp/vmlisp.lisp index 76b52318..0d3f8522 100644 --- a/src/interp/vmlisp.lisp +++ b/src/interp/vmlisp.lisp @@ -1893,20 +1893,6 @@ ()) -#+(and :Lucid (not :ibm/370)) -(defun OBEY (S) - (system::run-aix-program (|makeAbsoluteFilename| "/lib/obey") - :arguments (list "-c" S))) -#+:cmulisp -(defun OBEY (S) - (ext:run-program (|makeAbsoluteFilename| "/lib/obey") - (list "-c" S) :input t :output t)) -#+(OR IBCL KCL :CCL) -(defun OBEY (S) (SYSTEM S)) - -#+:allegro -(defun OBEY (S) (excl::run-shell-command s)) - (defun RE-ENABLE-INT (number-of-handler) number-of-handler) |