error handling should report the culprit .

This commit is contained in:
Vítor Santos Costa 2015-03-04 09:35:47 +00:00
parent 0b90870185
commit 0839baf638
1 changed files with 1 additions and 1 deletions

View File

@ -246,7 +246,7 @@ static Int init_ground_module(USES_REGS1) {
} }
t3 = Yap_YapStripModule(t1, &tmod); t3 = Yap_YapStripModule(t1, &tmod);
if (!t3) { if (!t3) {
Yap_Error(TYPE_ERROR_CALLABLE, t1, "trying to obtain module"); Yap_Error(TYPE_ERROR_CALLABLE, t3, "trying to obtain module");
return FALSE; return FALSE;
} }
if (!IsVarTerm(tmod)) { if (!IsVarTerm(tmod)) {