hyung-hwan/qse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
hyung-hwan 2006-12-26 13:27:02 +00:00
parent 28cc888f31
commit 2ba73c0ae6
2 changed files with 15 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
ase/awk/parse.c
View File

@ -1,5 +1,5 @@
/* /*
* $Id: parse.c,v 1.232 2006-12-26 10:04:58 bacon Exp $ * $Id: parse.c,v 1.233 2006-12-26 13:26:24 bacon Exp $
*/ */
#include <ase/awk/awk_i.h> #include <ase/awk/awk_i.h>
@ -1696,8 +1696,18 @@ static ase_awk_nde_t* __parse_statement_nb (ase_awk_t* awk, ase_size_t line)
{ {
if (nde != ASE_NULL) ase_awk_clrpt (awk, nde); if (nde != ASE_NULL) ase_awk_clrpt (awk, nde);
SET_ERROR_0 (awk, ASE_AWK_ESCOLON, if (MATCH(awk,TOKEN_EOF))
ASE_T("semicolon expected in place of '%.*s'")); {
ase_awk_seterror (
awk, ASE_AWK_EENDSRC,
awk->token.prev.line, ASE_NULL);
}
else
{
ase_awk_seterror (
awk, ASE_AWK_ESCOLON, awk->token.prev.line,
ASE_T("statement not terminated with a semicolon"));
}
return ASE_NULL; return ASE_NULL;
} }

4
ase/awk/run.c
View File

@ -1,5 +1,5 @@
/* /*
* $Id: run.c,v 1.310 2006-12-26 10:05:12 bacon Exp $ * $Id: run.c,v 1.311 2006-12-26 13:27:02 bacon Exp $
*/ */
#include <ase/awk/awk_i.h> #include <ase/awk/awk_i.h>
@ -2953,7 +2953,7 @@ static ase_awk_val_t* __eval_group (ase_awk_run_t* run, ase_awk_nde_t* nde)
/* __eval_binop_in evaluates the ASE_AWK_NDE_GRP specially. /* __eval_binop_in evaluates the ASE_AWK_NDE_GRP specially.
* so this function should never be reached. */ * so this function should never be reached. */
ASE_AWK_ASSERT (run->awk, !"should never happen - NDE_GRP only for in"); ASE_AWK_ASSERT (run->awk, !"should never happen - NDE_GRP only for in");
PANIC (run, ASE_AWK_EINTERNAL); ase_awk_setrunerror (run, ASE_AWK_EINTERNAL, nde->line, ASE_NULL);
return ASE_NULL; return ASE_NULL;
} }