Гы. Уши бага №27221 растут из версий 0.9x

[Cheb]

Вот такое вот "мне смертию кость угрожала."

Зачем добавили эту проверку? А низачем, это кривая копипаста из досовского кода когда Windows XP ещё не родилась.
И если посмотреть реальное говно мамонта (0.99.14, йо!), то всё становится ясно:

Код: Выделить всё

Procedure FileClose (Handle : Longint);

begin
  if Handle<=4 then
   exit;
  CloseHandle(Handle);
end;

и

Код: Выделить всё

Procedure FileClose (Handle : Longint);
var Regs: registers;
begin
  if Handle<=4 then
   exit;
Regs.Eax := $3e00;
Regs.Ebx := Handle;
RealIntr($21, Regs);
end;

Похожи, не?
Особенно та пустая строчка доставляет.

Добавлено спустя 17 минут 15 секунд:
Качать https://sourceforge.net/projects/freepa ... M/download
открывать .rpm файлО под виндою можно 7-Zip'ом

[Сквозняк]

А что, теперь у открытых программой файлов появилась рукоятка <5?

[Kemet]

При закрытии проверять не надо, CreateFile не вернет занятый handle

[Cheb]

А что, теперь у открытых программой файлов появилась рукоятка <5?

Если ты свою программу в вайне запускаешь из консоли, строчкой wine myexe.exe, то вполне могут попасться, и помрёт твоя программа резко хряпнувшись бесславно, и сгрызёшь себе все локти ты, гадая, почему.

Так я, собственно , на этот баг и напоролся: тестируя свой игровой движок в вайне.

Мораль: не предполагай, коли в документации не указано. By assuming you make an ass out of you and me.

[Python]

Хм... например, у ShellExecute есть такая фишечка, что сравнивать результат надо как <32, если нет желания сравнивать с КАЖДЫМ из возможных кодов ошибок. Так что не везде такой подход является вредным.