Changeset 22849 for v6

Show
Ignore:
Timestamp:
11/01/08 22:53:00 (2 months ago)
Author:
pmurias
Message:

[smop] removed one use of SLIME

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • v6/smop/src/s1p_attribute.sm0p

    r22512 r22849  
    3737  } else if (identifier == SMOP__ID__create_container) { 
    3838 
    39     SMOP__Object* frame; 
    4039    SMOP__Object* continuation = SMOP_DISPATCH(interpreter, SMOP_RI(interpreter), 
    4140                                               SMOP__ID__continuation,  
    4241                                               SMOP_REFERENCE(interpreter,interpreter)); 
    4342 
    44     frame = q:v6-sm0p { 
    45       return $invocant.container_type.FETCH().new(); 
     43    SMOP__Object* mold = q:m0ld { 
     44      my $interpreter = ¢interpreter; 
     45      my $invocant = ¢invocant; 
     46      my $continuation = ¢continuation; 
     47      my $container_type_scalar = $invocant."container_type"(); 
     48      my $container_type = $container_type_scalar."FETCH"(); 
     49      my $new = $container_type."new"(); 
     50      my $void = $continuation."setr"($new); 
     51      $void = $interpreter."goto"($continuation); 
    4652    }; 
     53    SMOP__Object* frame = SMOP__Mold__Frame_create(interpreter,mold); 
     54    SMOP_RELEASE(interpreter,continuation); 
    4755 
    4856    SMOP_DISPATCH(interpreter, SMOP_RI(interpreter),