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-04 12:59:01 +00:00
parent 0e8c44fc3d
commit 9847a900fb
9 changed files with 98 additions and 37 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1,5 +1,5 @@
/*
* $Id: awk.c,v 1.134 2006-12-04 06:04:07 bacon Exp $
* $Id: awk.c,v 1.135 2006-12-04 12:59:00 bacon Exp $
*/
#include <ase/awk/awk.h>
@ -730,12 +730,6 @@ static void __awk_free (void* ptr, void* custom_data)
#define __awk_tolower towlower
#endif
static int __handle_bfn (ase_awk_run_t* run, const ase_char_t* fnm, ase_size_t fnl)
{
xp_printf (ASE_T("__handle_bfn\n"));
return 0;
}
static int __main (int argc, ase_char_t* argv[])
{
ase_awk_t* awk;
@ -851,12 +845,10 @@ static int __main (int argc, ase_char_t* argv[])
srcios.custom_data = &src_io;
ase_awk_addbfn (awk, ASE_T("bufa"), 4, 0,
1, 1, ASE_NULL, __handle_bfn);
ase_awk_setmaxparsedepth (
awk, ASE_AWK_DEPTH_BLOCK | ASE_AWK_DEPTH_EXPR, 20);
ase_awk_setmaxrundepth (
awk, ASE_AWK_DEPTH_BLOCK | ASE_AWK_DEPTH_EXPR, 50);
if (ase_awk_parse (awk, &srcios) == -1)
{

4
ase/test/awk/cou-022.awk
View File

@ -1,5 +1,5 @@
BEGIN { FS = "\t"; OFS = "\t"; }
#BEGIN { FS = OFS = "\t"; }
#BEGIN { FS = "\t"; OFS = "\t"; }
BEGIN { FS = OFS = "\t"; }
$4 == "North America" { $4 = "NA"; }
$4 == "South America" { $4 = "SA"; }
{ print; }