/[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.1 by ram, Fri Oct 12 01:40:49 1990 UTC revision 1.1.1.2 by ram, Mon Jan 28 12:44:30 1991 UTC
# Line 173  Line 173 
173                      (:compile                      (:compile
174                       (note-region note))                       (note-region note))
175                      (:compile-file                      (:compile-file
176                       (buffer-region (note-buffer note)))                       (let ((buff (note-buffer note)))
177                           (and buff (buffer-region buff))))
178                      (t                      (t
179                       (error "Compiler error in ~S?" note)))))                       (error "Compiler error in ~S?" note)))))
180        (when region        (when region

Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.1.1.2

  ViewVC Help
Powered by ViewVC 1.1.5