Recovered from cvs revision 2007-05-12 13:30:00

This commit is contained in:
hyung-hwan 2007-05-13 02:05:00 +00:00
parent 4f272ec778
commit 6dbc57d605
2 changed files with 18 additions and 3 deletions

View File

@ -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> #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) 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 */ * and should never be called more than once */
ASE_ASSERT (this->run == ASE_NULL && this->val == ASE_NULL); ASE_ASSERT (this->run == ASE_NULL && this->val == ASE_NULL);
ASE_ASSERT (run != ASE_NULL && v != 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) Awk::Return::Return (ase_awk_run_t* run): run (run), type (ASE_AWK_VAL_NIL)
{ {
} }

View File

@ -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_ #ifndef _ASE_AWK_AWK_HPP_
@ -129,6 +129,9 @@ namespace ASE
real_t toReal () const; real_t toReal () const;
const char_t* toStr (size_t* len) const; const char_t* toStr (size_t* len) const;
ase_awk_run_t* getRun () const;
ase_awk_t* getAwk () const;
protected: protected:
ase_awk_run_t* run; ase_awk_run_t* run;
ase_awk_val_t* val; ase_awk_val_t* val;