fix missing syntax errors regression :(

2016-02-19 11:34:48 +00:00
parent ad91eb0ec9
commit 083d374e02
2 changed files with 9 additions and 8 deletions
--- a/C/parser.c
+++ b/C/parser.c
@@ -1084,6 +1084,8 @@ Term Yap_Parse(UInt prio) {
 #endif
    Yap_CloseSlots(sls);
    if (LOCAL_tokptr != NULL && LOCAL_tokptr->Tok != Ord(eot_tok)) {
+      LOCAL_Error_TYPE = SYNTAX_ERROR;
+      LOCAL_ErrorMessage = "term does not end on . ";
      t = 0;
    }
    if (t != 0 && LOCAL_Error_TYPE == SYNTAX_ERROR) {