aboutsummaryrefslogtreecommitdiff
path: root/tests/iii/diagnostic-call-after-arguments/program.cps
blob: 743a51c14b1edf419a8363276d7b6f85976f3789 (plain)
1
2
3
4
5

PROCEDURE Change(BYVAL Text : STRING, BYREF Value : INTEGER)
ENDPROCEDURE
CALL Change(
    LEFT("text", 2),
    1)