File advance.c.patch of Package ftnchek

Struct pos was partly uninitialized.

--- ftnchek/advance.c.orig	2013-07-24 21:00:39.000000000 +0200
+++ ftnchek/advance.c	2020-06-18 01:39:18.148642086 +0200
@@ -3225,6 +3225,9 @@ int search_for_internal(const char *name
   srcPosn pos;
   Gsymtab *host_gsymt;
 
+  pos.Line = NULL;
+  pos.idx = -1;
+
   /* Internal subprograms cannot have CONTAINS of their own, so skip
      case (1) if context is call from internal subprogram.
    */