[OK]Constant folding efficiency.

[Dany]

Hi,

Only for your info:

Apparently this code is compiled more efficient (less rom)

Code: Select all

const __HexOffset = Ord('A') - 10;
...
Tmp := Tmp + __HexOffset;

than this one:

Code: Select all

Tmp := Tmp + Ord('A') - 10;

Declaring "Ord('A') - 10" as an actual constant does the constant folding, using "Ord('A') - 10" directly in the code does not perform constant folding. Observed in the assembly code.

MicroPascal version 8.0.0.1, PIC = 16F628A.

[yo2lio]

Try this :

Code: Select all

Tmp := Tmp + (Ord('A') - 10);

[Dany]

Great. Thanks.