diff options
| author | Paul Buetow <paul@buetow.org> | 2008-10-20 18:36:28 +0000 |
|---|---|---|
| committer | Paul Buetow <paul@buetow.org> | 2008-10-20 18:36:28 +0000 |
| commit | 1956010ec79fbab604efc2b60d0af325e91f67b8 (patch) | |
| tree | 81b68e7ed20368d482fdbfe0e65a884958410543 /src/core/function.c | |
| parent | 3d7b35bb37c066489546751e100c2c2b823ccba3 (diff) | |
Improved GC debugging.
Debugging printings now labeled with DEBUG::$NAME::$ETC::..:
Diffstat (limited to 'src/core/function.c')
| -rw-r--r-- | src/core/function.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/core/function.c b/src/core/function.c index c25834d..4d25a60 100644 --- a/src/core/function.c +++ b/src/core/function.c @@ -62,9 +62,9 @@ _process(Interpret *p_interpret, Token *p_token_store, Token *p_token_op, #ifdef DEBUG_FUNCTION_PROCESS if (p_token_op2 == NULL) - printf("PROCESS OPERATOR %s\n", tt_get_name(tt_op)); + printf("DEBUG::FUNCTION::PROCESS: Operator %s\n", tt_get_name(tt_op)); else - printf("PROCESS OPERATOR %s %s\n", tt_get_name(tt_op), + printf("DEBUG::FUNCTION::PROCESS: Operator %s %s\n", tt_get_name(tt_op), tt_get_name(tt_op2)); token_print(p_token_next); @@ -161,7 +161,7 @@ _process(Interpret *p_interpret, Token *p_token_store, Token *p_token_op, TokenType tt_highest = convert_to_highest(p_token_store, p_token_next); #ifdef DEBUG_FUNCTION_PROCESS - printf("===> %s %s %s\n", + printf("DEBUG::FUNCTION::PROCESS: ===> %s %s %s\n", tt_get_name(tt_highest), tt_get_name(tt_op), tt_get_name(tt_highest)); @@ -643,7 +643,6 @@ function_process_buildin(Interpret *p_interpret, Token *p_token_ident, } else if (strcmp("gc", token_get_val(p_token_ident)) == 0) { int i_count = garbage_collect(); - printf("ICOUNT %d\n", i_count); Token *p_token = token_new_integer(i_count); stack_push(p_stack_args, p_token); @@ -815,7 +814,7 @@ function_process_buildin(Interpret *p_interpret, Token *p_token_ident, break; NO_DEFAULT; } - + } else if (strcmp("refs", token_get_val(p_token_ident)) == 0) { if (0 == stack_size(p_stack_args)) _FUNCTION_ERROR("No argument given", p_token_ident); |