1 files changed, 1 insertions, 1 deletions
diff --git a/lisplib.c b/lisplib.c
index 8379abf9..1782e671 100644
--- a/lisplib.c
+++ b/lisplib.c
@@ -563,7 +563,7 @@ static val doloop_instantiate(val set_fun)
 static val op_set_entries(val dlt, val fun)
 {
   val name[] = {
-    lit("op"), lit("do"),
+    lit("op"), lit("do"), lit("lop"),
     nil
   };
   set_dlt_entries(dlt, name, fun);