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

- added Awk::setGlobal & Awk::getGlobal

Browse Source 
- fixed a bug in parsing getline
This commit is contained in:
hyung-hwan
2009-07-15 02:06:14 +00:00
parent af6831ed3c
commit f5e3e53290
15 changed files with 546 additions and 545 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
qse/regress/awk/lang-032.awk Normal file
View File

@ -0,0 +1,14 @@
BEGIN {
a=91
print a ++10; # print 9110
print a ++10; # print 9210
print (a) ++10; # print 9310
print ((a)) ++10; # print 9410
print ((a)++) 10; # print 9510
print "---------------------"
a=91
print (++(a)) 10; # print 9210
}

4
qse/regress/awk/lang-033.awk Normal file
View File

@ -0,0 +1,4 @@
BEGIN {
while ("cat lang-033.awk" | getline x > 0)
print x
}

40
qse/regress/awk/regress.out
View File

@ -1352,7 +1352,7 @@ BEGIN {
printf ("%s\n",10.34);
}
ERROR: CODE [110] LINE [3] recursion detected in format conversion
ERROR: CODE [111] LINE [3] recursion detected in format conversion
--------------------------------------------------------------------------------
../../cmd/awk/qseawk --newline=on -o- -f lang-014.awk </dev/stdin 2>&1
--------------------------------------------------------------------------------
@ -1520,7 +1520,7 @@ BEGIN {
delete iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiix;
}
ERROR: CODE [84] LINE [3] variable 'iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiix' not deletable
ERROR: CODE [85] LINE [3] variable 'iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiix' not deletable
--------------------------------------------------------------------------------
../../cmd/awk/qseawk --newline=on -o- -f lang-026.awk </dev/stdin 2>&1
--------------------------------------------------------------------------------
@ -1532,7 +1532,7 @@ BEGIN {
}
abc
ERROR: CODE [92] LINE [4] map 'abc' not assignable with a scalar
ERROR: CODE [93] LINE [4] map 'abc' not assignable with a scalar
--------------------------------------------------------------------------------
../../cmd/awk/qseawk --newline=on -o- -f lang-027.awk </dev/stdin 2>&1
--------------------------------------------------------------------------------
@ -1632,6 +1632,40 @@ BEGIN {
0 -1
--------------------------
--------------------------------------------------------------------------------
../../cmd/awk/qseawk --newline=on -o- -f lang-032.awk </dev/stdin 2>&1
--------------------------------------------------------------------------------
BEGIN {
a = 91;
print ((a)++ 10);
print ((a)++ 10);
print ((a)++ 10);
print ((a)++ 10);
print ((a)++ 10);
print "---------------------";
a = 91;
print (++(a) 10);
}
9110
9210
9310
9410
9510
---------------------
9210
--------------------------------------------------------------------------------
../../cmd/awk/qseawk --newline=on -o- -f lang-033.awk </dev/stdin 2>&1
--------------------------------------------------------------------------------
BEGIN {
while ((("cat lang-033.awk" | getline x) > 0))
print x;
}
BEGIN {
while ("cat lang-033.awk" | getline x > 0)
print x
}
--------------------------------------------------------------------------------
../../cmd/awk/qseawk -f quicksort.awk quicksort.dat </dev/stdin 2>&1
--------------------------------------------------------------------------------
0.0000000000

2
qse/regress/awk/regress.sh
View File

@ -134,6 +134,8 @@ PROGS="
lang-029.awk///--explicit=on --newline=on -o-
lang-030.awk///--newline=on -o-
lang-031.awk///--newline=on -o-
lang-032.awk///--newline=on -o-
lang-033.awk///--newline=on -o-
quicksort.awk/quicksort.dat//
quicksort2.awk/quicksort2.dat//