-
Notifications
You must be signed in to change notification settings - Fork 2
/
package.lisp
71 lines (68 loc) · 1.39 KB
/
package.lisp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
(defpackage #:clavier
(:use #:cl)
(:export #:*signal-validation-errors*
#:call-with-signal-validation-errors
#:with-signal-validation-errors
#:collecting-validation-errors
#:validation-error
#:validation-error-target
#:validation-error-message
#:validator
#:validate
#:message
#:validator-message
;; Validators
#:validator-collection
#:equal-to-validator
#:not-equal-to-validator
#:blank-validator
#:not-blank-validator
#:type-validator
#:string-validator
#:boolean-validator
#:integer-validator
#:symbol-validator
#:keyword-validator
#:list-validator
#:function-validator
#:true-validator
#:false-validator
#:not-validator
#:and-validator
#:or-validator
#:one-of-validator
#:less-than-validator
#:greater-than-validator
#:email-validator
#:regex-validator
#:url-validator
#:datetime-validator
#:pathname-validator
#:length-validator
;; Validator builders
#:==
#:~=
#:one-of
#:blank
#:not-blank
#:is-true
#:is-false
#:greater-than
#:less-than
#:~
#:&&
#:||
#:fn
#:is-a
#:is-a-string
#:is-a-boolean
#:is-an-integer
#:is-a-symbol
#:is-a-keyword
#:is-a-list
#:valid-email
#:matches-regex
#:valid-url
#:valid-datetime
#:valid-pathname
#:len))