XPL

[vak]

Был в 70-е годы такой язык программирования: XPL. Вовсе не вариант PL/I, как кое-где заявляется, а вполне самостоятельный язык, на котором было написано много системного софта. В 1971 году вышла книжка "A Compiler Generator", рассказывающая, как писать компиляторы на примере XPL - один из первых учебников на эту тему. В частности, на XPL был написан компилятор с языка HAL/S для НАСА. Тогда практически весь софт для американского космоса писался на HAL/S, в частности для Шаттла.

Компилятор XPL имеется здесь: https://sourceforge.net/projects/xpl-compiler/
Преобразует код XPL в язык Си. Вполне нормально работает на маке и Линуксе.

В качестве примера приведу реализацию утилиты /bin/echo на XPL:

if argc < 2 then do;
    output = 'No args.';
    return 1;
end;

declare i fixed;
declare s character;
do i = 1 to argc - 1;
    if i > 1 then
        s = s || ' ';
    s = s || argv(i);
end;
output = s;

return 0;
eof