Browse Source

Revert "* move Boolean helpers before the ordinal ones so that ToOneZeroString can be inlined correctly"

This reverts commit 9ad4acc8bd281ce89d28da3450d5cdabdc8f07d4.
marcoonthegit 1 year ago
parent
commit
dc294ac082
1 changed files with 33 additions and 34 deletions
  1. 33 34
      packages/rtl-objpas/src/inc/syshelpers.pp

+ 33 - 34
packages/rtl-objpas/src/inc/syshelpers.pp

@@ -247,40 +247,6 @@ end;
 //////////////////////
 
 
-{ ---------------------------------------------------------------------
-  TBooleanSysHelper
-  ---------------------------------------------------------------------}
-
-{$define TBOOLHELPER:=TBooleanSysHelper}
-{$define TBOOLTYPE:=Boolean}
-{$i syshelpersb.inc}
-
-{ ---------------------------------------------------------------------
-  TByteBoolSysHelper
-  ---------------------------------------------------------------------}
-
-{$define TBOOLHELPER:=TByteBoolSysHelper}
-{$define TBOOLTYPE:=ByteBool}
-{$i syshelpersb.inc}
-
-{ ---------------------------------------------------------------------
-  TWordBoolSysHelper
-  ---------------------------------------------------------------------}
-
-{$define TBOOLHELPER:=TWordBoolSysHelper}
-{$define TBOOLTYPE:=WordBool}
-{$i syshelpersb.inc}
-
-{ ---------------------------------------------------------------------
-  TLongBoolSysHelper
-  ---------------------------------------------------------------------}
-
-
-{$define TBOOLHELPER:=TLongBoolSysHelper}
-{$define TBOOLTYPE:=LongBool}
-{$i syshelpersb.inc}
-
-
 { ---------------------------------------------------------------------
   TByteSysHelper
   ---------------------------------------------------------------------}
@@ -375,5 +341,38 @@ end;
 {$define TORDINALNIBBLEINDEX:=TNativeUIntNibbleIndex}
 {$i syshelperso.inc}
 
+{ ---------------------------------------------------------------------
+  TBooleanSysHelper
+  ---------------------------------------------------------------------}
+
+{$define TBOOLHELPER:=TBooleanSysHelper}
+{$define TBOOLTYPE:=Boolean}
+{$i syshelpersb.inc}
+
+{ ---------------------------------------------------------------------
+  TByteBoolSysHelper
+  ---------------------------------------------------------------------}
+
+{$define TBOOLHELPER:=TByteBoolSysHelper}
+{$define TBOOLTYPE:=ByteBool}
+{$i syshelpersb.inc}
+
+{ ---------------------------------------------------------------------
+  TWordBoolSysHelper
+  ---------------------------------------------------------------------}
+
+{$define TBOOLHELPER:=TWordBoolSysHelper}
+{$define TBOOLTYPE:=WordBool}
+{$i syshelpersb.inc}
+
+{ ---------------------------------------------------------------------
+  TLongBoolSysHelper
+  ---------------------------------------------------------------------}
+
+
+{$define TBOOLHELPER:=TLongBoolSysHelper}
+{$define TBOOLTYPE:=LongBool}
+{$i syshelpersb.inc}
+
 end.