protect against mal-formed calls

2015-02-14 17:05:48 +00:00 · 2015-02-14 17:05:48 +00:00 · 2d20db7e6d
commit 2d20db7e6d
parent 29ffb152e5
1 changed files with 1 additions and 0 deletions
--- a/pl/modules.yap
+++ b/pl/modules.yap
@ -838,6 +838,7 @@ expand_goal(G, G).
 	'$continue_imported'(ExportingMod, ExportingModI, G0, G0I).
 % SWI builtin
 '$get_undefined_pred'(G, _ImportingMod, G, user) :-
+	nonvar(G),
 	'$pred_exists'(G, user), !.
 '$get_undefined_pred'(G, _ImportingMod, G0, ExportingMod) :-
        recorded('$dialect',Dialect,_),