[no subject]

Or how about typing:

(dribble "filename)
(progn (print 'foo)
       (dribble)
       (print 'bar))

The second PRINT will never get executed, because the (dribble) throws
out of the PROGN.

Finally, you could really get screwed if you start dribbling, do
something that gets you into the debugger, and decide to stop dribbling;
you will lose your debugger session.  This doesn't actually happen
because Symbolics disables dribbling when you go into the debugger or
when you get a new r-e-p loop with the Suspend key, so (dribble) just
says that output isn't being recorded and does nothing else.  (The fact
that debugger and break loop I/O isn't dribbled is another point of
contention I have.)

CLtL doesn't say a whole lot about DRIBBLE.  In particular, it doesn't
say what the return value is, but that doesn't mean that it is allowed
for (dribble) not to return, does it?  What do other Common Lispers
think?

                                                barmar