RosettaCodeData/Task/Pointers-and-references/COBOL/pointers-and-references-4.cobol
Ingy döt Net 776bba907c Sync
2013-10-27 22:24:23 +00:00

2 lines
49 B
COBOL

SET ptr1 UP BY 10
SET ptr2 DOWN BY LENGTH OF foo