This commit is contained in:
2008-07-10 07:20:08 +00:00
parent b18be770ce
commit 75d4e90399
10 changed files with 204 additions and 233 deletions

View File

@ -1,12 +1,11 @@
/*
* $Id: Awk.cpp 232 2008-06-28 09:38:00Z baconevi $
* $Id: Awk.cpp 237 2008-07-09 13:20:08Z baconevi $
*
* {License}
*/
#include <ase/awk/Awk.hpp>
#include <ase/awk/val.h>
#include <ase/cmn/str.h>
#include <ase/cmn/mem.h>

View File

@ -1,5 +1,5 @@
/*
* $Id: awk_i.h 232 2008-06-28 09:38:00Z baconevi $
* $Id: awk_i.h 237 2008-07-09 13:20:08Z baconevi $
*
* {License}
*/
@ -16,7 +16,6 @@ typedef struct ase_awk_chain_t ase_awk_chain_t;
typedef struct ase_awk_tree_t ase_awk_tree_t;
#include <ase/awk/awk.h>
#include <ase/awk/val.h>
#include "tree.h"
#include "func.h"
#include "tab.h"

View File

@ -1,5 +1,5 @@
/*
* $Id: jni.c 232 2008-06-28 09:38:00Z baconevi $
* $Id: jni.c 237 2008-07-09 13:20:08Z baconevi $
*
* {License}
*/
@ -15,7 +15,6 @@
#include <time.h>
#include <ase/awk/jni.h>
#include <ase/awk/awk.h>
#include <ase/awk/val.h>
#include <ase/cmn/mem.h>
#include <ase/utl/stdio.h>

View File

@ -1,5 +1,5 @@
/*
* $Id: run.c 197 2008-06-09 06:24:10Z baconevi $
* $Id: run.c 237 2008-07-09 13:20:08Z baconevi $
*
* {License}
*/
@ -4172,7 +4172,7 @@ static int __cmp_val (
static cmp_val_t func[] =
{
/* this table must be synchronized with
* the ASE_AWK_VAL_XXX values in val.h */
* the ASE_AWK_VAL_XXX values in awk.h */
__cmp_nil_nil, __cmp_nil_int, __cmp_nil_real, __cmp_nil_str,
__cmp_int_nil, __cmp_int_int, __cmp_int_real, __cmp_int_str,
__cmp_real_nil, __cmp_real_int, __cmp_real_real, __cmp_real_str,
@ -5936,7 +5936,7 @@ static ase_awk_val_t* eval_int (ase_awk_run_t* run, ase_awk_nde_t* nde)
run->errlin = nde->line;
return ASE_NULL;
}
((ase_awk_val_int_t*)val)->nde = (ase_awk_nde_int_t*)nde;
((ase_awk_val_int_t*)val)->nde = nde;
return val;
}
@ -5951,7 +5951,7 @@ static ase_awk_val_t* eval_real (ase_awk_run_t* run, ase_awk_nde_t* nde)
run->errlin = nde->line;
return ASE_NULL;
}
((ase_awk_val_real_t*)val)->nde = (ase_awk_nde_real_t*)nde;
((ase_awk_val_real_t*)val)->nde = nde;
return val;
}

View File

@ -1,5 +1,5 @@
/*
* $Id: tree.h 115 2008-03-03 11:13:15Z baconevi $
* $Id: tree.h 237 2008-07-09 13:20:08Z baconevi $
*
* {License}
*/
@ -53,7 +53,7 @@ enum ase_awk_nde_type_t
/* keep this order for the following items otherwise, you may have
* to change eval_incpre and eval_incpst in run.c as well as
* ASE_AWK_VAL_REF_XXX in val.h */
* ASE_AWK_VAL_REF_XXX in awk.h */
ASE_AWK_NDE_NAMED,
ASE_AWK_NDE_GLOBAL,
ASE_AWK_NDE_LOCAL,

View File

@ -1,5 +1,5 @@
/*
* $Id: val.c 197 2008-06-09 06:24:10Z baconevi $
* $Id: val.c 237 2008-07-09 13:20:08Z baconevi $
*
* {License}
*/
@ -580,7 +580,7 @@ void ase_awk_freeval (ase_awk_run_t* run, ase_awk_val_t* val, ase_bool_t cache)
{
ASE_ASSERTX (
!"should never happen - invalid value type",
"the type of a value should be one of ASE_AWK_VAL_XXX's defined in val.h");
"the type of a value should be one of ASE_AWK_VAL_XXX's defined in awk.h");
}
}
@ -660,7 +660,7 @@ ase_bool_t ase_awk_valtobool (ase_awk_run_t* run, ase_awk_val_t* val)
ASE_ASSERTX (
!"should never happen - invalid value type",
"the type of a value should be one of ASE_AWK_VAL_XXX's defined in val.h");
"the type of a value should be one of ASE_AWK_VAL_XXX's defined in awk.h");
return ASE_FALSE;
}