RosettaCodeData/Task/Empty-string/SNOBOL4/empty-string.sno
2016-12-05 22:15:40 +01:00

7 lines
171 B
Text

* ASSIGN THE NULL STRING TO X
X =
* CHECK THAT X IS INDEED NULL
EQ(X, NULL) :S(YES)
OUTPUT = 'NOT NULL' :(END)
YES OUTPUT = 'NULL'
END