MODULE A EXPORTS A, AF;

BEGIN
 p := NEW (REF INTEGER);
END A.