* share/txr/stdlib/place.tl (place-form-p): New function.

* lisplib.c (place_set_entries): Add place-form-p to list of names.

1 files changed, 1 insertions, 0 deletions

diff --git a/lisplib.c b/lisplib.c
index be437634..bc00b6a1 100644
--- a/lisplib.c
+++ b/lisplib.c
@@ -59,6 +59,7 @@ static val place_set_entries(val dlt, val fun)
     lit("*place-delete-expander*"),
     lit("get-update-expander"), lit("get-clobber-expander"),
     lit("get-delete-expander"),
+    lit("place-form-p"),
     lit("rlet"), lit("with-gensyms"),
     lit("call-update-expander"), lit("call-clobber-expander"),
     lit("call-delete-expander)"),