PL360

{{Infobox programming language

| name = PL360

| logo =

| logo caption =

| screenshot =

| screenshot caption =

| paradigms = Procedural, imperative, structured

| family = Wirth ALGOL

| designer = Niklaus Wirth,
Joseph W. Wells Jr.,
Edwin Satterthwaite Jr.

| developer = Stanford University

| released = {{Start date and age|1966}}

| latest release version =

| latest release date =

| typing = Static, strong

| scope = Lexical (static)

| programming language = ALGOL, then PL360

| discontinued = Yes

| platform = Burroughs B5000, IBM System/360

| operating system =

| license =

| file ext =

| file format =

| website =

| implementations =

| dialects =

| influenced by = ALGOL, Executive Systems Problem Oriented Language (ESPOL)

| influenced = ALGOL W

}}

PL360 (or PL/360) is a system programming language designed by Niklaus Wirth and written by 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.{{cite journal |last=Wirth |first=Niklaus |author-link=Niklaus Wirth |date=January 1968 |title=PL360, a Programming Language for the 360 Computers |journal=Journal of the ACM |volume=15 |issue=1 |pages=34–74 |doi=10.1145/321439.321442 |doi-access=free |s2cid=7376057}}

Description

PL/360 is a one-pass compiler with a syntax similar to ALGOL that provides facilities for specifying exact machine code (language) instructions and registers similar{{efn|But lacking facilities for implicit addressability, e.g., USING}} to assembly language, but also provides features commonly found in high-level programming languages, such as complex arithmetic expressions and control structures. Wirth used PL360 to create ALGOL W.

Data types are:{{cite tech report

|title=A Programming Language for the 360 Computers

|id=CS33

|last1=Wirth

|first1=Niklaus

|author-link=Niklaus Wirth

|date=December 24, 1965

|publisher=Stanford University

|url=http://bitsavers.org/pdf/stanford/cs_techReports/CS33_Wirth_PL360_Dec65.pdf

}}{{rp|8}}

  • Byte or character – 1 byte
  • Short integer – 2 bytes, interpreted as an integer in two's complement binary notation
  • Integer or logical – 4 bytes, interpreted as an integer in two's complement binary notation
  • Real – 4 bytes, interpreted as a base-16 (hexadecimal) short floating-point arithmetic number
  • Long real – 8 bytes, interpreted as a base-16 long floating-point number

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{{Clarify|date=December 2023|reason=The nomenclature in the table is unclear.}} are:

class="wikitable"
definitionreference
UNPK(10,#F300)UNPK(3,7,B2,worker)
EX(2,#4400)EX(R1,MVC(0,lines,buffer))note 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(FLAG);

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 core memory-based B5000 with drum storage to a core memory-based B5500 with disk storage.

Since the target IBM S/360 (which was to replace an existing IBM 7090) was not installed until 1967, the initial implementation of PL360 was written in ALGOL and tested on Stanford's B5500.{{cite web |title=Notes on Construction of Subsystems within Operating System/360 |last=Satterthwaite |first=E. |date=March 1968 |id=CGTM #43 |page=1 |url=https://www.slac.stanford.edu/vault/collvault/greylit/cgtm/CGTM43.pdf}} Once working, the compiler was then recoded in PL360, recompiled on the Burroughs system, and moved as a binary file to the S/360.{{rp|page=66}}

The B5500 is programmed in a high-level ALGOL-derived language Executive Systems Problem Oriented Language (ESPOL), 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 Stanford Physics Information Retrieval System (SPIRES), Stanford's Database Management System.

See also

Notes

{{Notelist}}

References

{{Reflist}}