RosettaCodeData/Task/Copy-a-string/PL-I/copy-a-string.pli

4 lines
83 B
Text
Raw Permalink Normal View History

2013-04-10 23:57:08 -07:00
declare (s1, s2) character (20) varying;
s1 = 'now is the time';
s2 = s1;