(defvar str "" "An empty string") (if (length= str 0) (message "string is empty") (message "string is not empty"))