/[cmucl]/src/code/ntrace.lisp
ViewVC logotype

Diff of /src/code/ntrace.lisp

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

revision 1.10 by wlott, Tue Dec 8 20:10:16 1992 UTC revision 1.11 by ram, Wed Jun 23 19:33:02 1993 UTC
# Line 141  Line 141 
141        (res named-p)        (res named-p)
142        (typecase x        (typecase x
143          (symbol          (symbol
144           (cond ((special-form-p x)           (cond ((special-operator-p x)
145                  (error "Can't trace special form ~S." x))                  (error "Can't trace special form ~S." x))
146                 ((macro-function x))                 ((macro-function x))
147                 (t                 (t

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

  ViewVC Help
Powered by ViewVC 1.1.5