Changeset 11649


Ignore:
Timestamp:
02/08/09 22:48:32 (12 years ago)
Author:
ehuelsmann
Message:

Indentation: make opcode-enumerations look like elsewhere.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp

    r11648 r11649  
    984984        ((fixnump target)
    985985         ;; A register.
    986          (emit
    987           (ecase representation
    988             ((:int :boolean :char)
    989              'istore)
    990             (:long
    991              'lstore)
    992             (:float
    993              'fstore)
    994             (:double
    995              'dstore)
    996             ((nil)
    997              'astore))
    998           target))
     986         (emit (ecase representation
     987                 ((:int :boolean :char)
     988                          'istore)
     989                 (:long   'lstore)
     990                 (:float  'fstore)
     991                 (:double 'dstore)
     992                 ((nil)   'astore))
     993               target))
    999994        (t
    1000995         (sys::%format t "emit-move-from-stack general case~%")
Note: See TracChangeset for help on using the changeset viewer.