RosettaCodeData/Task/Empty-string/PL-I/empty-string.pli
2023-07-01 13:44:08 -04: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 */