RosettaCodeData/Task/Empty-string/Emacs-Lisp/empty-string.l
2023-07-01 13:44:08 -04: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"))