/[cmucl]/src/tools/comcom.lisp
ViewVC logotype

Diff of /src/tools/comcom.lisp

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

revision 1.45 by ram, Fri Aug 20 00:25:17 1993 UTC revision 1.46 by ram, Fri Aug 20 18:25:51 1993 UTC
# Line 33  Line 33 
33               (:match "$SOURCE-TRANSFORM-" "$IR1-CONVERT-"               (:match "$SOURCE-TRANSFORM-" "$IR1-CONVERT-"
34                       "$PRIMITIVE-TRANSLATE-" "$PARSE-"))                       "$PRIMITIVE-TRANSLATE-" "$PARSE-"))
35          (declare (optimize (safety 1))))          (declare (optimize (safety 1))))
36         ((:or :macro (match "$%PRINT-"))         ((:or :macro (:match "$%PRINT-"))
37          (declare (optimize (speed 0))))          (declare (optimize (speed 0))))
38         (:external (declare (optimize-interface (safety 2) (debug 1))))))         (:external (declare (optimize-interface (safety 2) (debug 1))))))
39    

Legend:
Removed from v.1.45  
changed lines
  Added in v.1.46

  ViewVC Help
Powered by ViewVC 1.1.5