- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
function assemble(var w:word;s:string):boolean;
.....
else if length(cmd)=3 then
begin
{ТРЕХБУКВЕННЫЕ КОМАНДЫ}
case cmd[1] of
'a':case cmd[2] of
'c':if cmd[3]='i' then
begin
code:=$ce;
typ:=7;
end;
'd':case cmd[3] of
'd':begin
code:=$80;
typ:=4;
end;
'c':begin
code:=$88;
typ:=4;
end;
'i':begin
code:=$c6;
typ:=7;
end;
end;
..... еще 500 подобных строк ....
end;
Прочитал http://govnokod.ru/10002 и вспомнил, как когда-то писал асм\дизасм\эмуль для 8080 на паскале.
Сейчас бы не хватило, а тогда терпения было не занимать...
Под маркой Borland Pascal вышел полный комплект Turbo Pascal 7.0, включающий поддержку сразу трёх платформ (DOS, DPMI 16 бит, Windows 3.x). Других BP не было. Был ещё BP 7.01, но это был апдейт, исправляющий некоторые баги.
Турбо Паскаль до версии 4.0 включительно не поддерживал модули (unit), поддерживал модель памяти tiny и генерировал COM-файлы. На Borland Pascal он был несильно похож. Даже ООП появилось то ли в пятой, то ли в шестой версии.
А вот у досовской сишки версия 3.1 была распространена.
Точнее, это был компилятор с внутренней версией 7.9 — Delphi 1.0 alpha с пиратского диска (у альфы и у 1.0 был разный номер версии в tpu-файлах), но всем пофиг.
Но в то же время я наткнулся на графические форки Турбовижен для TP, поэтому к Бейсику не вернулся.
Кстати, про ДОС. На сайте http://www.softwareuno.com/ можно найти упоминания библиотеки MEWEL, с помощью которой можно было быстро портировать приложения Win 3.x на ДОС. К сожалению, скачать эту библиотеку нигде не смог.
а как же была реализована стандартная библиотека?
TPU появились только в пятом Турбо Паскале. Вру, в четвёртом. В TP 4.0 сигнатура была TPU0 — самая первая версия TPU.
Это для TP 4.0 была сторонняя программа TPU2OBJ, которой можно было делать обж-файлы. А в третьем не было никаких OBJ и никаких Unit.
Только потом динамическая память, сборка мусора, замыкания и изоляция имени испортили меня. Помню, не так давно питон причинил мне боль, не позволив создать анонимную функцию.
______________________
* Хотя, кто знает, может Борманд всё сразу знал.
https://wiki.c2.com/?BlubParadox
I know an otherwise extremely talented programmer who can't see the value of garbage collection and thinks it simply encourages "lazy programming"`
>>
ну, я
Вот например у прыща socket это сискол, а у винды WinSock ходит в устройство типа \Device\AFD и туда срет.
Что мешало в прыще вместо socketа открывать /dev/tcp, например?
Не пришлось бы sockfs пилить чтобы уметь read/write.
Извини, что я wake you up from the fine nap, но ты же понимаешь, что никто мне больше не овтетит?
куууик
Линукс же вообще монолитом был изначально, но уже с сетью. Поэтому сисколлы.
А отдельные девайсы под такие фичи это уже закос под модульность и микроядро.
> 14.08.2020 00:06
Какая скорость )))
11 часов разницы с Москау
- ты можешь сменить десять ников, но твой парфюм тебя всё равно выдаст
Так шо я уже не знаю, что там и как Страйкер возвращает
Или ты про саму апиху?
>18.09.2019 15:16
>13.08.2020 23:06
>14.08.2020 00:06
не вижу ДВ, вижу +1, это Волгоград или Самара.
Gost, иди сюда, я знаю твою локацию.