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

avoid dot

Browse Source
This commit is contained in:
U-vsc-PC\vsc 2013-11-11 10:28:45 +00:00
parent 5e6cc55713
commit a811f56d14
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pl/load_foreign.yap Normal file → Executable file
View File

@ -96,7 +96,7 @@ open_shared_object(File, Opts, Handle) :-
var(Opts), !, var(Opts), !,
'$do_error'(instantiation_error,G). '$do_error'(instantiation_error,G).
'$open_shared_opts'([], _, 0) :- !. '$open_shared_opts'([], _, 0) :- !.
'$open_shared_opts'(Opt.Opts, G, V) :- '$open_shared_opts'([Opt|Opts], G, V) :-
'$open_shared_opts'(Opts, G, V0), '$open_shared_opts'(Opts, G, V0),
'$open_shared_opt'(Opt, G, OptV), '$open_shared_opt'(Opt, G, OptV),
V0 is V \/ OptV. V0 is V \/ OptV.