diff options
Diffstat (limited to 'char.lisp')
-rw-r--r-- | char.lisp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/char.lisp b/char.lisp new file mode 100644 index 0000000..8d1f21c --- /dev/null +++ b/char.lisp @@ -0,0 +1,7 @@ +(in-package #:char) + +(defun whitespace? (x) + (some (lambda (y) (char= x y)) '(#\Space #\Newline #\Tab))) + +(defun visible? (x) + (char/= x #\Space #\Newline #\Tab)) |