diff options
Diffstat (limited to 'repl.pl')
-rw-r--r-- | repl.pl | 8 |
1 files changed, 5 insertions, 3 deletions
@@ -12,9 +12,11 @@ repl([ProgName|Args]) :- handle_arg('-d') :- set_prolog_flag(debug, on). handle_arg(Arg) :- - write('Unhandled command line argument: '), - writeq(Arg), - nl. + ( '$load_module_from_file'(Arg) + -> write('Loaded module from file: ') + ; write('Failed to load module from file: ') + ), + write(Arg), nl. handle_args([Arg|Rest]) :- handle_arg(Arg), !, handle_args(Rest). handle_args([]). |