New special operator: compiler-let

* eval.c (compiler_let_s): New symbol variable.
(op_let): Recognize compiler-let for sequential
binding.
(do_expand): Traverse and diagnose compiler-let
form.
(eval_init): Initialize compiler_let_s and register
the interpreted version of the operator.

* stdlib/compiler.tl (compiler compile): Handle
compiler-let form.
(compiler comp-compiler-let): New method.
(no-dvbind-eval): New function.

* autoload.c (compiler-set-entries): Intern the
compiler-let symbol in the user package.

* txr.1: Documented.

* stdlib/doc-syms.tl: Updated.

1 files changed, 1 insertions, 1 deletions

diff --git a/autoload.c b/autoload.c
index 002ddee4..0f0f3039 100644
--- a/autoload.c
+++ b/autoload.c
@@ -660,7 +660,7 @@ static val compiler_set_entries(val fun)
     lit("compile-toplevel"), lit("compile"), lit("compile-file"),
     lit("compile-update-file"),
     lit("with-compilation-unit"), lit("dump-compiled-objects"),
-    lit("with-compile-opts"),
+    lit("with-compile-opts"), lit("compiler-let"),
     nil
   };
   val vname[] = {