*** empty log message ***

ase/test/awk/awk.c

@@ -1,5 +1,5 @@
 /*
- * $Id: awk.c,v 1.61 2006-08-02 14:36:23 bacon Exp $
+ * $Id: awk.c,v 1.62 2006-08-03 09:53:46 bacon Exp $
  */
 
 #include <xp/awk/awk.h>
@@ -522,7 +522,8 @@ static int __main (int argc, xp_char_t* argv[])
 
 	xp_awk_setparseopt (awk, 
 		XP_AWK_EXPLICIT | XP_AWK_UNIQUE | XP_AWK_DBLSLASHES |
-		XP_AWK_SHADING | XP_AWK_IMPLICIT | XP_AWK_SHIFT | XP_AWK_EXTIO);
+		XP_AWK_SHADING | XP_AWK_IMPLICIT | XP_AWK_SHIFT | 
+		XP_AWK_EXTIO | XP_AWK_BLOCKLESS);
 
 	if (argc == 2) 
 	{

ase/test/awk/t23.awk

@@ -0,0 +1,18 @@
+/*
+{
+	print "ALL ==> " $0;
+}
+
+/1/,/5/
+{
+
+	print "/1/,/5/ ==> " $0;
+}
+*/
+
+BEGIN { c["Europe"] = "XXX"; }
+
+/Europe/, /Africa/ { print $0;  }
+
+//(a = "20") { }
+/*"Europe" in c { print $0; }*/

ase/test/awk/t24.awk

@@ -0,0 +1,6 @@
+BEGIN {
+
+	a["abc\0\0xxx"] = "abcdefg";
+	print a["abc"];
+	print a["abc\0\0xxx"];
+}

ase/test/awk/t25.awk

@@ -0,0 +1,13 @@
+/Europe/, /Africa/ 
+
+  1
+  2
+  3 % 23
+
+/zab/ { print "XXXX"; }
+
+{
+	print /ABC/ ~ /DEF/;
+}
+
+/zzz/