From 7dcbe6987807654578b6c8ddb740dd246ad66229 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sat, 13 Jun 2015 07:37:26 -0700 Subject: New --lisp option: treat unsuffixed files as Lisp. * txr.c (help): Added help text. (txr_main): Handle lisp option. --- txr.c | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'txr.c') diff --git a/txr.c b/txr.c index ba4e86a2..effb3c2b 100644 --- a/txr.c +++ b/txr.c @@ -136,6 +136,7 @@ static void help(void) "--license Display software license\n" " Use of txr implies agreement with the disclaimer\n" " section at the bottom of the license.\n" +"--lisp Treat unsuffixed query files as TXR Lisp.\n" "--lisp-bindings Synonym for -l\n" "--debugger Synonym for -d\n" "--noninteractive Synonym for -n\n" @@ -485,6 +486,9 @@ int txr_main(int argc, char **argv) opt_lisp_bindings = 1; opt_print_bindings = 1; continue; + } else if (equal(opt, lit("lisp"))) { + txr_lisp_p = t; + continue; } else if (equal(arg, lit("debugger"))) { #if CONFIG_DEBUG_SUPPORT opt_debugger = 1; -- cgit v1.2.3