From 4d8af148643005b1b5fcd548d41b1a0b91a42bfc Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Wed, 12 Jul 2023 08:12:52 +0200
Subject: [PATCH] fcl-js: less hints

---
 packages/fcl-js/src/jssrcmap.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/packages/fcl-js/src/jssrcmap.pas b/packages/fcl-js/src/jssrcmap.pas
index 17b0d8a221..c5c3e0fef5 100644
--- a/packages/fcl-js/src/jssrcmap.pas
+++ b/packages/fcl-js/src/jssrcmap.pas
@@ -704,7 +704,7 @@ var
       buf.Write(s[1],length(s)*sizeof(char));
   end;
 
-  procedure AddChar(c: char);
+  procedure AddChar({%H-}c: char);
   begin
     buf.Write(c,sizeof(char));
   end;