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

improve // handling.

Browse Source
This commit is contained in:
Vitor Santos Costa 2011-06-13 01:44:31 +01:00
parent d6e87420e3
commit c67cac0a36
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pl/modules.yap
View File

@ -141,6 +141,12 @@ module(N) :-
print_message(warning,import(N/K,Mod,M,private)) print_message(warning,import(N/K,Mod,M,private))
), ),
'$do_import'(N, K, M, Mod). '$do_import'(N, K, M, Mod).
'$use_preds'(N//K0,Publics,M,Mod) :-
K is K0+2,
( lists:memberchk(N/K,Publics) -> true ;
print_message(warning,import(N/K,Mod,M,private))
),
'$do_import'(N, K, M, Mod).
'$do_import'(N, K, M, T) :- '$do_import'(N, K, M, T) :-