Label* CacheStub::prologue(bool immediateOnly) {
assert(((Float_Tag | Int_Tag) & Mem_Tag) == 0, "tagging scheme changed");
Label* miss = NULL;
Label* loadMapAfterHandlingImmediates = NULL;
pc_t floatAddr, smiAddr;
computeJumpAddr(nsmi, theSendDesc, stsmi, smiAddr);
computeJumpAddr(nfloat, theSendDesc, stfloat, floatAddr);
// put rcvr in Temp1
a->movl(esp, leaf_rcvr_offset * oopSize, NumberOperand, Temp1);
// Load map if needed
if (immediateOnly)
;
else {
a->btl(Mem_Tag_bit_i386, Temp1);
loadMapAfterHandlingImmediates = new Label(a->printing);
a->jc(loadMapAfterHandlingImmediates); // jump if memOop
}
if (nsmi && nfloat) {
Label* not_smi = br_if_not_smi();
add_case(nsmi, stsmi, smiAddr);
not_smi->define();
// if immediateOnly = false and we're down here, we've already tested for memOop
// and hence there's no need to test for the float tag.
if (immediateOnly)
miss = br_if_not_float(); // br if mem
else
miss = NULL;
add_case(nfloat, stfloat, floatAddr);
}
else if (nsmi) { miss = br_if_not_smi(); add_case(nsmi, stsmi, smiAddr); }
else if (nfloat) { miss = br_if_not_float(); add_case(nfloat, stfloat, floatAddr); }
else {
// tested for Oop above, so rcvr is int or float,
// but there are no smi or float cases, so must be a miss
miss = new Label(a->printing);
a->jmp(miss);
}
if (loadMapAfterHandlingImmediates) {
loadMapAfterHandlingImmediates->define();
// CacheStub::test expects Temp1 to contain the receiver's map
a->movl(Temp1, map_offset(), NumberOperand, Temp1);
}
return miss;
}
void *op_brick_add(t_brick *brick)
{
t_context *C = ctx_get();
t_node *node = NULL;
t_block *block;
t_set *set;
// store
scene_store(C->scene,1);
char *name=brick->id.name;
if(is(name,"frame")) node = add_slider_int(C,"frame",&C->app->frame);
else if(is(name,"timer")) node = add_slider_float(C,"timer",&C->app->timer);
else if(is(name,"timer low")) node = add_slider_float(C,"timer low",&C->app->timer_add_low);
else if(is(name,"=")) node = add_operator_double(C,"=");
else if(is(name,">")) node = add_operator_double(C,">");
else if(is(name,"<")) node = add_operator_double(C,"<");
else if(is(name,"if")) node = add_if(C);
else if(is(name,"mod")) node = add_operator_double(C,"mod");
else if(is(name,"x")) node = add_maths(C,"x");
else if(is(name,"+")) node = add_maths(C,"+");
else if(is(name,"++")) node = add_plusplus(C);
else if(is(name,"switch")) node = add_switch(C,"switch",NULL,NULL);
else if(is(name,"clone")) node = add_clone(C);
else if(is(name,"pipe")) node = add_pipe(C);
else if(is(name,"sec")) node = add_slider_int(C,"sec",&C->app->clock->sec);
else if(is(name,"min")) node = add_slider_int(C,"min",&C->app->clock->min);
else if(is(name,"int")) node = add_slider_int(C,"int",NULL);
else if(is(name,"float")) node = add_slider_float(C,"float",NULL);
else if(is(name,"10")) node = add_multiplier(C,"10");
else if(is(name,"100")) node = add_multiplier(C,"100");
else if(is(name,".1")) node = add_multiplier(C,".1");
else if(is(name,".01")) node = add_multiplier(C,".01");
else if(is(name,".001")) node = add_multiplier(C,".001");
else if(is(name,"msec")) node = add_slider_int(C,"msec",&C->app->clock->msec);
else if(is(name,"cos")) node = add_operator_single(C,"cos",op_cos);
else if(is(name,"sin")) node = add_operator_single(C,"sin",op_sin);
else if(is(name,"cam_eye_x")) node = add_slider_camera(C,"eye x");
else if(is(name,"cam_eye_y")) node = add_slider_camera(C,"eye y");
else if(is(name,"cam_eye_z")) node = add_slider_camera(C,"eye z");
else if(is(name,"cam_pos_x")) node = add_slider_camera(C,"pos x");
else if(is(name,"cam_pos_y")) node = add_slider_camera(C,"pos y");
else if(is(name,"cam_pos_z")) node = add_slider_camera(C,"pos z");
else if(is(name,"cam_rot_xy")) node = add_slider_float_custom(C,"cam rot xy",op_camera_rotate_xy);
else if(is(name,"cam_rot_z")) node = add_slider_float_custom(C,"cam rot z",op_camera_rotate_z);
else if(is(name,"pos x")) node = add_slider_object(C,"pos x");
else if(is(name,"pos y")) node = add_slider_object(C,"pos y");
else if(is(name,"pos z")) node = add_slider_object(C,"pos z");
else if(is(name,"rot x")) node = add_slider_object(C,"rot x");
else if(is(name,"rot y")) node = add_slider_object(C,"rot y");
else if(is(name,"rot z")) node = add_slider_object(C,"rot z");
else if(is(name,"scl x")) node = add_slider_object(C,"scl x");
else if(is(name,"scl y")) node = add_slider_object(C,"scl y");
else if(is(name,"scl z")) node = add_slider_object(C,"scl z");
else if(is(name,"red")) node = add_slider_object(C,"red");
else if(is(name,"green")) node = add_slider_object(C,"green");
else if(is(name,"blue")) node = add_slider_object(C,"blue");
else if(is(name,"color")) node = add_slider_object(C,"color");
else if(is(name,"faces")) node = add_slider_object(C,"faces");
else if(is(name,"alpha")) node = add_slider_object(C,"alpha");
else if(is(name,"label")) node = add_label(C,"label");
else if(is(name,"get")) node = add_get(C);
else if(is(name,"rewind")) node = add_trigger_always(C,"rewind",op_rewind);
else if(is(name,"not")) node = add_slider_int_custom(C,"not",NULL,op_not);
else if(is(name,"mouse_x")) node = add_slider_int(C,"mouse x",&C->app->mouse->x);
else if(is(name,"mouse_y")) node = add_slider_int(C,"mouse y",&C->app->mouse->y);
else if(is(name,"keyboard")) node = add_slider_char(C,"keyboard",&C->app->keyboard->key_pressed);
else if(is(name,"rnd")) node = add_slider_int_custom(C,"rnd",NULL,op_rnd);
else if(is(name,"neg")) node = add_slider_int_custom(C,"neg",NULL,op_neg);
else if(is(name,"abs")) node = add_slider_int_custom( C, "abs", NULL, op_abs);
else if(is(name,"last?")) node = add_switch(C,"last?",NULL,op_is_last);
else if(is(name,"for")) node = add_for(C);
else if(is(name,"vector 3d")) node = add_vector_3d(C);
else if(is(name,"vector 2d")) node = add_vector_2d(C);
else if(is(name,"bang")) node = add_slider_int_custom(C,"bang",NULL,op_bang);
else if(is(name,"quit")) node = add_trigger_always(C,"quit",op_do_quit);
else if(is(name,"const")) node = add_const(C);
else if(is(name,"and")) node = add_maths(C,"and");
else if(is(name,"stack")) node = add_stack(C);
else if(is(name,"mesh")) node = add_slider_object(C,"mesh");
else if(is(name,"vertex")) node = add_brick_mesh(C,"vertex");
else if(is(name,"edges")) node = add_brick_mesh(C,"edges");
else if(is(name,"case")) node = add_case(C,"switch");
// Store
scene_store(C->scene,0);
term_log("+ brick");
// Switch Desk
if(!C->ui->show_sets) show_sets(C);
if( node)
{
block = node->data;
set = block->set;
set_setup( set);
}
return NULL;
}
