diff --git a/ase/awk/parse.c b/ase/awk/parse.c index 831fae3a..dcff28c4 100644 --- a/ase/awk/parse.c +++ b/ase/awk/parse.c @@ -1,5 +1,5 @@ /* - * $Id: parse.c,v 1.155 2006-08-03 15:49:37 bacon Exp $ + * $Id: parse.c,v 1.156 2006-08-04 06:39:05 bacon Exp $ */ #include @@ -2267,7 +2267,7 @@ static xp_awk_nde_t* __parse_primary_ident (xp_awk_t* awk) return XP_NULL; } - /* what if name_dup is a built-in function name */ + /* check if name_dup is a built-in function name */ bfn = xp_awk_getbfn (awk, name_dup); if (bfn != XP_NULL) { diff --git a/ase/test/awk/t2.awk b/ase/test/awk/t2.awk index b71ebc17..9a74d34c 100644 --- a/ase/test/awk/t2.awk +++ b/ase/test/awk/t2.awk @@ -15,12 +15,10 @@ function sum (i) return y; } -BEGIN -{ +END { /*x = sum (10000000); */ x = sum (100); s = x; ss = z; } - diff --git a/ase/test/awk/t3.awk b/ase/test/awk/t3.awk index 39f27056..90fc8387 100644 --- a/ase/test/awk/t3.awk +++ b/ase/test/awk/t3.awk @@ -6,8 +6,7 @@ func func1 (x) x["abc"] = 123; } -BEGIN -{ +BEGIN { idx="abc"; x[idx] = 12345; i = x[idx]; diff --git a/ase/test/awk/t5.awk b/ase/test/awk/t5.awk index 33c11594..120ca533 100644 --- a/ase/test/awk/t5.awk +++ b/ase/test/awk/t5.awk @@ -1,5 +1,4 @@ -BEGIN -{ +BEGIN { x[1] = 20; x[2] = 40; x[3] = 50; diff --git a/ase/test/awk/t6.awk b/ase/test/awk/t6.awk index 7f234684..6c9e2c55 100644 --- a/ase/test/awk/t6.awk +++ b/ase/test/awk/t6.awk @@ -1,5 +1,4 @@ -BEGIN -{ +BEGIN { j = -20; for (i = -10; i < 10; i++) @@ -16,8 +15,7 @@ BEGIN } } -END -{ +END { print "i = ", i; print "j = ", j; }