src/pset-proto.lisp: Export `default-slot-from-property'.

[sod] / src / pset-proto.lisp

diff --git a/src/pset-proto.lisp b/src/pset-proto.lisp
index 61793b5..0238f41 100644 (file)
--- a/src/pset-proto.lisp
+++ b/src/pset-proto.lisp
@@ -306,6 +306,7 @@
 ;;;--------------------------------------------------------------------------
 ;;; Utility macros.
 
+(export 'default-slot-from-property)
 (defmacro default-slot-from-property
     ((instance slot &optional (slot-names t))
      (pset property type