diff options
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 539ad28..3852399 100644 --- a/src/utilities.lisp +++ b/src/utilities.lisp @@ -70,3 +70,7 @@ (eval-when (:compile-toplevel :load-toplevel :execute) (defun starts-with-vowel-p (string) (find (elt string 0) "aeiou" :test #'char-equal))) + +(defun read-from-file (path) + (read-from-string + (alexandria:read-file-into-string path))) |