From 990332a24e7ea2fb9ec34a351e5b3811a4c846d0 Mon Sep 17 00:00:00 2001
From: hyung-hwan <hyunghwan.chung@gmail.com>
Date: Sat, 6 Oct 2007 00:11:00 +0000
Subject: [PATCH] Recovered from cvs revision 2007-10-05 15:11:00

---
 ase/net/Awk.hpp     | 46 ++++++++++++++++++++++++++++++++++-----------
 ase/test/net/Awk.cs |  4 ++--
 2 files changed, 37 insertions(+), 13 deletions(-)

diff --git a/ase/net/Awk.hpp b/ase/net/Awk.hpp
index e43e7d67..97c515a6 100644
--- a/ase/net/Awk.hpp
+++ b/ase/net/Awk.hpp
@@ -1,5 +1,5 @@
 /*
- * $Id: Awk.hpp,v 1.30 2007/10/04 04:48:27 bacon Exp $
+ * $Id: Awk.hpp,v 1.32 2007/10/04 14:26:21 bacon Exp $
  *
  * {License}
  */
@@ -54,7 +54,8 @@ namespace ASE
 					}
 				}
 
-				bool GetIndexedLong (System::String^ idx, [System::Runtime::InteropServices::Out] long_t% v)
+				bool GetIndexedLong (System::String^ idx, 
+					[System::Runtime::InteropServices::Out] long_t% v)
 				{
 					ASE::Awk::Argument x;
 					cli::pin_ptr<const char_t> ip = PtrToStringChars(idx);
@@ -63,7 +64,8 @@ namespace ASE
 					return true;
 				}
 
-				bool GetIndexedReal (System::String^ idx, [System::Runtime::InteropServices::Out] real_t% v) 
+				bool GetIndexedReal (System::String^ idx,
+					[System::Runtime::InteropServices::Out] real_t% v) 
 				{
 					ASE::Awk::Argument x;
 					cli::pin_ptr<const char_t> ip = PtrToStringChars(idx);
@@ -72,7 +74,8 @@ namespace ASE
 					return true;
 				}
 
-				bool GetIndexedString (System::String^ idx, [System::Runtime::InteropServices::Out] System::String^% v) 
+				bool GetIndexedString (System::String^ idx,
+					[System::Runtime::InteropServices::Out] System::String^% v) 
 				{
 					ASE::Awk::Argument x;
 					cli::pin_ptr<const char_t> ip = PtrToStringChars(idx);
@@ -250,14 +253,29 @@ namespace ASE
 				ASE::Awk::Return& ret;
 			};
 
-			ref class Run
+			ref class Context
 			{
 			public protected:
-				Run (ASE::Awk::Run& run): run (run)
+				Context (Awk^ owner, ASE::Awk::Run& run): owner (owner), run (run)
 				{
 				}
 
 			public:
+				property Awk^ Owner
+				{
+						Awk^ get () { return this->owner; }
+				}
+
+				bool Stop ()
+				{
+						return run.stop () == 0;
+				}
+
+				/* TODO:
+				 * GetError
+				 * SetError 
+				 */
+
 				bool SetGlobal (int id, System::String^ v)
 				{
 					cli::pin_ptr<const char_t> nptr = PtrToStringChars(v);
@@ -314,8 +332,7 @@ namespace ASE
 					return run.setGlobal (id, (real_t)(double)v) == 0;
 				}
 
-
-				/* TODO:...
+				/*
 				bool GetGlobal (int id, [System::Runtime::InteropServices::Out] Argument^ v)
 				{
 					return run.getGlobal (id, v->placeHolder) == 0;
@@ -323,6 +340,7 @@ namespace ASE
 				*/
 
 			protected:
+				Awk^ owner;
 				ASE::Awk::Run& run;
 			};
 
@@ -640,11 +658,17 @@ namespace ASE
 			/*event*/ RunReturnHandler^ OnRunReturn;
 			/*event*/ RunStatementHandler^ OnRunStatement;
 
-			virtual bool AddGlobal (System::String^ name, [System::Runtime::InteropServices::Out] int% id);
+			virtual bool AddGlobal (
+				System::String^ name, 
+				[System::Runtime::InteropServices::Out] int% id);
 			virtual bool DeleteGlobal (System::String^ name);
 
-			delegate bool FunctionHandler (System::String^ name, cli::array<Argument^>^ args, Return^ ret);
-			virtual bool AddFunction (System::String^ name, int minArgs, int maxArgs, FunctionHandler^ handler);
+			delegate bool FunctionHandler (
+				System::String^ name, cli::array<Argument^>^ args, Return^ ret);
+
+			virtual bool AddFunction (
+				System::String^ name, int minArgs, 
+				int maxArgs, FunctionHandler^ handler);
 			virtual bool DeleteFunction (System::String^ name);
 
 			virtual bool SetWord (System::String^ ow, System::String^ nw);
diff --git a/ase/test/net/Awk.cs b/ase/test/net/Awk.cs
index 94af8155..3fe956aa 100644
--- a/ase/test/net/Awk.cs
+++ b/ase/test/net/Awk.cs
@@ -35,11 +35,11 @@ namespace ase.net
 		public bool Run(
 			System.Windows.Forms.TextBox consoleInput,
 			System.Windows.Forms.TextBox consoleOutput,
-			System.String main, System.String[] args)
+			string main, string[] args) 
 		{
 			this.consoleInput = consoleInput;
 			this.consoleOutput = consoleOutput;
-			return base.Run(main, args);
+			return base.Run (main, args);
 		}
 
 		protected bool Sleep(string name, Argument[] args, Return ret)