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 2007-02-18 11:21:34 +00:00
parent 6515dc2036
commit 8df5e66f4f
2 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ase/awk/parse.c
View File

@ -1,5 +1,5 @@
/*
* $Id: parse.c,v 1.242 2007-02-18 11:12:18 bacon Exp $
* $Id: parse.c,v 1.243 2007-02-18 11:21:34 bacon Exp $
*
* {License}
*/
@ -4203,7 +4203,8 @@ static int __get_token (ase_awk_t* awk)
if (__get_char (awk) == -1) return -1;
c = awk->src.lex.curc;
if (ASE_AWK_ISDIGIT (awk, c))
if ((awk->option & ASE_AWK_EXPLICIT) == 0 &&
ASE_AWK_ISDIGIT (awk, c))
{
awk->src.lex.curc = ASE_T('.');
if (__unget_char (awk, c) == -1) return -1;

4
ase/test/awk/awk.c
View File

@ -1,5 +1,5 @@
/*
* $Id: awk.c,v 1.165 2007-02-11 14:08:08 bacon Exp $
* $Id: awk.c,v 1.166 2007-02-18 11:21:19 bacon Exp $
*/
#include <ase/awk/awk.h>
@ -796,7 +796,7 @@ static int awk_main (int argc, ase_char_t* argv[])
ase_awk_runarg_t runarg[128];
int deparse = 0;
opt = ASE_AWK_IMPLICIT |
opt = ASE_AWK_IMPLICIT |
ASE_AWK_EXPLICIT |
ASE_AWK_UNIQUEFN |
ASE_AWK_IDIV |