hyung-hwan/qse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
ase/awk/Awk.cpp
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>
@ -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)
{
}

5
ase/awk/Awk.hpp
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_
@ -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;