PL360


PL360 is a system programming language designed by Niklaus Wirth and written by Niklaus Wirth, Joseph W. Wells, Jr., and Edwin Satterthwaite, Jr. for the IBM System/360 computer at Stanford University. A description of PL360 was published in early 1968, although the implementation was probably completed before Wirth left Stanford in 1967.

Description

PL/360 is a one pass compiler with a syntax similar to Algol that provides facilities for specifying exact machine language instructions and registers similar to assembly language, but also provides features commonly found in high-level languages, such as complex arithmetic expressions and control structures. Wirth used PL360 to create Algol W.
Data types are:
Registers can contain integer, real, or long real.
Individual System/360 instructions can be generated inline using the PL360 "function statement" that defined an instruction by format and operation code. Function arguments were assigned sequentially to fields in the instruction. Examples are:
definitionreference
UNPKUNPK
EXEXnote nested reference

Example

R0, R1, and R2, and FLAG are predeclared names.

BEGIN INTEGER BUCKET;
IF FLAG THEN
BEGIN BUCKET := R0; R0 := R1; R1 := R2;
R2 := BUCKET;
END ELSE
BEGIN BUCKET := R2; R2 := R1; R1 := R0;
R0 := BUCKET;
END
RESET;
END

Implementation

Wirth was at Stanford between 1963 and 1967, during the earlier part of which he was developing his Euler compiler and interpreter, the sources of which are dated 1965. Also in 1965, Stanford updated their drum-based Burroughs B5000 to a disk-based B5500.
Since the target IBM S/360 was not installed until 1967, the initial implementation of PL360 was written in ALGOL and tested on Stanford's B5500. Once working, the compiler was then recoded in PL360 itself, recompiled on the Burroughs system, and moved as a binary to the S/360.
It is notable that the B5500 is itself programmed in a high-level ALGOL-derived language, and PL360 was intended to bring a comparable facility to the IBM mainframe architecture, although it was lacking major facilities of both Assembler F and ESPOL. This intent was largely ignored, with programmers continuing to use implementations of IBM's macro assemblers.
However, in the early 1970s, PL360 was extended to provide more capabilities, and was the programming language of choice for developing SPIRES, Stanford's Database Management System.