From e194e841885b83da5cf1df123da7c414acc493ee Mon Sep 17 00:00:00 2001 From: Not Zed Date: Thu, 4 Mar 2004 04:12:21 +0000 Subject: Added some debug stuff. 2004-03-04 Not Zed * e-sexp.c: Added some debug stuff. svn path=/trunk/; revision=24956 --- e-util/ChangeLog | 4 ++++ e-util/e-sexp.c | 6 ++++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/e-util/ChangeLog b/e-util/ChangeLog index 14b70291b7..ec28f9bb8c 100644 --- a/e-util/ChangeLog +++ b/e-util/ChangeLog @@ -1,3 +1,7 @@ +2004-03-04 Not Zed + + * e-sexp.c: Added some debug stuff. + 2004-02-27 Not Zed ** See Bug #37329. diff --git a/e-util/e-sexp.c b/e-util/e-sexp.c index a7619c59f2..724859f388 100644 --- a/e-util/e-sexp.c +++ b/e-util/e-sexp.c @@ -903,7 +903,7 @@ parse_value(ESExp *f) p(printf("got brace, its a list!\n")); return parse_list(f, TRUE); case G_TOKEN_STRING: - p(printf("got string\n")); + p(printf("got string '%s'\n", g_scanner_cur_value(gs).v_string)); t = parse_term_new(f, ESEXP_TERM_STRING); t->value.string = g_strdup(g_scanner_cur_value(gs).v_string); break; @@ -922,7 +922,7 @@ parse_value(ESExp *f) t->value.number = g_scanner_cur_value(gs).v_int; if (negative) t->value.number = -t->value.number; - p(printf("got int\n")); + p(printf("got int %d\n", t->value.number)); break; case '#': { char *str; @@ -947,6 +947,7 @@ parse_value(ESExp *f) break; } case G_TOKEN_SYMBOL: s = g_scanner_cur_value(gs).v_symbol; + p(printf("got symbol '%s'\n", s->name)); switch (s->type) { case ESEXP_TERM_FUNC: case ESEXP_TERM_IFUNC: @@ -965,6 +966,7 @@ parse_value(ESExp *f) } break; case G_TOKEN_IDENTIFIER: + p(printf("got unknown identifider '%s'\n", g_scanner_cur_value(gs).v_identifier)); e_sexp_fatal_error(f, "Unknown identifier: %s", g_scanner_cur_value(gs).v_identifier); break; default: -- cgit v1.2.3