ALGOL 68C#The ENVIRON and USING clauses
{{cleanup reorganize|date=July 2016}}
{{refimprove|date=August 2012}}
{{Infobox software
| name = ALGOL 68 Cambridge
| developer = Stephen Bourne, Michael Guy, Andrew D. Birrell, Ian Walker, Chris Cheney, et al.
| released = circa {{Start date and age|1970}}
| latest release version = 1.3039
| latest release date = {{Start date and age|2013|03|03}}
| programming language = ALGOL 68
| operating system = IBM 360, 370, etc., mainframes (or emulations) running MVT or MVS
| genre = Compiler, translator
| website = {{URL|bitbucket.org/algol68c/dl}}
}}
ALGOL 68C is an imperative computer programming language, a dialect of ALGOL 68, that was developed by Stephen R. Bourne and Michael Guy to program the Cambridge Algebra System (CAMAL). The initial compiler was written in the Princeton Syntax Compiler (PSYCO, by Edgar T. Irons) that was implemented by J. H. Mathewman at Cambridge.
ALGOL 68C was later used for the CHAOS OS for the capability-based security CAP computer at University of Cambridge in 1971. Other early contributors were Andrew D. Birrell{{cite web |url=http://birrell.org/andrew/papers/thesis.pdf |title=System Programming in a High Level Language |last=Birrell |first=Andrew D. |date=December 1977 |format=PDF |work=Dissertation submitted for the degree of Doctor of Philosophy |publisher=University of Cambridge |access-date=2007-04-22}} and Ian Walker.
Subsequent work was done on the compiler after Bourne left Cambridge University in 1975. Garbage collection was added, and the code base is still running{{Clarify|date=February 2020}} on an emulated OS/MVT using Hercules.
The ALGOL 68C compiler generated output in ZCODE, a register-based intermediate language, which could then be either interpreted or compiled to a native executable. This ability to interpret or compile ZCODE encouraged the porting of ALGOL 68C to many different computing platforms. Aside from the CAP computer, the compiler was ported to systems including Conversational Monitor System (CMS), TOPS-10, and Zilog Z80.
Popular culture
A very early predecessor of this compiler was used by Guy and Bourne to write the first Game of Life programs on the PDP-7 with a DEC 340 display.{{cite web |url=http://www.aceware.iinet.net.au/acms/ItemDetail.asp?lngItemId=175 |title=Item Detail: Digital Equipment Corporation Model 340 |website=Australian Computer Museum Society (ACMS) |publisher=AceWare Web Hosting |access-date=2020-04-17 }}{{Dead link|date=March 2023 |bot=InternetArchiveBot |fix-attempted=yes }}
Various Liverpool Software Gazette issues detail the Z80 implementation. The compiler required about 120 KB of memory to run; hence the Z80's 64 KB memory is actually too small to run the compiler. So ALGOL 68C programs for the Z80 had to be cross-compiled from the larger CAP computer, or an IBM System/370 mainframe computer.
Algol 68C and Unix
Stephen Bourne subsequently reused ALGOL 68's if ~ then ~ else ~ fi
, case ~ in ~ out ~ esac
and for ~ while ~ do ~ od
clauses in the common Unix Bourne shell, but with in
's syntax changed, out
removed, and od
replaced with done
(to avoid conflict with the od utility).
After Cambridge, Bourne spent nine years at Bell Labs with the Version 7 Unix (Seventh Edition Unix) team. As well as developing the Bourne shell, he ported ALGOL 68C to Unix on the DEC PDP-11-45 and included a special option in his Unix debugger Advanced Debugger (adb) to obtain a stack backtrace for programs written in ALGOL 68C. Here is an extract from the Unix 7th edition manual pages:{{cite web |url=http://modman.unixdev.net/?sektion=1&page=adb&manpath=v7man |title=The Modular Manual Browser: Adb |website=UnixDev.net |url-status=dead |archive-url=https://web.archive.org/web/20160303175742/http://modman.unixdev.net/?sektion=1&page=adb&manpath=v7man |archive-date=2016-03-03 |access-date=2020-04-17}}
NAME
adb - debugger
SYNOPSIS
adb [-w] [ objfil [ corfil ] ]
[...]
COMMANDS
[...]
$modifier
Miscellaneous commands. The available modifiers
are:
[...]
a ALGOL 68 stack backtrace. If address is
given then it is taken to be the address of
the current frame (instead of r4). If count
is given then only the first count frames
are printed.
ALGOL 68C extensions to ALGOL 68
Below is a sampling of some notable extensions:
- Automatic op:= for any operator, e.g.
*:=
and+:=
UPTO
,DOWNTO
andUNTIL
in loop-clauses;- displacement operator (
:=:=
) ANDF
,ORF
andTHEF
syntactic elements.- separate compilation -
ENVIRON
clause andUSING
clause - scopes not checked
- bounds in formal-declarers
CODE
...EDOC
clause - for embedding ZCODE
=The <code>ENVIRON</code> and <code>USING</code> clauses=
Separate compilation in ALGOL 68C is done using the ENVIRON
and USING
clauses. The ENVIRON
saves the complete environment at the point it appears. A separate module written starting with a USING
clause is effectively inserted into the first module at the point the ENVIRON
clause appears.
ENVIRON
and USING
are useful for a top-down style of programming, in contrast to the bottom-up style implied by traditional library mechanisms.
These clauses are kind of the inverse of the #include found in the C programming language, or import found in Python. The purpose of the ENVIRON
mechanism is to allow a program source to be broken into manageable sized pieces. It is only necessary to parse the shared source file once, unlike a #include found in the C programming language where the include file needs to be parsed for each source file that includes it.
==Example of <code>ENVIRON</code> clause==
A file called mylib.a68:
BEGIN
INT dim = 3; # a constant #
INT a number := 120; # a variable #
ENVIRON EXAMPLE1;
MODE MATRIX = [dim, dim]REAL; # a type definition #
MATRIX m1;
a number := ENVIRON EXAMPLE2;
print((a number))
END
==Example of <code>USING</code> clause==
A file called usemylib.a68:
USING EXAMPLE2 FROM "mylib"
BEGIN
MATRIX m2; # example only #
print((a number)); # declared in mylib.a68 #
print((2 UPB m1)); # also declared in mylib.a68 #
ENVIRON EXAMPLE3; # ENVIRONs can be nested #
666
END
Restrictions to the language from the standard ALGOL 68
- No ALGOL 68 FLEX and variable length arrays
MODE STRING
implemented without FLEX- The PAR parallel clause was not implemented
- Nonstandard transput
- others...
A translator–compiler for ALGOL 68C was available for the PDP-10, IBM System/360 and several other computers.
References
{{cite magazine |magazine=Scientific American |number=223 |date=October 1970 |pages=120–123 |title=The fantastic combinations of John Conway's new solitaire game "life" |department=Mathematical Games |first=Martin |last=Gardner |url=https://web.stanford.edu/class/sts145/Library/life.pdf |quote=For long-lived populations such as this one Conway sometimes uses a PDP-7 computer with a screen on which he can observe the changes [...] The program was written by M. J. T. Guy and S. R. Bourne. Without its help some discoveries about the game would have been difficult to make.}}
External links
- {{Official website|bitbucket.org/algol68c/dl}}
- [https://web.archive.org/web/20050724183114/http://hopl.murdoch.edu.au/showlanguage.prx?exp=667 Cambridge ALGOL 68: on the historical roster of computer languages] – includes 10+ publication references.
- [http://portal.acm.org/ft_gateway.cfm?id=807148&type=pdf A Transportation of ALGOL 68C – PJ Gardner, University of Essex] – March 1977 (From 370 to DECsystem-10)
- [https://jmvdveer.home.xs4all.nl/en.post.algol-68-mvs.html Running ALGOL 68C on MVS] - how to install ALGOL 68C on an emulated MVS system
{{ALGOL programming}}
{{DEFAULTSORT:Algol 68c}}