diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

restore callable.

Browse Source
This commit is contained in:
Vítor Santos Costa
2014-10-20 09:20:56 +01:00
parent bf0844a2a0
commit d40b9d1426
17 changed files with 49 additions and 49 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
C/modules.c
View File

@@ -260,7 +260,7 @@ p_strip_module( USES_REGS1 )
}
t1 = Yap_StripModule( t1, &tmod );
if (!t1) {
Yap_Error(TYPE_ERROR_CALLABLE,Yap_PredicateIndicator(t1,tmod),"trying to obtain module");
Yap_Error(TYPE_ERROR_CALLABLE,t1,"trying to obtain module");
return FALSE;
}
return Yap_unify(ARG3, t1) &&
@@ -316,7 +316,7 @@ p_yap_strip_module( USES_REGS1 )
}
t1 = Yap_YapStripModule( t1, &tmod );
if (!t1) {
Yap_Error(TYPE_ERROR_CALLABLE,Yap_PredicateIndicator(t1, tmod),"trying to obtain module");
Yap_Error(TYPE_ERROR_CALLABLE, t1, "trying to obtain module");
return FALSE;
}
return Yap_unify(ARG3, t1) &&