Ignore:
Timestamp:
05/08/09 18:58:03 (13 years ago)
Author:
ehuelsmann
Message:

Simplify PROCESS-DEFCONSTANT;
the only thing the code we're removing was doing is prevent a #. reader macro
on the dumped third list element.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/compile-file.lisp

    r11812 r11841  
    8484  ;; it always evaluates to the same value."
    8585  (eval form)
    86   (cond ((structure-object-p (third form))
    87          (multiple-value-bind (creation-form initialization-form)
    88              (make-load-form (third form))
    89            (dump-form (list 'DEFCONSTANT (second form) creation-form) stream)))
    90         (t
    91          (dump-form form stream)))
     86  (dump-form form stream)
    9287  (%stream-terpri stream))
    9388
Note: See TracChangeset for help on using the changeset viewer.