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

fixed a few bugs in awk

Browse Source 
- improved input console file and ARGV handling.
- fixed bugs in the builtin rand() function.
- added a new option to rex.
- fixed a control flow handling bug in for(x in y) of awk.
This commit is contained in:
hyung-hwan
2009-06-11 07:18:25 +00:00
parent a326e5f17f
commit fd1c529c46
20 changed files with 295 additions and 284 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
qse/test/awk/awk01.c
View File

@ -1,5 +1,5 @@
/*
* $Id: awk01.c 182 2009-06-03 21:50:32Z hyunghwan.chung $
* $Id: awk01.c 195 2009-06-10 13:18:25Z hyunghwan.chung $
*
Copyright 2006-2009 Chung, Hyung-Hwan.
@ -57,9 +57,11 @@ int main ()
}
rtx = qse_awk_rtx_openstd (
awk, 0,
QSE_NULL, /* no console input */
QSE_AWK_RTX_OPENSTD_STDIO /* stdout for console output */
awk,
0,
QSE_T("awk01"),
QSE_NULL, /* stdin */
QSE_NULL /* stdout */
);
if (rtx == QSE_NULL)
{

10
qse/test/awk/awk02.c
View File

@ -1,5 +1,5 @@
/*
* $Id: awk02.c 182 2009-06-03 21:50:32Z hyunghwan.chung $
* $Id: awk02.c 195 2009-06-10 13:18:25Z hyunghwan.chung $
*
Copyright 2006-2009 Chung, Hyung-Hwan.
@ -72,9 +72,11 @@ int main ()
qse_fflush (QSE_STDOUT);
rtx = qse_awk_rtx_openstd (
awk, 0,
QSE_NULL, /* no console input */
QSE_AWK_RTX_OPENSTD_STDIO /* stdout for console output */
awk,
0,
QSE_T("awk02"),
QSE_NULL, /* stdin */
QSE_NULL /* stdout */
);
if (rtx == QSE_NULL)
{

10
qse/test/awk/awk03.c
View File

@ -1,5 +1,5 @@
/*
* $Id: awk03.c 182 2009-06-03 21:50:32Z hyunghwan.chung $
* $Id: awk03.c 195 2009-06-10 13:18:25Z hyunghwan.chung $
*
Copyright 2006-2009 Chung, Hyung-Hwan.
@ -69,9 +69,11 @@ int main ()
/* create a runtime context */
rtx = qse_awk_rtx_openstd (
awk, 0,
QSE_NULL, /* no console input */
QSE_AWK_RTX_OPENSTD_STDIO /* stdout for console output */
awk,
0,
QSE_T("awk03"),
QSE_NULL, /* stdin */
QSE_NULL /* stdout */
);
if (rtx == QSE_NULL)
{

10
qse/test/awk/awk04.c
View File

@ -1,5 +1,5 @@
/*
* $Id: awk04.c 182 2009-06-03 21:50:32Z hyunghwan.chung $
* $Id: awk04.c 195 2009-06-10 13:18:25Z hyunghwan.chung $
*
Copyright 2006-2009 Chung, Hyung-Hwan.
@ -67,9 +67,11 @@ int main ()
/* create a runtime context */
rtx = qse_awk_rtx_openstd (
awk, 0,
QSE_NULL, /* no console input */
QSE_AWK_RTX_OPENSTD_STDIO /* stdout for console output */
awk,
0,
QSE_T("awk04"),
QSE_NULL, /* stdin */
QSE_NULL /* stdout */
);
if (rtx == QSE_NULL)
{