path: root/tests/i/multifile-main-exit/lib.cps

GLOBAL
    DECLARE Counter : INTEGER
ENDGLOBAL
PROCEDURE Increment()
    Counter <- Counter + 1
ENDPROCEDURE
FUNCTION Status RETURNS INTEGER
    RETURN 4294967298 + Counter
ENDFUNCTION