typos
This commit is contained in:
parent
5ec424645d
commit
ae426a3b27
@ -64,8 +64,6 @@ static void syntax_msg(const char *msg, ...) {
|
|||||||
if (!LOCAL_ErrorMessage) {
|
if (!LOCAL_ErrorMessage) {
|
||||||
LOCAL_ErrorMessage = malloc(MAX_ERROR_MSG_SIZE + 1);
|
LOCAL_ErrorMessage = malloc(MAX_ERROR_MSG_SIZE + 1);
|
||||||
}
|
}
|
||||||
LOCAL_ActiveError->parserLine = LOCAL_toktide->TokLine;
|
|
||||||
LOCAL_ActiveError->parserPos = LOCAL_toktide->TokPos;
|
|
||||||
va_start(ap, msg);
|
va_start(ap, msg);
|
||||||
vsnprintf(LOCAL_ErrorMessage, MAX_ERROR_MSG_SIZE, msg, ap);
|
vsnprintf(LOCAL_ErrorMessage, MAX_ERROR_MSG_SIZE, msg, ap);
|
||||||
va_end(ap);
|
va_end(ap);
|
||||||
|
@ -376,9 +376,9 @@ static Term syntax_error(TokEntry *errtok, int sno, Term cmod, Int newpos, bool
|
|||||||
Yap_MkErrorRecord(LOCAL_ActiveError, __FILE__, __FUNCTION__, __LINE__, SYNTAX_ERROR, 0, NULL);
|
Yap_MkErrorRecord(LOCAL_ActiveError, __FILE__, __FUNCTION__, __LINE__, SYNTAX_ERROR, 0, NULL);
|
||||||
TokEntry *tok = LOCAL_tokptr;
|
TokEntry *tok = LOCAL_tokptr;
|
||||||
Int start_line = tok->TokLine;
|
Int start_line = tok->TokLine;
|
||||||
Int err_line = errtok->TokLine;
|
Int err_line = LOCAL_toktide->TokLine;
|
||||||
Int startpos = tok->TokPos;
|
Int startpos = tok->TokPos;
|
||||||
Int errpos = errtok->TokPos;
|
Int errpos = LOCAL_toktide->TokPos;
|
||||||
Int end_line = GetCurInpLine(GLOBAL_Stream + sno);
|
Int end_line = GetCurInpLine(GLOBAL_Stream + sno);
|
||||||
Int endpos = GetCurInpPos(GLOBAL_Stream + sno);
|
Int endpos = GetCurInpPos(GLOBAL_Stream + sno);
|
||||||
|
|
||||||
|
@ -488,7 +488,7 @@ be lost.
|
|||||||
'$trace_goal'(G, M, GoalNumber, H) :-
|
'$trace_goal'(G, M, GoalNumber, H) :-
|
||||||
'$undefined'(G, M),
|
'$undefined'(G, M),
|
||||||
!,
|
!,
|
||||||
'$get_undefined_pred'(M:G, NM:Goal),
|
'$get_undefined_predicates'(M:G, NM:Goal),
|
||||||
( ( M == NM ; NM == prolog), G == Goal
|
( ( M == NM ; NM == prolog), G == Goal
|
||||||
->
|
->
|
||||||
yap_flag( unknown, Action ),
|
yap_flag( unknown, Action ),
|
||||||
|
Reference in New Issue
Block a user