diff --git a/components/jitclasses/demo/unit1.pas b/components/jitclasses/demo/unit1.pas
index 7b7d68f5fc..1b7e64f173 100644
--- a/components/jitclasses/demo/unit1.pas
+++ b/components/jitclasses/demo/unit1.pas
@@ -267,20 +267,12 @@ begin
 end;
 
 type
-   tmethodnamerec =
-{$ifndef FPC_REQUIRES_PROPER_ALIGNMENT}
-   packed
-{$endif FPC_REQUIRES_PROPER_ALIGNMENT}
-   record
+   tmethodnamerec = packed record
       name : pshortstring;
       addr : codepointer;
    end;
 
-   tmethodnametable =
-{$ifndef FPC_REQUIRES_PROPER_ALIGNMENT}
-   packed
-{$endif FPC_REQUIRES_PROPER_ALIGNMENT}
-   record
+   tmethodnametable = packed record
      count : dword;
      entries : packed array[0..0] of tmethodnamerec;
    end;
diff --git a/designer/jitforms.pp b/designer/jitforms.pp
index 7ce7f85b72..9121c8336a 100644
--- a/designer/jitforms.pp
+++ b/designer/jitforms.pp
@@ -382,20 +382,12 @@ const
 type
   // these definitions are copied from typinfo.pp
 
-  TMethodNameRec =
-{$ifndef FPC_REQUIRES_PROPER_ALIGNMENT}
-  packed
-{$endif FPC_REQUIRES_PROPER_ALIGNMENT}
-  record
+  TMethodNameRec = packed record
     Name : PShortString;
     Addr : Pointer;
   end;
 
-  TMethodNameTable =
-{$ifndef FPC_REQUIRES_PROPER_ALIGNMENT}
-  packed
-{$endif FPC_REQUIRES_PROPER_ALIGNMENT}
-  record
+  TMethodNameTable = packed record
     Count : DWord;
     // for runtime range checking it is important to give a range
     Entries : packed array[0..1000000] of TMethodNameRec;
diff --git a/lcl/widgetset/wslclclasses.pp b/lcl/widgetset/wslclclasses.pp
index 0df9df10fd..919c4a7469 100644
--- a/lcl/widgetset/wslclclasses.pp
+++ b/lcl/widgetset/wslclclasses.pp
@@ -204,20 +204,12 @@ begin
 end;
 
 type
-  TMethodNameTableEntry =
-{$ifndef FPC_REQUIRES_PROPER_ALIGNMENT}
-  packed
-{$endif FPC_REQUIRES_PROPER_ALIGNMENT}
-  record
+  TMethodNameTableEntry = packed record
       Name: PShortstring;
       Addr: Pointer;
     end;
 
-  TMethodNameTable =
-{$ifndef FPC_REQUIRES_PROPER_ALIGNMENT}
-  packed
-{$endif FPC_REQUIRES_PROPER_ALIGNMENT}
-  record
+  TMethodNameTable = packed record
     Count: DWord;
     Entries: packed array[0..9999999] of TMethodNameTableEntry;
   end;