Listener configuration variables.

* linenoise/linenoise.c (lino_get_multiline): New function.

* linenoise/linenoise.h (lino_get_multiline): Declared.

* parser.c (listener_hist_len, listener_multi_line_p_s): New
symbol global variables.
(repl): Set linenoise history length and multi-line mode from
the *listener-hist-len* and *listener-multi-line-p* variables
on each call. Set the *listener-multi-line* variable from
the lino_t object's current state after each linenoise call.
(parse_init): Initialize new global variables and register
them as special variables.

* txr.1: Update sentence which says that history is fixed
at 100 lines. Document listener configuration variables.

2 files changed, 5 insertions, 0 deletions

diff --git a/linenoise/linenoise.c b/linenoise/linenoise.c
index a8ed8ba1..cc291d38 100644
--- a/linenoise/linenoise.c
+++ b/linenoise/linenoise.c
@@ -128,6 +128,10 @@ void lino_set_multiline(lino_t *ls, int ml) {
     ls->mlmode = ml;
 }
 
+int lino_get_multiline(lino_t *ls) {
+    return ls->mlmode;
+}
+
 static void atexit_handler(void);
 
 /* Raw mode: 1960 magic shit. */
diff --git a/linenoise/linenoise.h b/linenoise/linenoise.h
index cfd03542..688ed64c 100644
--- a/linenoise/linenoise.h
+++ b/linenoise/linenoise.h
@@ -69,3 +69,4 @@ int lino_hist_save(lino_t *, const char *filename);
 int lino_hist_load(lino_t *, const char *filename);
 int lino_clear_screen(lino_t *);
 void lino_set_multiline(lino_t *, int ml);
+int lino_get_multiline(lino_t *);