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.
Sysop: | digital man |
---|---|
Location: | Riverside County, California |
Users: | 1,049 |
Nodes: | 15 (1 / 14) |
Uptime: | 97:13:43 |
Calls: | 235,753 |
Calls today: | 3 |
Files: | 60,336 |
D/L today: |
208 files (567M bytes) |
Messages: | 20,616,130,553 |
Posted today: | 3 |