diff --git a/src/oberon-common.c b/src/oberon-common.c
index f1b67112f251d8a0e368aa52d1e78ed16d3c90ef..01f2c9e5aab0ab553f2c527349c5731d4802daa4 100644 (file)
--- a/src/oberon-common.c
+++ b/src/oberon-common.c
{
va_list ptr;
va_start(ptr, fmt);
- fprintf(stderr, "error: ");
- vfprintf(stderr, fmt, ptr);
- fprintf(stderr, "\n");
- fprintf(stderr, " code_index = %i\n", ctx -> code_index);
- fprintf(stderr, " c = %c\n", ctx -> c);
- fprintf(stderr, " token = %i\n", ctx -> token);
+ printf("error: ");
+ vprintf(fmt, ptr);
+ printf("\n");
+ printf(" code_index = %i\n", ctx -> code_index);
+ printf(" c = %c\n", ctx -> c);
+ printf(" token = %i\n", ctx -> token);
va_end(ptr);
exit(1);
}