touched up awk for OS2

This commit is contained in:
2011-04-18 09:28:22 +00:00
parent 212a71460f
commit ea724c784c
16 changed files with 1605 additions and 330 deletions

View File

@ -21,18 +21,13 @@
#include <qse/awk/std.h>
#include <qse/cmn/stdio.h>
/* this sample produces 8 text files containing multiplication char */
/* this sample produces 8 text files containing multiplication chart. */
const qse_char_t* src = QSE_T(
"BEGIN {"
" printf \"\"; # work around the empty OFILENAME when printed\n"
" # for the first time in the loop below\n"
" # this happens because the console file is opened\n"
" # and OFILENAME is set when the first console output\n"
" # operation is peformed\n"
" for (i=2;i<=9;i++)"
" {"
" print \"OFILENAME:\" OFILENAME;"
" print \"OFILENAME:\" OFILENAME;"
" for (j=1;j<=9;j++)"
" print i \"*\" j \"=\" i * j;"
" nextofile;"