Anonymous user
Empty string: Difference between revisions
added otus lisp
(Added XLISP) |
(added otus lisp) |
||
Line 1,109:
Variable w does not contain the empty string
this is not a good test</pre>
=={{header|Otus Lisp}}==
<lang>
; define the empty string
(define empty-string "")
; three simplest tests for 'the-string emptiness
(if (or
(string-eq? the-string "")
(string=? the-string "")
(eq? (string-length the-string) 0))
(print "the-string is empty")
; four simplest tests for 'the-string not emptiness
(if (or
(not (string-eq? the-string ""))
(not (string=? the-string ""))
(not (eq? (string-length the-string) 0))
(less? 0 (string-length the-string)))
(print "the-string is NOT empty))
</lang>
=={{header|PARI/GP}}==
| |||