diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2009-09-30 15:46:38 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2009-09-30 15:46:38 +0200 |
| commit | d76e9e6026285dd81ce85f169dafbfacec0d3a49 (patch) | |
| tree | db35c3ab7f777061991be7757085234d1103baf8 /src | |
| parent | d8df9780fc9d9c59eeae533299c51142350f2711 (diff) | |
| download | fpGUI-d76e9e6026285dd81ce85f169dafbfacec0d3a49.tar.xz | |
Change arrays to packed arrays.
Signed-off-by: Graeme Geldenhuys <graeme@mastermaths.co.za>
Diffstat (limited to 'src')
| -rw-r--r-- | src/DataTypes.pas | 8 | ||||
| -rw-r--r-- | src/HelpTopic.pas | 2 |
2 files changed, 5 insertions, 5 deletions
diff --git a/src/DataTypes.pas b/src/DataTypes.pas index 9c029193..5ac9e8aa 100644 --- a/src/DataTypes.pas +++ b/src/DataTypes.pas @@ -20,10 +20,10 @@ type pInt8 = ^byte; ULong = Cardinal; - PCharArray = array[ 0..0 ] of PCHar; - Int32Array = array[ 0..0 ] of Int32; - Int16Array = array[ 0..0 ] of Int16; - Int8Array = array[ 0..0 ] of Int8; + PCharArray = packed array[ 0..0 ] of PCHar; + Int32Array = packed array[ 0..0 ] of Int32; + Int16Array = packed array[ 0..0 ] of Int16; + Int8Array = packed array[ 0..0 ] of Int8; PCharArrayPointer = ^PCharArray; Int32ArrayPointer = ^Int32Array; diff --git a/src/HelpTopic.pas b/src/HelpTopic.pas index 10b22161..3f29bf69 100644 --- a/src/HelpTopic.pas +++ b/src/HelpTopic.pas @@ -39,7 +39,7 @@ Type end; pHelpTopicSlot = ^ THelpTopicSlot; - SlotArray = array[ 0..0 ] of THelpTopicSlot; + SlotArray = packed array[ 0..0 ] of THelpTopicSlot; pSlotArray = ^SlotArray; |