New macro: ldo.

This is a left-argument-inserting syntactic sugar for do.

* lisplib.c (op_set_entries): Add auto-load entry for ldo.

* share/txr/stdlib/op.tl (ldo): New macro.

* txr.1: Documented.

1 files changed, 1 insertions, 1 deletions

diff --git a/lisplib.c b/lisplib.c
index 62b41b3b..e3487496 100644
--- a/lisplib.c
+++ b/lisplib.c
@@ -747,7 +747,7 @@ static val debugger_set_entries(val dlt, val fun)
 static val op_set_entries(val dlt, val fun)
 {
   val name[] = {
-    lit("op"), lit("do"), lit("lop"), lit("ap"), lit("ip"),
+    lit("op"), lit("do"), lit("lop"), lit("ldo"), lit("ap"), lit("ip"),
     lit("ado"), lit("ido"), lit("ret"), lit("aret"),
     lit("opip"), lit("oand"),
     nil