RosettaCodeData/Task/Empty-string/Retro/empty-string-3.retro

5 lines
78 B
Plaintext

: notEmpty? ( $-f ) getLength 0 > ;
"" notEmpty? putn
"hello" notEmpty? putn