summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--mixlib/mix_eval.c8
-rw-r--r--mixlib/mix_eval.h5
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,