make *.pl files in src/prolog/lib available from libraries.rs
This commit is contained in:
@@ -52,7 +52,7 @@
|
||||
del_max_assoc/4 % +Assoc0, ?Key, ?Value, ?Assoc
|
||||
]).
|
||||
|
||||
:- use_module('src/prolog/lib/lists.pl').
|
||||
:- use_module(library(lists)).
|
||||
|
||||
/** <module> Binary associations
|
||||
|
||||
|
||||
@@ -4,8 +4,8 @@
|
||||
'$add_to_list'/3, '$del_attr'/3, '$del_attr_step'/3,
|
||||
'$del_attr_buried'/4]).
|
||||
|
||||
:- use_module('src/prolog/lib/dcgs.pl').
|
||||
:- use_module('src/prolog/lib/terms.pl').
|
||||
:- use_module(library(dcgs)).
|
||||
:- use_module(library(terms)).
|
||||
|
||||
:- op(1199, fx, attribute).
|
||||
|
||||
|
||||
@@ -2,8 +2,8 @@
|
||||
|
||||
%% TODO: numlist/5.
|
||||
|
||||
:- use_module('src/prolog/lib/lists.pl', [length/2]).
|
||||
:- use_module('src/prolog/lib/error.pl').
|
||||
:- use_module(library(lists), [length/2]).
|
||||
:- use_module(library(error)).
|
||||
|
||||
between(Lower, Upper, X) :-
|
||||
must_be(integer, Lower),
|
||||
|
||||
@@ -2,8 +2,8 @@
|
||||
|
||||
:- module(dcgs, [phrase/2, phrase/3]).
|
||||
|
||||
:- use_module('src/prolog/lib/lists.pl', [append/3]).
|
||||
:- use_module('src/prolog/lib/terms.pl').
|
||||
:- use_module(library(lists), [append/3]).
|
||||
:- use_module(library(terms)).
|
||||
|
||||
phrase(G, G) :-
|
||||
nonvar(G), G = [_|_], !.
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
:- module(diag, [wam_instructions/2]).
|
||||
|
||||
:- use_module('src/prolog/lib/error').
|
||||
:- use_module(library(error)).
|
||||
|
||||
wam_instructions(Clause, Listing) :-
|
||||
( nonvar(Clause) ->
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
:- module(dif, [dif/2]).
|
||||
|
||||
:- use_module('src/prolog/lib/atts.pl').
|
||||
:- use_module('src/prolog/lib/lists.pl', [append/3]).
|
||||
:- use_module(library(atts)).
|
||||
:- use_module(library(lists), [append/3]).
|
||||
|
||||
:- attribute dif/1.
|
||||
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
:- module(freeze, [freeze/2]).
|
||||
|
||||
:- use_module('src/prolog/lib/atts.pl').
|
||||
:- use_module(library(atts)).
|
||||
|
||||
:- attribute frozen/1.
|
||||
|
||||
|
||||
@@ -52,7 +52,7 @@
|
||||
ord_intersection/2 % +PowerSet, -Intersection
|
||||
]).
|
||||
|
||||
:- use_module('src/prolog/lib/lists.pl').
|
||||
:- use_module(library(lists)).
|
||||
|
||||
/** <module> Ordered set manipulation
|
||||
Ordered sets are lists with unique elements sorted to the standard order
|
||||
|
||||
@@ -2,7 +2,7 @@
|
||||
memberd_t/3, tfilter/3, tmember/2, tmember_t/3,
|
||||
tpartition/4]).
|
||||
|
||||
:- use_module('src/prolog/lib/dif.pl').
|
||||
:- use_module(library(dif)).
|
||||
|
||||
if_(If_1, Then_0, Else_0) :-
|
||||
call(If_1, T),
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
:- module(terms, [numbervars/3]).
|
||||
|
||||
:- use_module('src/prolog/lib/error.pl').
|
||||
:- use_module(library(error)).
|
||||
|
||||
numbervars(Term, N0, N) :-
|
||||
catch(internal_numbervars(Term, N0, N), error(E,Ctx),
|
||||
|
||||
Reference in New Issue
Block a user