|
@@ -309,9 +309,11 @@ implementation
|
|
|
end;
|
|
|
{ Default enum packing for delphi/tp7 }
|
|
|
if (m_tp7 in aktmodeswitches) or
|
|
|
- (m_delphi in aktmodeswitches) or
|
|
|
- (m_mac in aktmodeswitches) then
|
|
|
+ (m_delphi in aktmodeswitches) then
|
|
|
aktpackenum:=1
|
|
|
+ else if (m_mac in aktmodeswitches) then
|
|
|
+ { compatible with Metrowerks Pascal }
|
|
|
+ aktpackenum:=2
|
|
|
else
|
|
|
aktpackenum:=4;
|
|
|
if changeinit then
|