case CF_LONG:
AddCodeLine ("jsr pushax"); /* Push the address */
- push (flags); /* Correct the internal sp */
+ push (CF_PTR); /* Correct the internal sp */
g_getind (flags, offs); /* Fetch the value */
g_inc (flags, val); /* Increment value in primary */
g_putind (flags, offs); /* Store the value back */
case CF_LONG:
AddCodeLine ("jsr pushax"); /* Push the address */
- push (flags); /* Correct the internal sp */
+ push (CF_PTR); /* Correct the internal sp */
g_getind (flags, offs); /* Fetch the value */
g_dec (flags, val); /* Increment value in primary */
g_putind (flags, offs); /* Store the value back */