LINUX.ORG.RU

История изменений

Исправление madcore, (текущая версия) :

Ты меня заинтриговал. Накотил фрипаскаль и посмотрел результат:

$> fpc hell.pas
Free Pascal Compiler version 2.6.4 [2018/04/06] for x86_64
Copyright (c) 1993-2014 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling hell.pas
Linking hell
/usr/bin/ld: warning: link.res contains output sections; did you forget -T?
8 lines compiled, 0.1 sec 
$> ./hell 
x=1 b(x)=TRUE
x=256 b(x)=FALSE
x=65536 b(x)=FALSE
x=16777216 b(x)=FALSE

Вероятно, все дело в том, что дельфи работает неправильно :)
Но fpc поступает тоже непоследовательно: берет первые 8 бит и сравнивет с нулем.

Исходная версия madcore, :

Ты меня заинтриговал. Накотил фрипаскаль и посмотрел результат:

$> fpc hell.pas
Free Pascal Compiler version 2.6.4 [2018/04/06] for x86_64
Copyright (c) 1993-2014 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling hell.pas
Linking hell
/usr/bin/ld: warning: link.res contains output sections; did you forget -T?
8 lines compiled, 0.1 sec 
$> ./hell 
x=1 b(x)=TRUE
x=256 b(x)=FALSE
x=65536 b(x)=FALSE
x=16777216 b(x)=FALSE

Вероятно, все дело в том, что дельфи работает неправильно :)
Но fpc поступает тоже непоследовательно: если результат влезает в 8 бит, то true.