From 8df5e66f4f8a88b43987df6b0f2d5d99eeccd499 Mon Sep 17 00:00:00 2001
From: hyung-hwan <hyunghwan.chung@gmail.com>
Date: Sun, 18 Feb 2007 11:21:34 +0000
Subject: [PATCH] *** empty log message ***

---
 ase/awk/parse.c    | 5 +++--
 ase/test/awk/awk.c | 4 ++--
 2 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/ase/awk/parse.c b/ase/awk/parse.c
index 5e63ecd1..65bbf69d 100644
--- a/ase/awk/parse.c
+++ b/ase/awk/parse.c
@@ -1,5 +1,5 @@
 /*
- * $Id: parse.c,v 1.242 2007-02-18 11:12:18 bacon Exp $
+ * $Id: parse.c,v 1.243 2007-02-18 11:21:34 bacon Exp $
  *
  * {License}
  */
@@ -4203,7 +4203,8 @@ static int __get_token (ase_awk_t* awk)
 		if (__get_char (awk) == -1) return -1;
 		c = awk->src.lex.curc;
 
-		if (ASE_AWK_ISDIGIT (awk, c))
+		if ((awk->option & ASE_AWK_EXPLICIT) == 0 && 
+		    ASE_AWK_ISDIGIT (awk, c))
 		{
 			awk->src.lex.curc = ASE_T('.');
 			if (__unget_char (awk, c) == -1) return -1;
diff --git a/ase/test/awk/awk.c b/ase/test/awk/awk.c
index afde2c90..069d4a48 100644
--- a/ase/test/awk/awk.c
+++ b/ase/test/awk/awk.c
@@ -1,5 +1,5 @@
 /*
- * $Id: awk.c,v 1.165 2007-02-11 14:08:08 bacon Exp $
+ * $Id: awk.c,v 1.166 2007-02-18 11:21:19 bacon Exp $
  */
 
 #include <ase/awk/awk.h>
@@ -796,7 +796,7 @@ static int awk_main (int argc, ase_char_t* argv[])
 	ase_awk_runarg_t runarg[128];
 	int deparse = 0;
 
-	opt = ASE_AWK_IMPLICIT | 
+	opt = ASE_AWK_IMPLICIT |
 	      ASE_AWK_EXPLICIT | 
 	      ASE_AWK_UNIQUEFN | 
 	      ASE_AWK_IDIV |