oberonjs/test/input/inc_dec.ob

MODULE m;

CONST ic = 10;
VAR i: INTEGER;

PROCEDURE byRef(VAR i: INTEGER);
BEGIN
	INC(i);
	DEC(i);

	INC(i, 123);
	DEC(i, 123);
END byRef;

BEGIN
	INC(i);
	INC(i, 2);
	INC(i, 3 * 5);
	INC(i, ic);
	INC(i, 07FFFFFFFH + 1 );
	INC(i, i + 1);

	DEC(i);
	DEC(i, 2);
	DEC(i, 3 * 5);
	DEC(i, ic);
	DEC(i, 0FFFFFFFFH * 2);
	DEC(i, i * 2);
END m.