RosettaCodeData/Task/Empty-string/Emacs-Lisp/empty-string.l
Ingy döt Net 776bba907c Sync
2013-10-27 22:24:23 +00:00

6 lines
158 B
Common Lisp

(setq str "") ;; empty string literal
(if (= 0 (length str))
(message "string is empty"))
(if (/= 0 (length str))
(message "string is not empty"))