Exported PARSE-STRUCTURE-DEFINITION.

Pascal J. Bourguignon [2021-06-11 07:32]
Exported PARSE-STRUCTURE-DEFINITION.
Filename
common-lisp/cesarum/utility.lisp
diff --git a/common-lisp/cesarum/utility.lisp b/common-lisp/cesarum/utility.lisp
index 61023f4..a42bb4e 100644
--- a/common-lisp/cesarum/utility.lisp
+++ b/common-lisp/cesarum/utility.lisp
@@ -135,6 +135,7 @@
    "XOR" "EQUIV" "IMPLY"
    ;; "SET-EQUAL"
    )
+  (:export "PARSE-STRUCTURE-DEFINITION")
   (:export "DMS-D" "D-DMS")
   (:documentation
    "
@@ -1432,7 +1433,6 @@ DO:        Expands to a CTYPECASE where only the clauses with unique
   (generate-distinct-float-types-typecase 'ctypecase expression clauses))


-
 (defun +epsilon (float)
   "Returns the float incremented by the smallest increment possible."
   (multiple-value-bind (significand exponent sign) (decode-float float)
ViewGit