Add all_mdoules test and fix library(csv)

diff --git a/src/lib/csv.pl b/src/lib/csv.pl
index d6ad8f7366003d8b2ba4a396938fe3f9214fbd9f..2cf6ea566ece4b51a38186bd73235198dfaa4f5e 100644 (file)
--- a/src/lib/csv.pl
+++ b/src/lib/csv.pl
@@ -221,7 +221,7 @@ row([X | Y], Opt) -->
   !,
   ( separator(Opt) ->
     row(Y, Opt)
-  ; end_token ->
+  ; end_token,
     { Y = [] }).
 
 

diff --git a/tests/scryer/cli/src_tests/all_modules.stderr b/tests/scryer/cli/src_tests/all_modules.stderr
new file mode 100644 (file)
index 0000000..e69de29

diff --git a/tests/scryer/cli/src_tests/all_modules.stdin b/tests/scryer/cli/src_tests/all_modules.stdin
new file mode 100644 (file)
index 0000000..c61818f
--- /dev/null
+++ b/tests/scryer/cli/src_tests/all_modules.stdin
@@ -0,0 +1,48 @@
+use_module(library(arithmetic)).
+use_module(library(assoc)).
+use_module(library(atts)).
+use_module(library(between)).
+use_module(library(charsio)).
+use_module(library(clpb)).
+use_module(library(clpz)).
+use_module(library(cont)).
+use_module(library(crypto)).
+use_module(library(csv)).
+use_module(library(dcgs)).
+use_module(library(debug)).
+use_module(library(diag)).
+use_module(library(dif)).
+use_module(library(error)).
+use_module(library(ffi)).
+use_module(library(files)).
+use_module(library(format)).
+use_module(library(freeze)).
+use_module(library(gensym)).
+use_module(library(http/http_open)).
+use_module(library(http/http_server)).
+use_module(library(iso_ext)).
+use_module(library(lambda)).
+use_module(library(lists)).
+use_module(library(ordsets)).
+use_module(library(os)).
+use_module(library(pairs)).
+use_module(library(pio)).
+use_module(library(queues)).
+use_module(library(random)).
+use_module(library(reif)).
+use_module(library(serialization/abnf)).
+use_module(library(serialization/json)).
+use_module(library(sgml)).
+use_module(library(si)).
+use_module(library(simplex)).
+use_module(library(sockets)).
+use_module(library(tabling)).
+use_module(library(terms)).
+use_module(library(time)).
+use_module(library(tls)).
+use_module(library(ugraphs)).
+use_module(library(uuid)).
+use_module(library(wasm)).
+use_module(library(when)).
+use_module(library(xpath)).
+halt.

diff --git a/tests/scryer/cli/src_tests/all_modules.stdout b/tests/scryer/cli/src_tests/all_modules.stdout
new file mode 100644 (file)
index 0000000..4e32a71
--- /dev/null
+++ b/tests/scryer/cli/src_tests/all_modules.stdout
@@ -0,0 +1,47 @@
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.
+   true.

diff --git a/tests/scryer/cli/src_tests/all_modules.toml b/tests/scryer/cli/src_tests/all_modules.toml
new file mode 100644 (file)
index 0000000..8198ecb
--- /dev/null
+++ b/tests/scryer/cli/src_tests/all_modules.toml
@@ -0,0 +1 @@
+args = ["-f", "--no-add-history"]