*** empty log message ***

ase/awk/run.c

@@ -1,5 +1,5 @@
 /*
- * $Id: run.c,v 1.201 2006-09-12 15:20:18 bacon Exp $
+ * $Id: run.c,v 1.202 2006-09-12 15:21:32 bacon Exp $
  */
 
 #include <xp/awk/awk_i.h>

ase/test/awk/t17.awk

@@ -1,9 +1,18 @@
-/hello[[:space:]]/ 
+/hello[[:space:]]/ { 
-{ 
 	print $0; 
-	//getline a;
+	print "INTERNAL LOOP NF=" NF;
-	//print a;
+	for (i = 0; i < NF; i++)
+	{
+		print "[" $(i+1) "]";
+	}
+	#getline a;
+	#print a;
 
 	if (getline > 0) print $0;
+	print "GETLINE NF=" NF;
+	for (i = 0; i < NF; i++)
+	{
+		print "[" $(i+1) "]";
+	}
 	print "----------------";
 }

ase/test/awk/t43.awk

@@ -0,0 +1,2 @@
+#BEGIN { t = "abc"; gsub ("abc", "[&]", t); print t; }
+{ gsub ("abc", "ABC"); print $0; }