Changeset 22136 for v6

Show
Ignore:
Timestamp:
09/04/08 02:59:16 (3 months ago)
Author:
ruoso
Message:

[smop] starting to implement "map"

Location:
v6/smop
Files:
1 added
4 modified

Legend:

Unmodified
Added
Removed
  • v6/smop/CMakeLists.txt

    r22116 r22136  
    7070    src/smop_s1p_attribute.sm0p 
    7171    src/smop_s1p_code.sm0p 
     72    src/smop_s1p_map.sm0p 
    7273) 
    7374compile_sm0p (${sm0p_file}) 
     
    9394    src/smop_s1p_ccode.c 
    9495    src/smop_s1p_code.c 
     96    src/smop_s1p_map.c 
    9597    src/smop_s1p_pureprototypehow.c 
    9698    src/smop_s1p_bindcapturesignature.c 
  • v6/smop/include/smop_s1p.h

    r22050 r22136  
    1010extern SMOP__Object* SMOP__S1P__Code; 
    1111extern SMOP__Object* SMOP__S1P__CCode; 
     12extern SMOP__Object* SMOP__S1P__map; 
    1213extern SMOP__Object* SMOP__S1P__Attribute; 
    1314extern SMOP__Object* SMOP__S1P__Package; 
  • v6/smop/src/smop_internal.h

    r22050 r22136  
    6060     smop_s1p_defaultblocksignature_init(); \ 
    6161     smop_s1p_bindcapturesignature_init();  \ 
    62      smop_s1p_pureprototypehow_init(); 
     62     smop_s1p_pureprototypehow_init();      \ 
     63     smop_s1p_map_init(); 
    6364#define SMOP_INTERNAL_DESTROY_SEQUENCE      \ 
     65     smop_s1p_map_destr();                  \ 
    6466     smop_s1p_pureprototypehow_destr();     \ 
    6567     smop_s1p_bindcapturesignature_destr(); \ 
     
    8789     smop_s1p_code_mold_init();             \ 
    8890     smop_s1p_pureprototypehow_mold_init(); \ 
     91     smop_s1p_map_mold_init();              \ 
    8992 
    9093#define SMOP_BOOTSTRAP_DESTR_SEQUENCE       \ 
     94     smop_s1p_map_mold_destr();             \ 
    9195     smop_s1p_pureprototypehow_mold_destr();\ 
    9296     smop_s1p_code_mold_destr();            \ 
  • v6/smop/test/30_array_map.m0ld

    r22135 r22136  
    3838    my $continuation = $interpreter."continuation"(); 
    3939    my $back = $continuation."back"(); 
    40     $back.setr($void); 
     40    $void = $back."setr"($void); 
    4141    $void = $interpreter."goto"($back); 
    4242}));