sizeof(Enumerated type in Delphi 5) sizeof(The same type in FPC)

2 messages · 2 people · 9-30-2013

Read-only archive. Use j and k to move between messages.

In Delphi 5,
  var
   G  : TAutoRefreshFlag;
//where type TAutoRefreshFlag = (arNone, arAutoInc, arDefault);

sizeof(G) returns 1

in FPC
if defined

   type TAutoRefreshFlag = (arNone, arAutoInc, arDefault);

and same
   Var G : TAutoRefreshFlag;

sizeof(G) returns 4.

This different behaviour break some code when I port them from Delphi 5 to FPC.

Is there a compiler directive I can do to ensure compatibility?

Dennis

Dennis Poon wrote 7 lines

In Delphi 5, var G : TAutoRefreshFlag; //where type TAutoRefreshFlag = (arNone, arAutoInc, arDefault); sizeof(G) returns 1

[snip]

This different behaviour break some code when I port them from Delphi 5 to FPC. Is there a compiler directive I can do to ensure compatibility?

{$mode delphi}
Or, if you want to have that behaviour in an FPC mode, {$z1} or
{$packenum 1}

Jonas

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.