fix null pointer reference
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2247 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
501e3d7c30
commit
214644aed4
@ -3870,7 +3870,8 @@ static Int
|
|||||||
} else {
|
} else {
|
||||||
if (tokstart != NULL && tokstart->Tok != Ord (eot_tok)) {
|
if (tokstart != NULL && tokstart->Tok != Ord (eot_tok)) {
|
||||||
/* we got the end of file from an abort */
|
/* we got the end of file from an abort */
|
||||||
if (!strcmp(Yap_ErrorMessage,"Abort")) {
|
if (Yap_ErrorMessage &&
|
||||||
|
strcmp(Yap_ErrorMessage,"Abort")) {
|
||||||
Yap_clean_tokenizer(tokstart, Yap_VarTable, Yap_AnonVarTable);
|
Yap_clean_tokenizer(tokstart, Yap_VarTable, Yap_AnonVarTable);
|
||||||
return FALSE;
|
return FALSE;
|
||||||
}
|
}
|
||||||
|
Reference in New Issue
Block a user