/[cmucl]/src/hemlock/ts-buf.lisp
ViewVC logotype

Diff of /src/hemlock/ts-buf.lisp

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

revision 1.4 by ram, Fri Feb 8 16:38:37 1991 UTC revision 1.5 by ram, Wed Feb 20 02:31:37 1991 UTC
# Line 166  Line 166 
166                  ts)))                  ts)))
167      (setf (ts-data-stream ts) stream)      (setf (ts-data-stream ts) stream)
168      (wire:remote (ts-data-wire ts)      (wire:remote (ts-data-wire ts)
169        (ts-stream-set-line-length (ts-buffer-line-length ts))))        (ts-stream-set-line-length stream (ts-buffer-line-length ts))))
170    nil)    nil)
171    
172    

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

  ViewVC Help
Powered by ViewVC 1.1.5