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

Browse Source
This commit is contained in:
hyung-hwan 2008-07-23 07:01:49 +00:00
parent 6e9876f9c2
commit aca2acab75
2 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ase/include/ase/awk/awk.h
View File

@ -1,5 +1,5 @@
/*
* $Id: awk.h 279 2008-07-21 05:27:34Z baconevi $
* $Id: awk.h 282 2008-07-22 13:01:49Z baconevi $
*
* {License}
*/
@ -157,6 +157,8 @@ enum ase_awk_option_t
/* allow variable shading */
/*ASE_AWK_SHADING = (1 << 3),*/
#endif
/* change ^ from exponentation to bitwise xor */
ASE_AWK_BXOR = (1 << 3),
/* support shift operators */
ASE_AWK_SHIFT = (1 << 4),

8
ase/lib/awk/parse.c
View File

@ -1,5 +1,5 @@
/*
* $Id: parse.c 271 2008-07-20 12:42:39Z baconevi $
* $Id: parse.c 282 2008-07-22 13:01:49Z baconevi $
*
* {License}
*/
@ -4785,13 +4785,15 @@ static int get_token (ase_awk_t* awk)
if (c == ASE_T('='))
{
SET_TOKEN_TYPE (awk, TOKEN_BXOR_ASSIGN);
SET_TOKEN_TYPE (awk, ((awk->option & ASE_AWK_BXOR)?
TOKEN_BXOR_ASSIGN: TOKEN_EXP_ASSIGN));
ADD_TOKEN_CHAR (awk, c);
GET_CHAR (awk);
}
else
{
SET_TOKEN_TYPE (awk, TOKEN_BXOR);
SET_TOKEN_TYPE (awk, ((awk->option & ASE_AWK_BXOR)?
TOKEN_BXOR: TOKEN_EXP));
}
}
else if (c == ASE_T('+'))