edi@bird:/tmp > cmucl
  ; Loading #p"/home/edi/.cmucl-init".
  CMU Common Lisp 18d+, built 2002-09-13 on melbourne, running on bird.agharta.de
  Send questions to [EMAIL PROTECTED] and bug reports to [EMAIL PROTECTED]
  Loaded subsystems:
      Python 1.0, target Intel x86
      CLOS based on PCL version:  September 16 92 PCL (f)
  * (dribble "foo")

  * (/ 1 0)

  Arithmetic error DIVISION-BY-ZERO signalled.
  Operation was KERNEL::DIVISION, operands (1 0).

  Restarts:
    0: [ABORT] Return to Top-Level.

  Debug  (type H for help)

  (KERNEL::INTEGER-/-INTEGER 1 0)
  Source: Error finding source:
  Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM:  Source file no longer exists:
    target:code/numbers.lisp.
  0] (dribble)

  0] :a

  Error in function COMMON-LISP::CLOSED-FLAME:
     #<Stream for file "foo"> is closed.

  Restarts:
    0: [ABORT] Return to Top-Level.

  Debug  (type H for help)

  (COMMON-LISP::CLOSED-FLAME #<Stream for file "foo">)
  Source: Error finding source:
  Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM:  Source file no longer exists:
    target:code/stream.lisp.
  0] (quit)

  Error in function COMMON-LISP::CLOSED-FLAME:
     #<Stream for file "foo"> is closed.

  Debug  (type H for help)

  (COMMON-LISP::CLOSED-FLAME #<Stream for file "foo">)
  Source: Error finding source:
  Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM:  Source file no longer exists:
    target:code/stream.lisp.
  0]

I don't think this is a bug but I'd say it is a bit
uncomfortable. CLISP shows the same behaviour, LispWorks - on
executing (DRIBBLE) - will automatically take you back to the top
level while AllegroCL just carries on without problems - I think this
is done by setting EXCL::*DRIBBLE-ACTIVE* to NIL.

I prefer ACL's behaviour and think it would be worthwhile to add it to
CMUCL.

Cheers,
Edi.

PS: Basically the same mail sent to CLISP mailing list.

Reply via email to