diff --git a/components/codetools/keywordfunclists.pas b/components/codetools/keywordfunclists.pas
index 9c90f698f9..58ba0880aa 100644
--- a/components/codetools/keywordfunclists.pas
+++ b/components/codetools/keywordfunclists.pas
@@ -809,7 +809,7 @@ begin
     Add('FINALLY',{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('FOR',{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('FUNCTION',{$ifdef FPC}@{$endif}AllwaysTrue);
-    Add('GENERIC',{$ifdef FPC}@{$endif}AllwaysTrue);
+    //Add('GENERIC',{$ifdef FPC}@{$endif}AllwaysTrue); can be used as identifier
     Add('GOTO',{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('IF',{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('IMPLEMENTATION',{$ifdef FPC}@{$endif}AllwaysTrue);
diff --git a/components/h2pas/h2pasconvert.pas b/components/h2pas/h2pasconvert.pas
index 2e90effe14..d525c2335f 100644
--- a/components/h2pas/h2pasconvert.pas
+++ b/components/h2pas/h2pasconvert.pas
@@ -4289,7 +4289,7 @@ var
     Identifier:=@Tool.Src[Position+Count];
     AVLNode:=NeededPointerTypes.FindKey(Identifier,
                                         @CompareImplicitTypeStringAndName);
-    //DebugLn(['AddNeededPointerType ',GetIdentifier(Identifier),' Position=',Position,' Count=',Count]);
+    DebugLn(['AddNeededPointerType ',GetIdentifier(Identifier),' Position=',Position,' Count=',Count]);
     if AVLNode<>nil then begin
       Item:=TImplicitType(AVLNode.Data);
       if Item.MaxPosition<Count then