aboutsummaryrefslogtreecommitdiff
path: root/terrafirma.lisp
diff options
context:
space:
mode:
authorcolin <colin@cicadas.surf>2023-11-30 19:03:48 -0800
committercolin <colin@cicadas.surf>2023-11-30 19:03:48 -0800
commit68d27225b47bf85be43a8a33e619b61486e55ca2 (patch)
treee1bf751320e7cb77986b7e5775b07b19c004bc4d /terrafirma.lisp
parent6313c32898f155c44fff350aa18358be58483fd9 (diff)
More name refinementHEADmain
Diffstat (limited to 'terrafirma.lisp')
-rw-r--r--terrafirma.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/terrafirma.lisp b/terrafirma.lisp
index e5a3ec5..212f7cd 100644
--- a/terrafirma.lisp
+++ b/terrafirma.lisp
@@ -5,7 +5,7 @@
(:export
#:validation-error ; Condition
#:validate ; Macrolet Symbol
- #:defvalidator ; Macro
+ #:define-valid ; Macro
))
(in-package #:terrafirma)
@@ -48,7 +48,7 @@
(defvar *type*)
(defvar *instance*)
-(defmacro defvalidator (type (var &key name) &body body)
+(defmacro define-valid (type (var &key name) &body body)
"Defines a validation function. If TYPE is a symbolic type identifier,
then the defined function will have a name like VALID-<TYPE>-P.
Otherwise a NAME must be provided.