Merge pull request #2263 from aarroyoc/docs-toplevel

Move argv/1 to library(os)
2024-01-02 09:19:10 -07:00
parent a475a8a899 47b5ae7984
commit 5c89029462
8 changed files with 79 additions and 43 deletions
--- a/src/loader.pl
+++ b/src/loader.pl
@@ -138,7 +138,7 @@ file_load_cleanup(Evacuable, Error) :-
    load_context(Module),
    abolish(Module:'$initialization_goals'/1),
    unload_evacuable(Evacuable),
-    (  clause('$toplevel':argv(_), _) ->
+    (  clause('$toplevel':started, _) ->
       % let the toplevel call loader:write_error/1
       throw(Error)
    ;  '$print_message_and_fail'(Error)