From 6dbc57d60591a1349047793102d1c76b2be2b055 Mon Sep 17 00:00:00 2001
From: hyung-hwan <hyunghwan.chung@gmail.com>
Date: Sun, 13 May 2007 02:05:00 +0000
Subject: [PATCH] Recovered from cvs revision 2007-05-12 13:30:00

---
 ase/awk/Awk.cpp | 16 ++++++++++++++--
 ase/awk/Awk.hpp |  5 ++++-
 2 files changed, 18 insertions(+), 3 deletions(-)

diff --git a/ase/awk/Awk.cpp b/ase/awk/Awk.cpp
index 9d385068..76d952e1 100644
--- a/ase/awk/Awk.cpp
+++ b/ase/awk/Awk.cpp
@@ -1,5 +1,5 @@
 /*
- * $Id: Awk.cpp,v 1.21 2007/05/11 16:40:20 bacon Exp $
+ * $Id: Awk.cpp,v 1.22 2007/05/12 03:53:32 bacon Exp $
  */
 
 #include <ase/awk/Awk.hpp>
@@ -101,7 +101,7 @@ namespace ASE
 
 	int Awk::Argument::init (ase_awk_run_t* run, ase_awk_val_t* v)
 	{
-		/* this method is used internally.
+		/* this method is used internally only
 		 * and should never be called more than once */
 		ASE_ASSERT (this->run == ASE_NULL && this->val == ASE_NULL);
 		ASE_ASSERT (run != ASE_NULL && v != ASE_NULL);
@@ -185,6 +185,18 @@ namespace ASE
 		}
 	}
 
+	ase_awk_run_t* Awk::Argument::getRun () const
+	{
+		ASE_ASSERT (this->run != ASE_NULL);
+		return this->run;
+	}
+
+	ase_awk_t* Awk::Argument::getAwk () const
+	{
+		ASE_ASSERT (this->run != ASE_NULL);
+		return ase_awk_getrunawk (this->run);
+	}
+
 	Awk::Return::Return (ase_awk_run_t* run): run (run), type (ASE_AWK_VAL_NIL)
 	{
 	}
diff --git a/ase/awk/Awk.hpp b/ase/awk/Awk.hpp
index b6153788..1ec7e41f 100644
--- a/ase/awk/Awk.hpp
+++ b/ase/awk/Awk.hpp
@@ -1,5 +1,5 @@
 /*
- * $Id: Awk.hpp,v 1.21 2007/05/11 17:21:01 bacon Exp $
+ * $Id: Awk.hpp,v 1.22 2007/05/12 03:53:32 bacon Exp $
  */
 
 #ifndef _ASE_AWK_AWK_HPP_
@@ -129,6 +129,9 @@ namespace ASE
 			real_t toReal () const;
 			const char_t* toStr (size_t* len) const;
 
+			ase_awk_run_t* getRun () const;
+			ase_awk_t* getAwk () const;
+
 		protected:
 			ase_awk_run_t* run;
 			ase_awk_val_t* val;