Паскаль-компилятор сошёлся

[spamsink]

После исправления последних ошибок, добавления поддержки юникода и имитации нетранзитивного бэсмовского сравнения полноразрядных слов на больше-меньше, объектный модуль, порождаемый сиплюсплюсным компилятором при компиляции паскалевского текста компилятора, в точности ("то есть абсолютно") совпадает с объектным модулем, порождаемым при компиляции паскалевского компилятора самим собой.

Теперь можно начинать развлекаться с тестами.

Comments

[spamsink]

А я чо, я ничо. Почти так же и в оригинале:

 PASCAL COMPILER 15.0 (15.02.82)
 00001    1  0 PROGRAM TEST(OUTPUT);
 00001    2  1 CONST
 ******62 HET ЦEЛOГO
 00001    3  1     RSCST = -84.22;
        *****                   0
 00001    4  2 BEGIN
 00002    5  2     WRITELN(’REAL154: ’, RSCST:15, ’ S/B -8.422000E+01’);
 00017    6  0 END.
 IN 6 LINES 1 ERRORS

Разве что надо понять, почему С++ раньше добегает до EOF, чем решает завершиться по END-точка.

[vak]

Он ждёт .DATA! Вот ведь неожиданность.

$ ./pascompl < fconst.pas 
 Pascal-Monitor in C++ (17.05.2019)
 00001    1  0 PROGRAM TEST(OUTPUT);
 00001    2  1 CONST
 ******62 Dunno 
 00001    3  1     RSCST = -84.22;
        *****                   0
 00001    4  2 BEGIN
 00002    5  2     WRITELN('REAL154: ', RSCST:15, ' S/B -8.422000E+01');
 00006    6  2 END
 00017    7  0 .DATA
 00017    8  0 END
 IN 8 LINES 1 ERRORS

Значит константы с плавающей точкой заносим в список нереализованных фичей.

[spamsink]

(Положительные) константы с плавающей точкой в выражениях отлично работают, потому что в компиляторе имеются.