From 3542cd5990c5273c803a135daaf081e73d749b56 Mon Sep 17 00:00:00 2001 From: vsc Date: Tue, 28 May 2002 17:12:58 +0000 Subject: [PATCH] don't use YP_ in error.c git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@501 b08c6af1-5177-4d33-ba66-4b1c6b8b522a --- C/errors.c | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/C/errors.c b/C/errors.c index 554fd2c15..1496c8b69 100644 --- a/C/errors.c +++ b/C/errors.c @@ -113,7 +113,7 @@ DumpActiveGoals (void) if (pe->KindOfPE && hidden (NameOfFunctor (f))) goto next; if (first++ == 1) - YP_fprintf(YP_stderr,"Active ancestors:\n"); + fprintf(stderr,"Active ancestors:\n"); if (pe->ModuleOfPred) mod = IntOfTerm(pe->ModuleOfPred); plwrite (ModuleName[mod], DebugPutc, 0); DebugPutc (c_output_stream,':'); @@ -131,7 +131,7 @@ DumpActiveGoals (void) ep = (CELL *) ep[E_E]; } first = 1; - YP_fprintf(YP_stderr,"Active Choice-Points:\n"); + fprintf(stderr,"Active Choice-Points:\n"); while (TRUE) { PredEntry *pe; @@ -352,7 +352,7 @@ Error (yap_error_number type, Term where, char *format,...) tmpbuf[0] = '\0'; } va_end (ap); - YP_fprintf(YP_stderr,"[ Fatal YAP Error: %s exiting.... ]\n",tmpbuf); + fprintf(stderr,"[ Fatal YAP Error: %s exiting.... ]\n",tmpbuf); exit_yap (1); } if (P == (yamop *)(FAILCODE)) @@ -400,15 +400,15 @@ Error (yap_error_number type, Term where, char *format,...) switch (type) { case INTERNAL_ERROR: { - YP_fprintf(YP_stderr,"[ Internal YAP Error: %s exiting.... ]\n",tmpbuf); + fprintf(stderr,"[ Internal YAP Error: %s exiting.... ]\n",tmpbuf); serious = TRUE; detect_bug_location(tmpbuf, YAP_BUF_SIZE); - YP_fprintf(YP_stderr,"[ Bug found while executing %s ]\n",tmpbuf); + fprintf(stderr,"[ Bug found while executing %s ]\n",tmpbuf); exit_yap (1); } case FATAL_ERROR: { - YP_fprintf(YP_stderr,"[ Fatal YAP Error: %s exiting.... ]\n",tmpbuf); + fprintf(stderr,"[ Fatal YAP Error: %s exiting.... ]\n",tmpbuf); exit_yap (1); } case PURE_ABORT: