Aren/NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix problems in "for (;;)" and put back in quiet mode.

Browse Source
This commit is contained in:
phil 2001-02-19 21:07:04 +00:00
parent 025b45e604
commit bb9bc62285
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gnu/dist/bc/bc/bc.y vendored
View File

@ -203,7 +203,7 @@ statement : Warranty
{
if ($4 & 2)
warn ("Comparison in first for expression");
if ($4 >= 0)
if ($4 <= 0)
generate ("p");
$4 = next_label++;
sprintf (genstr, "N%1d:", $4);
@ -211,7 +211,7 @@ statement : Warranty
}
opt_expression ';'
{
if ($7 < 0) generate ("1");
if ($7 & 16 ) generate ("1");
$7 = next_label++;
sprintf (genstr, "B%1d:J%1d:", $7, break_label);
generate (genstr);

2
gnu/dist/bc/bc/main.c vendored
View File

@ -171,7 +171,7 @@ main (argc, argv)
interactive = TRUE;
else
interactive = FALSE;
quiet = FALSE;
quiet = TRUE;
file_names = NULL;
#ifdef HAVE_SETVBUF