[Oberon] A pseudo-problem?

[Douglas G. Danforth]

The following compiles without complaint under Component Pascal

MODULE Foo;

CONST
	digits = 10;
	ops = 5;

TYPE
	DigitBtn = RECORD END;
  	OpBtn = RECORD END;

	(* auxiliary type used for grouping related items *)
	Buttons = RECORD
		digits : ARRAY digits (* constant *) OF DigitBtn;
		ops    : ARRAY ops (* constant *) OF OpBtn;
         END;
	
END Foo.


Vasile Rotaru wrote:
> Hi, all
> 
>   I don't know whether the following code is correct or not, but both
> Compiler.Compile and PC.Compile choke on it. (The first with a trap, the second with a criptical report "PC.Compile not done (10/10)".)
> 	
> 
> CONST
> 	digits = 10;
> 	ops = 5;
> 
> TYPE
> 	Button = ..
> 	DigitBtn = ..
>  	OpBtn = ..
> 
> 	(* auxiliary type used for grouping related items *)
> 	Buttons = RECORD
> 		digits : ARRAY digits (* constant *) OF DigitBtn;
> 		ops    : ARRAY ops (* constant *) OF OpBtn;
>         END
>        
> 
>   Of course I may change the name of constants (digits => numOfDigits), but still there must be either a error reported or an .Obx/.Obj file at the end.
> 
> Regards, Vasile
> --
> Oberon at inf.ethz.ch mailing list for ETH Oberon and related systems
> https://www.mail.inf.ethz.ch/lists/listinfo/oberon
> 
>