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

Diff of /src/hemlock/cursor.lisp

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

revision 1.3 by ram, Mon Oct 31 04:50:12 1994 UTC revision 1.4 by pw, Tue Mar 13 15:49:52 2001 UTC
# Line 36  Line 36 
36  ;;;    3) Call Real-Line-Length or Cached-Real-Line-Length to get the  ;;;    3) Call Real-Line-Length or Cached-Real-Line-Length to get the
37  ;;; X position and number of times wrapped.  ;;; X position and number of times wrapped.
38    
39  (proclaim '(special the-sentinel))  (declaim (special the-sentinel))
40    
41  (eval-when (compile eval)  (eval-when (compile eval)
42  ;;; find-line  ;;; find-line

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

  ViewVC Help
Powered by ViewVC 1.1.5