static gpasmVal do_bdc(gpasmVal r, const char *name, int arity, struct pnode *parms) { do_insn("btfsc", make_constant_list(3, 1)); do_insn("goto", parms); return r; }
static gpasmVal do_subcf(gpasmVal r, const char *name, int arity, struct pnode *parms) { do_insn("btfsc", make_constant_list(3, 0)); do_insn("decf", parms); return r; }
static gpasmVal do_adddcf(gpasmVal r, char *name, int arity, struct pnode *parms) { do_insn("btfsc", make_constant_list(3, 1)); do_insn("incf", parms); return r; }
static gpasmVal do_addcf(gpasmVal r, const char *name, int arity, struct pnode *parms) { gpvmessage(GPM_SPECIAL_MNEMONIC, NULL); do_insn("btfsc", make_constant_list(3, 0)); do_insn("incf", parms); return r; }
static gpasmVal do_skpnz(gpasmVal r, const char *name, int arity, struct pnode *parms) { if (arity) { gpverror(GPE_TOO_MANY_ARGU, NULL); } do_insn("btfsc", make_constant_list(3, 2)); return r; }
static gpasmVal do_setdc(gpasmVal r, char *name, int arity, struct pnode *parms) { if (arity) { gperror(GPE_TOO_MANY_ARGU, NULL); } do_insn("bsf", make_constant_list(3, 1)); return r; }