![[BACK]](/icons/back.gif){kind=icon}
Return to stack.c CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [local] / src / usr.bin / dc|
Return to stack.c CVS log | Up to [local] / src / usr.bin / dc |
| version 1.4, 2003/10/18 20:34:26 | version 1.5, 2003/11/04 08:10:06 | ||
|---|---|---|---|
|
|
||
| stack_push(stack, stack_dup_value(value, ©)); | stack_push(stack, stack_dup_value(value, ©)); | ||
| } | } | ||
| void | |||
| stack_swap(struct stack *stack) | |||
| { | |||
| struct value copy; | |||
| if (stack->sp < 1) { | |||
| warnx("stack empty"); | |||
| return; | |||
| } | |||
| copy = stack->stack[stack->sp]; | |||
| stack->stack[stack->sp] = stack->stack[stack->sp-1]; | |||
| stack->stack[stack->sp-1] = copy; | |||
| } | |||
| static void | static void | ||
| stack_grow(struct stack *stack) | stack_grow(struct stack *stack) | ||
| { | { |