/[cmucl]/src/hemlock/struct.lisp
ViewVC logotype

Diff of /src/hemlock/struct.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5 by ram, Mon Oct 31 04:50:12 1994 UTC revision 1.6 by dtc, Mon May 4 01:27:20 1998 UTC
# Line 326  Line 326 
326    
327  ;;; These streams write to random typeout buffers for WITH-POP-UP-DISPLAY.  ;;; These streams write to random typeout buffers for WITH-POP-UP-DISPLAY.
328  ;;;  ;;;
329  (defstruct (random-typeout-stream (:include stream)  (defstruct (random-typeout-stream (:include sys:lisp-stream)
330                                    (:print-function print-random-typeout-stream)                                    (:print-function print-random-typeout-stream)
331                                    (:constructor                                    (:constructor
332                                     make-random-typeout-stream (mark)))                                     make-random-typeout-stream (mark)))

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

  ViewVC Help
Powered by ViewVC 1.1.5