diff options
-rw-r--r-- | mixlib/mix_eval.c | 8 | ||||
-rw-r--r-- | mixlib/mix_eval.h | 5 |
2 files changed, 11 insertions, 2 deletions
diff --git a/mixlib/mix_eval.c b/mixlib/mix_eval.c index 023a413..0aadd6b 100644 --- a/mixlib/mix_eval.c +++ b/mixlib/mix_eval.c @@ -1,7 +1,7 @@ /* -*-c-*- -------------- mix_eval.c : * Implementation of the functions declared in mix_eval.h * ------------------------------------------------------------------ - * Last change: Time-stamp: "00/12/08 13:16:10 jose" + * Last change: Time-stamp: "00/12/09 00:35:35 jose" * ------------------------------------------------------------------ * Copyright (C) 2000 jose antonio ortega ruiz <jaortega@acm.org> * @@ -161,6 +161,12 @@ mix_eval_use_symbol_table (mix_eval_t *eval, eval->towner = FALSE; } +const mix_symbol_table_t * +mix_eval_symbol_table (const mix_eval_t *eval) +{ + g_return_val_if_fail (eval != NULL, NULL); + return eval->table; +} gboolean mix_eval_set_symbols_from_table (mix_eval_t *eval, diff --git a/mixlib/mix_eval.h b/mixlib/mix_eval.h index 139d0b3..3ecfabb 100644 --- a/mixlib/mix_eval.h +++ b/mixlib/mix_eval.h @@ -1,7 +1,7 @@ /* -*-c-*- ---------------- mix_eval.h : * mix_eval_t is an evaluator of MIX W-expressions * ------------------------------------------------------------------ - * Last change: Time-stamp: <00/12/08 13:16:10 jose> + * Last change: Time-stamp: <00/12/09 00:34:29 jose> * ------------------------------------------------------------------ * Copyright (C) 2000 jose antonio ortega ruiz <jaortega@acm.org> * @@ -59,6 +59,9 @@ extern void mix_eval_use_symbol_table (mix_eval_t *eval, mix_symbol_table_t *table); +extern const mix_symbol_table_t * +mix_eval_symbol_table (const mix_eval_t *eval); + /* eval an expression providing a value for loc counter */ extern mix_eval_result_t mix_eval_expression_with_loc (mix_eval_t *eval, const gchar *expr, |