Raymond Toy pushed to branch native-image at cmucl / cmucl

Commits:

1 changed file:

Changes:

  • src/lisp/save.c
    ... ... @@ -680,6 +680,9 @@ init_asmtab()
    680 680
         asmtab[type_SimpleVector] = asm_simple_vector;
    
    681 681
         asmtab[type_FuncallableInstanceHeader] = asm_closure_header;
    
    682 682
         asmtab[type_ComplexVector] = asm_boxed;
    
    683
    +    asmtab[type_BaseChar] = asm_immediate;
    
    684
    +    /* Just use asm_boxed or have a special version for a value cell? */
    
    685
    +    asmtab[type_ValueCellHeader] = asm_boxed;
    
    683 686
     }
    
    684 687
         
    
    685 688
     void