2742 |
object in; |
object in; |
2743 |
{ |
{ |
2744 |
int dimcount, dim; |
int dimcount, dim; |
2745 |
object *vsp,vspo; |
VOL object *vsp; |
2746 |
|
object vspo; |
2747 |
VOL object x; |
VOL object x; |
2748 |
int i; |
int i; |
2749 |
bool e; |
bool e; |
2756 |
old_sharp_eq_context[SHARP_EQ_CONTEXT_SIZE]; |
old_sharp_eq_context[SHARP_EQ_CONTEXT_SIZE]; |
2757 |
int old_backq_level; |
int old_backq_level; |
2758 |
|
|
2759 |
|
/* to prevent longjmp clobber */ |
2760 |
|
i=(int)&vsp; |
2761 |
vsp=&vspo; |
vsp=&vspo; |
2762 |
old_READtable = READtable; |
old_READtable = READtable; |
2763 |
old_READdefault_float_format = READdefault_float_format; |
old_READdefault_float_format = READdefault_float_format; |
2832 |
nlj_active = FALSE; |
nlj_active = FALSE; |
2833 |
unwind(nlj_fr, nlj_tag); |
unwind(nlj_fr, nlj_tag); |
2834 |
} |
} |
2835 |
vs_top = vsp; |
vs_top = (object *)vsp; |
2836 |
return(x); |
return(x); |
2837 |
} |
} |