diff --git a/rtl/objpas/sysutils/sysansi.inc b/rtl/objpas/sysutils/sysansi.inc
index 193ecc3095..f99eb7b196 100644
--- a/rtl/objpas/sysutils/sysansi.inc
+++ b/rtl/objpas/sysutils/sysansi.inc
@@ -100,7 +100,7 @@ begin
   Result[0]:=Byte(Val);
 end;
 
-Function CharInSet(Ch:AnsiChar;Const CSet : TSysCharSet) : Boolean;
+Function CharInSet(Ch:AnsiChar;Const CSet : TSysCharSet) : Boolean; inline;
 begin
   result:=ch in CSet;
 end;
diff --git a/rtl/objpas/sysutils/sysansih.inc b/rtl/objpas/sysutils/sysansih.inc
index 41cb8e7353..1bfa5df273 100644
--- a/rtl/objpas/sysutils/sysansih.inc
+++ b/rtl/objpas/sysutils/sysansih.inc
@@ -24,4 +24,4 @@ function HashName(Name: PAnsiChar): LongWord;
 function BytesOf(const Val: RawByteString): TBytes;
 function BytesOf(const Val: AnsiChar): TBytes;
 
-Function CharInSet(Ch: AnsiChar;Const CSet : TSysCharSet) : Boolean;
+Function CharInSet(Ch: AnsiChar;Const CSet : TSysCharSet) : Boolean; inline;
diff --git a/rtl/objpas/sysutils/sysutils.inc b/rtl/objpas/sysutils/sysutils.inc
index 6b7a46e3b2..3e07625e62 100644
--- a/rtl/objpas/sysutils/sysutils.inc
+++ b/rtl/objpas/sysutils/sysutils.inc
@@ -12,6 +12,10 @@
 
  **********************************************************************}
 
+  { MCBS functions }
+  {$i sysansi.inc}
+  {$i syscodepages.inc}
+
 {$macro on}
 {$define PathStr:=UnicodeString}
 {$define PathPChar:=PWideChar}
@@ -161,10 +165,6 @@ end;
   { generic internationalisation code }
   {$i sysint.inc}
 
-  { MCBS functions }
-  {$i sysansi.inc}
-  {$i syscodepages.inc}
-
   { wide string functions }
   {$i syswide.inc}