Refactoring hash bang support; hash bang null hack.

The hash bang mechanism is handled in one place,
and disentangled from all parsing logic.
It is also endowed with special powers.

* eval.c (load): Pass one less argument to read_eval_stream.

* match.c (v_load): Likewise.

* parser.c (read_eval_stream): hash_bang_support Boolean
argument removed. Hash bang logic removed.
(load_rcfile): Pass only two arguments to read_eval_stream.

* parser.h (read_eval_stream): Declaration updated.

* txr.c (remove_hash_bang_line): Function removed.
(check_hash_bang): New static function.
(txr_main): Recognize the script file name while still
inside the argument processing loop. Open the file,
and check for a hash bang line, doing the special
processing which can generate more arguments from material
after a null byte in the hash bang line. The parse_stream
variable is now initialized to nil and doubles as a Boolean
indicating whether a stream has been opened. After the
loop, we remove the script file from the arguments, if we
have an open stream and the spec_file_str matches.
read_eval_stream is called only with two arguments.

* txr.1: Revised existing documentation and described
new features.

1 files changed, 1 insertions, 1 deletions

diff --git a/match.c b/match.c
index 6a0d6ea2..d06d7c76 100644
--- a/match.c
+++ b/match.c
@@ -4276,7 +4276,7 @@ static val v_load(match_files_ctx *c)
         }
       }
     } else {
-      if (!read_eval_stream(stream, std_error, nil)){
+      if (!read_eval_stream(stream, std_error)){
         close_stream(stream, nil);
         sem_error(specline, lit("load: ~a contains errors"), path, nao);
       }