rename non_iso.pl to iso_ext.pl (#265)

This commit is contained in:
Mark Thom
2020-02-22 00:58:37 -07:00
parent 003b4d0218
commit b2e50b42a3
14 changed files with 19 additions and 19 deletions

View File

@@ -448,7 +448,7 @@ set_difference([], _, []) :- !.
set_difference(Xs, [], Xs).
group_by_variant([V2-S2 | Pairs], V1-S1, [S2 | Solutions], Pairs0) :-
non_iso:variant(V1, V2), !, V1 = V2, group_by_variant(Pairs, V2-S2, Solutions, Pairs0).
iso_ext:variant(V1, V2), !, V1 = V2, group_by_variant(Pairs, V2-S2, Solutions, Pairs0).
group_by_variant(Pairs, _, [], Pairs).
group_by_variants([V-S|Pairs], [V-Solution|Solutions]) :-

View File

@@ -30,7 +30,7 @@
:- use_module(library(between)).
:- use_module(library(atts)).
:- use_module(library(lists)).
:- use_module(library(non_iso)).
:- use_module(library(iso_ext)).
:- use_module(library(pairs)).
:- use_module(library(dcgs)).
:- use_module(library(error), []).

View File

@@ -3,7 +3,7 @@
:- use_module(library(error)).
:- use_module(library(lists)).
:- use_module(library(non_iso)).
:- use_module(library(iso_ext)).
:- use_module(library(si)).
gensym_key(Base, BaseKey) :-

View File

@@ -1,9 +1,9 @@
%% for builtins that are not part of the ISO standard.
%% must be loaded at the REPL with
%% ?- use_module(library(non_iso)).
%% ?- use_module(library(iso_ext)).
:- module(non_iso, [bb_b_put/2, bb_get/2, bb_put/2, call_cleanup/2,
:- module(iso_ext, [bb_b_put/2, bb_get/2, bb_put/2, call_cleanup/2,
call_with_inference_limit/3, forall/2, maybe/0,
partial_string/1, partial_string/3,
partial_string_tail/2, set_random/1,

View File

@@ -18,7 +18,7 @@
:- use_module(library(cont)).
:- use_module(library(lists)).
%:- use_module(library(debug)).
:- use_module(library(non_iso)).
:- use_module(library(iso_ext)).
%% :- meta_predicate
%% start_tabling(+, 0).

View File

@@ -9,7 +9,7 @@
]).
:- use_module(library(atts)).
:- use_module(library(non_iso)).
:- use_module(library(iso_ext)).
:- attribute table_global_worklist/1.

View File

@@ -57,7 +57,7 @@
:- use_module(library(atts)).
:- use_module(library(gensym)).
:- use_module(library(non_iso)).
:- use_module(library(iso_ext)).
:- attribute table_status/1, newly_created_table_identifiers/1.

View File

@@ -44,7 +44,7 @@
:- use_module(library(atts)).
:- use_module(library(lists)).
:- use_module(library(non_iso)).
:- use_module(library(iso_ext)).
:- use_module(library(terms)).
:- use_module(trie).

View File

@@ -740,13 +740,13 @@ impl IndexStore {
let r_w_h = clause_name!("run_cleaners_with_handling");
let r_wo_h = clause_name!("run_cleaners_without_handling");
let non_iso = clause_name!("non_iso");
let iso_ext = clause_name!("iso_ext");
let r_w_h = self
.get_internal(r_w_h, 0, non_iso.clone())
.get_internal(r_w_h, 0, iso_ext.clone())
.and_then(|item| item.local());
let r_wo_h = self
.get_internal(r_wo_h, 1, non_iso)
.get_internal(r_wo_h, 1, iso_ext)
.and_then(|item| item.local());
if let Some(r_w_h) = r_w_h {

View File

@@ -377,9 +377,9 @@ impl Machine {
lib_path.clone(),
),
);
compile_user_module(&mut wam, parsing_stream(NON_ISO.as_bytes()), true,
compile_user_module(&mut wam, parsing_stream(ISO_EXT.as_bytes()), true,
ListingSource::from_file_and_path(
clause_name!("non_iso"),
clause_name!("iso_ext"),
lib_path.clone(),
)
);