This commit is contained in:
@ -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>
|
||||
|
||||
|
@ -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"
|
||||
|
@ -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>
|
||||
|
@ -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;
|
||||
}
|
||||
|
@ -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,
|
||||
|
@ -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;
|
||||
}
|
||||
|
||||
|
Reference in New Issue
Block a user