[Info-vax] Oberon-2 on VMS

[Chris Townley]

On 30/12/2022 00:56, Arne Vajhøj wrote:
> On 12/29/2022 7:54 PM, Arne Vajhøj wrote:
>> Probably not something in great demand.
>>
>> :-)
>>
>> But here it is how to get it working:
>>
>> 1) get Gardens Point Component Pascal (despite the name
>>     then it is Oberon-2) for JVM version 1.3.16 (that version
>>     works on VMS Alpha not just VMS Itanium)
>> 2) move to VMS and unpack
>> 3) stuff gpcp.com and gpcpdef.com in the bin dir (files
>>     are below)
>> 4) @gpcpdef
> 
> $ type Hello.cp
> MODULE Hello;
>    IMPORT CPmain, Console;
> 
> BEGIN
>    Console.WriteString("Hello world!");
>    Console.WriteLn;
> END Hello.
> $ gpcpc "Hello"
> #gpcp: <Hello> No errors
> $ gpcp "Hello"
> Hello world!
> $ type Fac.cp
> MODULE Fac;
>    IMPORT CPmain, Console;
> 
> PROCEDURE F(n : INTEGER) : INTEGER;
> 
> BEGIN
>    IF n < 2 THEN
>      RETURN 1;
>    ELSE
>      RETURN n * F(n - 1);
>    END;
> END F;
> 
> PROCEDURE Test(upplim : INTEGER);
> 
> VAR
>    i : INTEGER;
> 
> BEGIN
>    FOR i := 1 TO upplim DO
>      Console.WriteInt(i, 1);
>      Console.WriteString(" : ");
>      Console.WriteInt(F(i),1);
>      Console.WriteLn;
>    END;
> END Test;
> 
> BEGIN
>    Test(8);
> END Fac.
> $ gpcpc "Fac"
> #gpcp: <Fac> No errors
> $ gpcp "Fac"
> 1 : 1
> 2 : 2
> 3 : 6
> 4 : 24
> 5 : 120
> 6 : 720
> 7 : 5040
> 8 : 40320
> 
> Arne
> 
> 

Sounds interesting.

Any idea where to get the alpha version of java, and how to install?

-- 
Chris