diff --git a/.gitattributes b/.gitattributes
index 1705a7d195..3bd8dc0488 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -16380,6 +16380,7 @@ tests/webtbf/tw36631b.pp svneol=native#text/pascal
 tests/webtbf/tw36652.pp svneol=native#text/pascal
 tests/webtbf/tw36720.pp svneol=native#text/pascal
 tests/webtbf/tw3680.pp svneol=native#text/plain
+tests/webtbf/tw36975.pp svneol=native#text/pascal
 tests/webtbf/tw3716.pp svneol=native#text/plain
 tests/webtbf/tw3738.pp svneol=native#text/plain
 tests/webtbf/tw3740.pp svneol=native#text/plain
diff --git a/compiler/pgenutil.pas b/compiler/pgenutil.pas
index e73f112fa9..57b69f2dc7 100644
--- a/compiler/pgenutil.pas
+++ b/compiler/pgenutil.pas
@@ -78,7 +78,7 @@ uses
   type
     tdeftypeset = set of tdeftyp;
   const
-    tgeneric_param_const_types : tdeftypeset = [orddef,stringdef,arraydef,floatdef,setdef,pointerdef,enumdef];
+    tgeneric_param_const_types : tdeftypeset = [orddef,stringdef,floatdef,setdef,pointerdef,enumdef];
     tgeneric_param_nodes : tnodetypeset = [typen,ordconstn,stringconstn,realconstn,setconstn,niln];
 
     function get_generic_param_def(sym:tsym):tdef;
diff --git a/tests/webtbf/tw36975.pp b/tests/webtbf/tw36975.pp
new file mode 100644
index 0000000000..ce3a43da36
--- /dev/null
+++ b/tests/webtbf/tw36975.pp
@@ -0,0 +1,10 @@
+{ %FAIL }
+program tw36975;
+
+{$mode objfpc}{$H+}
+type
+  generic TTest <T,const N:Tintegerarray> = class
+  end;
+
+begin
+end.