drygdryg/calc
1
0
Fork 0
mirror of https://github.com/lcn2/calc.git synced 2025-08-16 01:03:29 +03:00
Code Issues Packages Projects Releases Wiki Activity

Release calc version 2.11.0t8.8

Browse Source
This commit is contained in:
Landon Curt Noll
1999-10-30 15:06:27 -07:00
parent 478d68fca9
commit 8927373965
11 changed files with 297 additions and 135 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
codegen.c
View File

@@ -86,6 +86,7 @@ getcommands(BOOL toplevel)
/* firewall */
name[0] = '\0';
name[MAXCMD+1] = '\0';
abort_now = FALSE;
/* getcommands */
if (!toplevel)
@@ -164,6 +165,13 @@ getcommands(BOOL toplevel)
if (evaluate(FALSE))
updateoldvalue(curfunc);
freefunc(curfunc);
if (abort_now) {
if (!stdin_tty)
run_state = RUN_EXIT;
else if (run_state < RUN_PRE_TOP_LEVEL)
run_state = RUN_PRE_TOP_LEVEL;
longjmp(jmpbuf, 1);
}
}
}
}
@@ -874,7 +882,7 @@ getstatement(LABEL *contlabel, LABEL *breaklabel, LABEL *nextcaselabel, LABEL *d
break;
case T_SYMBOL:
if (nextchar() == ':') { /****HACK HACK ****/
if (nextchar() == ':') { /****HACK HACK****/
definelabel(tokensymbol());
if (gettoken() == T_RIGHTBRACE) {
rescantoken();