RosettaCodeData/Task/Calendar---for-REAL-programmers/Phix/calendar---for-real-programmers-5.phix
2016-12-05 23:44:36 +01:00

4 lines
110 B
Text

procedure tt_stringA(sequence text, integer alias)
tt_string(text,-2)
tt[pcurr] = alias
end procedure