summary refs log tree commit diff
path: root/src/instruction/decrement.c
blob: ce3af87c4606c1bc6f64cce8704a6d1198a369bd (plain)
1
2
3
4
5
6
7
8
9
10
11
#include "3cl.h"

#include "utils.h"

struct CCLFrame *ccl_instruction_decrement(struct CCL *ccl, struct CCLFrame *frame)
{
    if (ccl->stack.cur < 1)
        die(1, "stack size is %d (%d required)", ccl->stack.cur, 1);
    --ccl->stack.stack[ccl->stack.cur];
    return frame;
}