File fix_hashtab.patch of Package ftnchek

Allow for more than 255 intrinsics, at the moment ~400 intrinsics
are defined. Surplus intrinsics were simply ignored before this change.

--- ftnchek/intrins.c.orig	2020-10-28 15:12:22.809795776 +0100
+++ ftnchek/intrins.c	2020-10-28 15:13:14.732856103 +0100
@@ -712,9 +712,9 @@ PROTO( PRIVATE void set_intrinsic_numarg
 PROTO(PRIVATE unsigned long kwd_hash,( const char *s ));
 
 
-#define EMPTY 255
+#define EMPTY 65535
 
-PRIVATE unsigned char intrins_hashtab[INTRINS_HASHSZ];
+PRIVATE unsigned short intrins_hashtab[INTRINS_HASHSZ];
 
 /*    init_intrins_hashtab:
                  Initializes the intrinsic hash table by clearing it to EMPTY
openSUSE Build Service is sponsored by