[warning-fix][defined-but-not-used]

src/clstepcore/STEPaggregate.cc

@@ -25,7 +25,6 @@ const int Real_Num_Precision = REAL_NUM_PRECISION; // from STEPattribute.h
 
 #define STRING_DELIM '\''
 
-static char rcsid[] = "$Id: STEPaggregate.cc,v 3.0.1.7 1997/11/05 21:59:28 sauderd DP3.1 $";
 
 /******************************************************************
 **    Functions for manipulating aggregate attributes

src/express/resolve.c

@@ -1691,26 +1691,7 @@ SCHEMAresolve_pass2( Schema * schema ) {
         }
     }
 
-    static Type
-    TAGget_type( struct tag * tags, char * name ) {
-        while( 1 ) {
-            if( streq( tags->name, name ) ) {
-                return( tags->type );
-            }
-        }
-    }
 
-    /* should only be called on types known to be tagged! */
-    static char *
-    TYPEget_tagname( Type type ) {
-        for( ; type; type = type->u.type->body->base ) {
-            if( type->u.type->body->tag ) {
-                return type->u.type->body->tag->symbol.name;
-            }
-        }
-        /* can't happen */
-        return 0;
-    }
 
     struct tag *
     TAGcreate_tags() {

src/fedex_plus/classes.c

@@ -20,7 +20,6 @@ N350 ( August 31, 1993 ) of ISO 10303 TC184/SC4/WG7.
 ***  classes, TYPEs, and TypeDescriptors.                       ***
  **                             **/
 
-static char rcsid[] = "$Id: classes.c,v 3.0.1.11 1997/09/18 21:14:46 sauderd Exp sauderd";
 
 /* this is used to add new dictionary calls */
 /* #define NEWDICT */

src/fedex_plus/fedex_main.c

@@ -1,4 +1,3 @@
-static char rcsid[] = "$Id: fedex_main.c,v 3.0.1.3 1997/11/05 23:12:18 sauderd DP3.1 $";
 
 /************************************************************************
 ** Driver for Fed-X Express parser.