diff options
| author | colin <colin@cicadas.surf> | 2023-03-07 18:36:45 -0800 |
|---|---|---|
| committer | colin <colin@cicadas.surf> | 2023-03-07 18:36:45 -0800 |
| commit | e2a60e8d2b8e41bcd2c9a39d8e2210f701b92353 (patch) | |
| tree | 91a8e68115fcbc506c9952161a1a8f37315b16cf /src/utilities.lisp | |
| parent | eea0da373349349b4d25dd4bc116a9c9eb04fb98 (diff) | |
Add: growing an app skeleton
Diffstat (limited to 'src/utilities.lisp')
| -rw-r--r-- | src/utilities.lisp | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/utilities.lisp b/src/utilities.lisp index 1e16931..539ad28 100644 --- a/src/utilities.lisp +++ b/src/utilities.lisp @@ -66,3 +66,7 @@ #\space (a:conjoin #'asciip #'alphanumericp) (string-downcase string))))) + +(eval-when (:compile-toplevel :load-toplevel :execute) + (defun starts-with-vowel-p (string) + (find (elt string 0) "aeiou" :test #'char-equal))) |