diff options
Diffstat (limited to 'mixlib')
| -rw-r--r-- | mixlib/testsuite/mix_eval_t.c | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/mixlib/testsuite/mix_eval_t.c b/mixlib/testsuite/mix_eval_t.c index e9b53c8..7024fd4 100644 --- a/mixlib/testsuite/mix_eval_t.c +++ b/mixlib/testsuite/mix_eval_t.c @@ -1,7 +1,7 @@ /* -*-c-*- -------------- mix_eval_t.c : * Test of mix_eval_t * ------------------------------------------------------------------ - * Last change: Time-stamp: "00/12/02 23:18:39 jose" + * Last change: Time-stamp: "00/12/03 11:35:33 jose" * ------------------------------------------------------------------ * Copyright (C) 2000 jose antonio ortega ruiz <jaortega@acm.org> * @@ -81,8 +81,8 @@ main(int argc, char **argv) ok_case ("s1/10+s0", 166), err_case ("foo", MIX_EVAL_UNDEF_SYM), err_case ("11--2", MIX_EVAL_SYNTAX), - err_case ("foo*3", MIX_EVAL_UNDEF_SYM), - err_case ("32),1", MIX_EVAL_MIS_PAREN), + err_case ("s2*foo*3", MIX_EVAL_UNDEF_SYM), + err_case ("12/32),1", MIX_EVAL_MIS_PAREN), err_case ("2000(88)", MIX_EVAL_INV_FSPEC), ok_case (NULL, 0) }; @@ -105,6 +105,10 @@ main(int argc, char **argv) mix_word_print (mix_eval_value (eval), "... "); g_print ("\n"); g_assert (mix_eval_value (eval) == mix_word_new(cases[k].value)); + } else { + g_print ("\n------->%s, at pos %d\n", + mix_eval_last_error_string (eval), + mix_eval_last_error_pos (eval)); } } mix_eval_delete (eval); |