less invasive error handling

2016-10-19 22:44:59 -05:00
parent 8a6de8b157
commit d082af605d
44 changed files with 4258 additions and 5045 deletions
--- a/C/scanner.c
+++ b/C/scanner.c
@@ -1192,8 +1192,7 @@ Term Yap_scan_num(StreamDesc *inp) {
      ef->TokNext = NULL;
      LOCAL_tokptr = tokptr;
      LOCAL_toktide = e;
-      LOCAL_ErrorMessage = NULL;
-      LOCAL_Error_Term = Yap_syntax_error(e, inp - GLOBAL_Stream);
+      LOCAL_ErrorMessage = Yap_syntax_error(e, inp - GLOBAL_Stream);
      LOCAL_Error_TYPE = SYNTAX_ERROR;
    }
  }