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

Diff of /src/hemlock/lispeval.lisp

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

revision 1.1.1.6 by ram, Tue Oct 1 17:23:04 1991 UTC revision 1.1.1.7 by ram, Fri Oct 18 17:20:26 1991 UTC
# Line 162  Line 162 
162           (line (mark-line           (line (mark-line
163                  (buffer-end-mark                  (buffer-end-mark
164                   (server-info-background-buffer server))))                   (server-info-background-buffer server))))
165           (message (format nil "~:(~A~) ~@[in ~A ]during ~A."           (message (format nil "~:(~A~) ~@[in ~A ~]during ~A."
166                            severity                            severity
167                            function                            function
168                            (note-context note)))                            (note-context note)))

Legend:
Removed from v.1.1.1.6  
changed lines
  Added in v.1.1.1.7

  ViewVC Help
Powered by ViewVC 1.1.5