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

4 lines
223 B
Text

Dcl s Char(10) Varying;
s = ''; /* assign an empty string to a variable. */
if length(s) = 0 then ... /* To test whether a string is empty */
if length(s) > 0 then ... /* to test for a non-empty string */