[Oberon] Intermediate scopes in Oberon-07

[August Karlstrom]

I'm experimenting with Peter De Wachter's Oberon RISC Emulator available at

	https://github.com/pdewacht/oberon-risc-emu

using the provided disk image from 2016-08-02.

As far as I understand, in the latest version of the Oberon programming 
language no access to intermediate scopes is allowed. Still the compiler 
accepts the following module:

	MODULE M;
	
		PROCEDURE P;
			CONST c = 0;
			TYPE T = INTEGER;
	
			PROCEDURE Q;
				VAR x: T;
			BEGIN
				x := c
			END Q;
		END P;
	
	END M.

Haven't Niklaus Wirth updated the compiler accordingly or doesn't the 
disk image reflect the latest implementation of PO2013 or am I missing 
something else here?


Regards,
August