File 0001-Fix-incorrect-function-declarations.patch of Package cgx

From f1dc9eb1c78087abab7a8edc31087402df6df761 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Stefan=20Br=C3=BCns?= <stefan.bruens@rwth-aachen.de>
Date: Thu, 19 Feb 2026 02:47:01 +0100
Subject: [PATCH] Fix incorrect function declarations

The called functions are not extern, but
declared and defined in the same source file.
---
 src/improveMesh.c   | 7 -------
 src/pickFunktions.c | 1 -
 src/sendSet.c       | 1 -
 src/setFunktions.c  | 2 --
 4 files changed, 11 deletions(-)

diff --git a/src/improveMesh.c b/src/improveMesh.c
index eae211a..c7c921d 100755
--- a/src/improveMesh.c
+++ b/src/improveMesh.c
@@ -274,7 +274,6 @@ integer *ndiv, *node;
      /* was [3][3] */, d1, d2, d3, d4, etopt, xiopt;
     integer ii;
     doublereal et[9]	/* was [3][3] */, xi[9]	/* was [3][3] */;
-    extern /* Subroutine */ int distattach_();
     doublereal distmin;
 
 
@@ -695,12 +694,10 @@ integer *maxsumdiv, *ieltyp_frd, *n_ori;
     integer npec, node, npet, location, node1=0, node2=0, i__, j, l;
     doublereal x, y, z__;
     integer niter;
-    extern /* Subroutine */ int clasnodes_();
     doublereal dc, dd;
     integer ii;
     doublereal dx, dy, dz;
     doublereal n1[3], n2[3], nm[3];
-    extern /* Subroutine */ int attach_();
 
 
 /*     smoothes a mesh by means of a length weighted Laplacian */
@@ -932,12 +929,10 @@ integer *maxsumdiv, *ieltyp_frd, *n_ori;
     integer npec, node, npet, location, node1=0, node2=0, i__, j, l, k;
     doublereal x[30], y[30], z__[30];
     integer niter,j1,j2,j1max,j2max=0;
-    extern /* Subroutine */ int clasnodes_();
     doublereal dd[30];
     integer ii;
     doublereal dx, dy, dz, prod,prodmax;
     doublereal n1[3], n2[3], nm[3];
-    extern /* Subroutine */ int attach_();
 
     integer slave_node[100], iii;
 
@@ -1220,9 +1215,7 @@ integer *maxsumdiv, *ieltyp_frd, *n_ori;
     /* Local variables */
     integer ieltyp;
     integer npec, node, npet, node1=0, node2=0, i__, j, l;
-    extern /* Subroutine */ int clasnodes_();
     doublereal n1[3], n2[3], nm[3];
-    extern /* Subroutine */ int attach_();
 
     integer iii;
 
diff --git a/src/pickFunktions.c b/src/pickFunktions.c
index b61ab6e..7ab56cb 100755
--- a/src/pickFunktions.c
+++ b/src/pickFunktions.c
@@ -8768,7 +8768,6 @@ void pre_cut( int nr, int flag )
   int foundNode,elnod,newnodeFlag=0;
   int *elNodeRef;
   static Rsort *rsort=NULL;
-  extern int compareRsort();
   int nearParams, nearParam[CUTS],ncorner,nelem;
   double cg[3];
 
diff --git a/src/sendSet.c b/src/sendSet.c
index d40bf2d..5f23da6 100755
--- a/src/sendSet.c
+++ b/src/sendSet.c
@@ -195,7 +195,6 @@ void sendSurfNormalen( char *setname, char *format, Summen *anz, Nodes *node, El
   static Datasets *lcase2=NULL;
   static CQuad4    *face4=NULL;
   static Normalen  *norm2=NULL;
-  extern int compareInt();
 
   strcpy ( prognam, setname);
   setNr=getSetNr(setname);
diff --git a/src/setFunktions.c b/src/setFunktions.c
index 37c7587..5f16205 100644
--- a/src/setFunktions.c
+++ b/src/setFunktions.c
@@ -19755,7 +19755,6 @@ int pre_read( char *record )
   Datasets  *lpre=NULL;
   Sets      *spre=NULL;
   int   *isort=NULL;
-  extern int compareInt();
   int *newnode=NULL, *newelem=NULL;
   char addDispFlagLocal=0, surfNeedUpdateFlag=0;
   char **buf;
@@ -24483,7 +24482,6 @@ void senddata( char *setname, char *format, Summen *anz, Nodes *node, Elements *
   Elements  *elem2;
   Datasets *lcase2=NULL;
   static int   *isort=NULL;
-  extern int compareInt();
   static int step_number2=0;
   FILE *handle;
   double dx,dy,dz, sum_l=0.;
-- 
2.53.0