[fpc-pascal] Can you knock my socks off ? Can you mimic Skybuck's/Delphi's Major Breakthrough for code path and memory structure selection ?

[Skybuck Flying]

It's not really a problem so far it seems.

Simply replace record with object and it will work and compile at least in 
Delphi.

I haven't tried FPC yet... but if it wouldn't compile that would be amazing 
and a problem.

None the less, the example remains interesting.

It describes a general problem:

How to switch between data structures/layouts and still use more or less the 
same code,  could be different code underwater, for the programmer it must 
look the same.

The example does just that. It always the programmer to work with 64 bit 
integers, and finally it can write them and read them as any other kind of 
integer or data structure.

So concept is:

1. Work internally with 64 bit integers.

2. Use bitmode to switch to something else on reading and writing.

Might give the programmers of free pascal maybe an idea for the future for 
some kind of language extension lol.

I am not counting on it... but who knows :)

I shall give a little example to give a better idea:

Tstructure1 = record
    blablabla
end;

Tstructure2 =
    bla
    blablabla
    bla
end;

TstructureType = ( Tstructure1, Tstructure2 )

var
    SomeVariable : TstructureType;
    SomeStructure : SomeStructure?;

begin
    somevariable := Tstructure1;

    select somestructure based on somevariable do
    begin
        blablabla := 464; // structure1.blablabla
    end;
end;

Bye,
  Skybuck.