M2compiler-V3/compiler/tests/showcase23vis.mod

IMPLEMENTATION MODULE Visitor;
PROCEDURE Add(VAR acc : INTEGER; v : INTEGER);
BEGIN acc := acc + v END Add;
END Visitor.