From: Ramine <toto@toto.net>
Subject: I have a question about FreePascal..
Hello,
I want to port this function from Delphi to FreePascal,
the {$IfOpt O+} doen't seem to work in FreePascal:
function CompilerOptimizationS: String;
begin
Result:= 'Compiler optimization is ' +
{$IfOpt O+}
'enabled'
{$Else}
'disabled'
{$EndIf}
end;
Thank you,
Amine Moulay Ramdane.
--- ViaMAIL!/WC v2.00
* Origin: Neptune's Lair II ■ Olive Branch MS ■ winserver.org:232 (1:261/20)
|