Pascal 8000 (AAEC)

Pascal 8000 (otherwise known as AAEC Pascal, for the agency that sponsored its development) is a Pascal Compiler for the IBM/370 mainframe computer on the MVS Operating System created by the Australian Atomic Energy Commission (AAEC). Developed in 1978, it handles Standard Pascal with a few minor enhancements. The compiler, as was common practice at the time, Provides:

• Multiple error detection for source errors, where when an error is detected, it points out where in the source code where it happens, and then skips over the error t the next best point to continue scanning for more possible errors.
• If requested through a compiler switch, will warn if using any non-standard features.
• Creates a formatted listing o the program, with a block checker (increments by 1 at a BEGIN statement, decrements by 1 at an END statement.
• Offers an optional non-standard LOOP/END construct, providing an endless loop until explicitly exited by the EXIT pseudo-procedure. The construct is the functional equivalent of REPEAT ... UNTIL FALSE.
• Offers an optional predeclared array initialization through a VALUE declaration section, coming after the VAR section.

The entire compiler, sources and binaries, is available on GitHub at https://github.com/electric-socket/pascal8000. The program can be considered abandonware, as the Australian Atomic Energy Commission no longer exists.