[TUHS] berkeley unix version hosting Doug Cooper's Standard Pascal Environment

Will Senn via TUHS tuhs at tuhs.org
Sat Sep 19 09:08:21 AEST 2026


All,

4.2 works just fine and is reasonable if not precisely the machine in use.

Thanks,

Will

On 9/18/26 5:25 PM, Will Senn wrote:
> Hi all,
>
> My algol60 dive took me into uncharted (for me) waters. It was fun, 
> but eventually I tacked back and came across, Oh! Pascal!, a 
> recommendation I believe Clem gave me. Well, interestingly enough, but 
> not directly unix related, the code in that book runs with fpc -Miso, 
> meaning the free pascal compiler with the iso option for 7185. So, I'm 
> covered on running it in the modern world, but as usual, I'd prefer to 
> run it like it was run back when, on a system that might have been 
> used, at the time to work through the book.
>
> My first step back from today took me to 211bsd, it has a reasonable 
> environment, has pi and px and oughtta work, but... it doesn't really. 
> It'll do basic stuff, sure. But it lacks pc and a more complete 
> compiler, particularly function as argument:
>
> program FunctionArgumentDemo;
>
> function Square(x: integer): integer;
> begin
>   Square := x * x
> end;
>
> function Cube(x: integer): integer;
> begin
>   Cube := x * x * x
> end;
>
> function Apply(function f(x: integer): integer;
>                value: integer): integer;
> begin
>   Apply := f(value)
> end;
>
> begin
>   writeln(Apply(Square, 5));
>   writeln(Apply(Cube, 3))
> end.
>
> # pi -s arg.p
>      1  program FunctionArgumentDemo;
> E ----------------------------------^--- Expected '('
>     13      function Apply(function f(x: integer): integer;
> e -----------------------------------^--- Replaced '(' with a ','
> E 13 - Procedure/function parameters not implemented
>
> Which is reasonable, turbo pascal 3 didn't have function arguments, 
> but Standard Pascal iso 7185 supports it... I want it :).
>
> So, my question is, does this ring a bell for anyone? ChatGPT seems to 
> think that a VAX 4.1 might be in use around the '82-'85 timeline of 
> the 1st and 2nd edition.
>
> Cooper references quite a rarified list of folks in the preface to the 
> 82 edition, so I'm inclined to think he had access to what was current 
> at Berkeley at the time (he calls McKusick one of the "Kompiler Kids").
>


More information about the TUHS mailing list