Branch: Tag:

1998-02-20

1998-02-20 00:37:16 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

stack_dup() and stack_swap() added

Rev: src/interpret.h:1.18

54:      #define push_svalue(S) do { struct svalue *_=(S); assign_svalue_no_free(sp,_); sp++; }while(0)    + #define stack_dup() push_svalue(sp-1) + #define stack_swap() do { struct svalue _=sp[-1]; sp[-1]=sp[-2]; sp[-2]=_; } while(0) +  +    enum apply_type   {    APPLY_STACK, /* The function is the first argument */