Script started on Thu 25 Apr 2002 09:23:18 AM EDT
/access control disabled, clients can connect from any host
adara/S02> old-acl
Allegro CL Enterprise Edition 5.0.1 [SPARC] (8/20/99 10:07)
Copyright (C) 1985-1999, Franz Inc., Berkeley, CA, USA.  All Rights Reserved.
;; Optimization settings: safety 1, space 1, speed 1, debug 2.
;; For a complete description of all compiler switches given the
;; current optimization settings evaluate (EXPLAIN-COMPILER-SETTINGS).
USER(1): :ld /projects/snwiz/bin/sneps
; Fast loading /projects/snwiz/bin/sneps.fasl
Loading system SNePS...10% 20% 30% 40% 50% 60% 70% 80% 90% 100% 
SNePS-2.5 [PL:1 1999/08/19 16:38:25] loaded.
Type `(sneps)' or `(snepslog)' to get started.
USER(2): :pa snepsul
SNEPSUL(3): (atnin "grammar.manual")
Error: `NIL' is not of the expected type `HASH-TABLE'
  [condition type: TYPE-ERROR]

Restart actions (select using :continue):
 0: Return to Top Level (an "abort" restart)
 1: Abort #<PROCESS Initial Lisp Listener>
[1] SNEPSUL(4): :res
SNEPSUL(5): (exit)
Error: attempt to call `EXIT' which is an undefined function.
  [condition type: UNDEFINED-FUNCTION]

Restart actions (select using :continue):
 0: Try calling EXIT again.
 1: Try calling EXCL:EXIT instead.
 2: Return a value instead of calling EXIT.
 3: Try calling a function other than EXIT.
 4: Setf the symbol-function of EXIT and call it again.
 5: Return to Top Level (an "abort" restart)
 6: Abort #<PROCESS Initial Lisp Listener>
[1] SNEPSUL(6): (EXIT)
Error: attempt to call `EXIT' which is an undefined function.
  [condition type: UNDEFINED-FUNCTION]

Restart actions (select using :continue):
  0: Try calling EXIT again.
  1: Try calling EXCL:EXIT instead.
  2: Return a value instead of calling EXIT.
  3: Try calling a function other than EXIT.
  4: Setf the symbol-function of EXIT and call it again.
  5: Return to Debug Level 1 (an "abort" restart)
  6: Try calling EXIT again.
  7: Try calling EXCL:EXIT instead.
  8: Return a value instead of calling EXIT.
  9: Try calling a function other than EXIT.
 10: Setf the symbol-function of EXIT and call it again.
 11: Return to Top Level (an "abort" restart)
 12: Abort #<PROCESS Initial Lisp Listener>
[2] SNEPSUL(7): (sneps)


   Welcome to SNePS-2.5 [PL:1 1999/08/19 16:38:25]

Copyright (C) 1984--1999 by Research Foundation of
State University of New York. SNePS comes with ABSOLUTELY NO WARRANTY!
Type `(copyright)' for detailed copyright information.
Type `(demo)' for a list of example applications.

   4/25/2002 9:25:06

* (lisp)
"End of SNePS"
[2] SNEPSUL(8): (exit)
Error: attempt to call `EXIT' which is an undefined function.
  [condition type: UNDEFINED-FUNCTION]

Restart actions (select using :continue):
  0: Try calling EXIT again.
  1: Try calling EXCL:EXIT instead.
  2: Return a value instead of calling EXIT.
  3: Try calling a function other than EXIT.
  4: Setf the symbol-function of EXIT and call it again.
  5: Return to Debug Level 2 (an "abort" restart)
  6: Try calling EXIT again.
  7: Try calling EXCL:EXIT instead.
  8: Return a value instead of calling EXIT.
  9: Try calling a function other than EXIT.
 10: Setf the symbol-function of EXIT and call it again.
 11: Return to Debug Level 1 (an "abort" restart)
 12: Try calling EXIT again.
 13: Try calling EXCL:EXIT instead.
 14: Return a value instead of calling EXIT.
 15: Try calling a function other than EXIT.
 16: Setf the symbol-function of EXIT and call it again.
 17: Return to Top Level (an "abort" restart)
 18: Abort #<PROCESS Initial Lisp Listener>
[3] SNEPSUL(9): ^C
Error: Received signal number 2 (Keyboard interrupt)
  [condition type: INTERRUPT-SIGNAL]

Restart actions (select using :continue):
  0: continue computation at break level 3
  1: Try calling EXIT again.
  2: Try calling EXCL:EXIT instead.
  3: Return a value instead of calling EXIT.
  4: Try calling a function other than EXIT.
  5: Setf the symbol-function of EXIT and call it again.
  6: Return to Debug Level 2 (an "abort" restart)
  7: Try calling EXIT again.
  8: Try calling EXCL:EXIT instead.
  9: Return a value instead of calling EXIT.
 10: Try calling a function other than EXIT.
 11: Setf the symbol-function of EXIT and call it again.
 12: Return to Debug Level 1 (an "abort" restart)
 13: Try calling EXIT again.
 14: Try calling EXCL:EXIT instead.
 15: Return a value instead of calling EXIT.
 16: Try calling a function other than EXIT.
 17: Setf the symbol-function of EXIT and call it again.
 18: Return to Top Level (an "abort" restart)
 19: Abort #<PROCESS Initial Lisp Listener>
[4c] SNEPSUL(10): ^C
Error: Received signal number 2 (Keyboard interrupt)
  [condition type: INTERRUPT-SIGNAL]

Restart actions (select using :continue):
  0: continue computation at break level 4
  1: continue computation at break level 3
  2: Try calling EXIT again.
  3: Try calling EXCL:EXIT instead.
  4: Return a value instead of calling EXIT.
  5: Try calling a function other than EXIT.
  6: Setf the symbol-function of EXIT and call it again.
  7: Return to Debug Level 2 (an "abort" restart)
  8: Try calling EXIT again.
  9: Try calling EXCL:EXIT instead.
 10: Return a value instead of calling EXIT.
 11: Try calling a function other than EXIT.
 12: Setf the symbol-function of EXIT and call it again.
 13: Return to Debug Level 1 (an "abort" restart)
 14: Try calling EXIT again.
 15: Try calling EXCL:EXIT instead.
 16: Return a value instead of calling EXIT.
 17: Try calling a function other than EXIT.
 18: Setf the symbol-function of EXIT and call it again.
 19: Return to Top Level (an "abort" restart)
 20: Abort #<PROCESS Initial Lisp Listener>
[5c] SNEPSUL(11): (EXCL:EXIT)
; Exiting Lisp
adara/S02> mail ^D