RY
А компилятор обрабатывая лишнюю строку сожжет больше электричества, да
дак еще и программа каждый раз при работе будет больше требовать ресурсов.
экономия должна быть экономной
Size: a a a
2020 October 24
RY
Ну теперь мне стыдно
SB
у меня вглазах рябит иной раз из-за кучи кода, потому мне просто приходится делать типа:
with ainfo.Entries[i].Files[j] do
begin
checksum:=memReadDWord(aptr);
ftype :=memReadByte (aptr);
name :=memReadShortString(aptr);
offset :=memReadDWord(aptr);
size_s :=memReadDWord(aptr);
if (ainfo.ver=verTL2) or (ainfo.ver=verTL2Mod) then
begin
ftime:=QWord(memReadInteger64(aptr));
end;
end;
Такой код удобно оформить как (вложенную) процедуру, оно и проще и читабельнее будет.
AK
Сергей, я делал как мне было удобнее, исходя из итераций циклов в частности
SB
Сергей, я делал как мне было удобнее, исходя из итераций циклов в частности
Ну дык. ReadItem(ainfo.Entries[i].Files[j);
AK
не катит
6А
Раз паскаль от Алгола, по почему в паскале нету тернарного оператора ?
http://www.ada-auth.org/standards/12rat/html/Rat12-3-2.html
Z := if X = Y then P else Q fi;
http://www.ada-auth.org/standards/12rat/html/Rat12-3-2.html
Z := if X = Y then P else Q fi;
AK
потому как пришлось бы передавать и просто ainfo и aptr как минимум
AK
Раз паскаль от Алгола, по почему в паскале нету тернарного оператора ?
http://www.ada-auth.org/standards/12rat/html/Rat12-3-2.html
Z := if X = Y then P else Q fi;
http://www.ada-auth.org/standards/12rat/html/Rat12-3-2.html
Z := if X = Y then P else Q fi;
наверное, потому что паскаль - не алгол
6А
Но конструкции используются те же, в большинстве. Может создатели просто не знали про тернарный оператор?
AK
а почему в Обероне убрали цикл FOR, ведь в паскале и модуле он был?
AK
а почему в оберон-2 его вернули, ведь в обероне его не было?
AK
потому что это другой язык, не обязанный копировать своего предка 1 в 1
6А
Ммм вкусняшка with
SB
потому как пришлось бы передавать и просто ainfo и aptr как минимум
Если это вложенная процедура, то ей доступен контекст и локальные переменные. Может даже переменные цикла доступны, не уверен. По сути, тот же with только с именем и в отдельном блоке.
6А
а почему в оберон-2 его вернули, ведь в обероне его не было?
Лень, и потом такие - народ гневается. И добавили.
AK
не люблю локальные процедуры делать из-за стеков как раз, только в случае реальной необходимости
AK
нет, дело не в лени. если почитать историю языков, там причина указывается
SB
не люблю локальные процедуры делать из-за стеков как раз, только в случае реальной необходимости
Делай inline, вдруг прокатит =)