From 65b27001d7683abcff839d90b8c6187c4256e135 Mon Sep 17 00:00:00 2001 From: jaortega Date: Fri, 8 Dec 2000 23:43:37 +0000 Subject: (mix_eval_symbol_table) new function --- mixlib/mix_eval.c | 8 +++++++- 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 * @@ -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 * @@ -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, -- cgit v1.2.3