git-svn-id: trunk@28558 -
@@ -205,7 +205,7 @@ Type
id_InUse : Longint; { Flag, zero if not in use }
end;
-{$PACKRECORDS NORMAL}
+{$PACKRECORDS 2}
Const
@@ -45,6 +45,7 @@
[email protected]
}
{$I useamigasmartlink.inc}
{$ifdef use_amiga_smartlink}
@@ -18,6 +18,7 @@
registers and bits in the Complex Interface Adapter (CIA) chip
unit hardware;
INTERFACE
@@ -13,7 +13,7 @@
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
-
unit inputevent;
@@ -32,7 +32,7 @@
[email protected] Nils Sjoholm
{$smartlink on}
@@ -31,7 +31,7 @@
@@ -27,6 +27,7 @@
{$mode objfpc}
@@ -28,6 +28,7 @@
@@ -78,7 +78,7 @@ Type
fib_Reserved : Array [0..31] of Char;
FUNCTION Examine(lock : LONGINT; fileInfoBlock : pFileInfoBlock) : BOOLEAN;
BEGIN