remove unused variables as seen in SCL git 1492641 and 2b31086

Nicholas Reed · Nicholas Reed · commit 22ad90bc1ef9 · 2012-04-04T16:57:11.000Z
diff --git a/src/cleditor/STEPfile.cc b/src/cleditor/STEPfile.cc
@@ -1661,7 +1661,6 @@ STEPfile::AppendFile( istream * in, int useTechCor ) {
 
     SetFileIdIncrement();
     int total_insts = 0,  valid_insts = 0;
-    int exchange_file = -1;
 
     ReadTokenSeparator( *in );
     std::string keywd = GetKeyword( *in, "; #", _error );
@@ -1671,18 +1670,15 @@ STEPfile::AppendFile( istream * in, int useTechCor ) {
 
     if( !strncmp( const_cast<char *>( keywd.c_str() ), "ISO-10303-21",
                   strlen( const_cast<char *>( keywd.c_str() ) ) ) ) {
-        exchange_file = 1;
         SetFileType( VERSION_CURRENT );
     } else if( !strncmp( const_cast<char *>( keywd.c_str() ), "STEP",
                          strlen( const_cast<char *>( keywd.c_str() ) ) ) ) {
         _error.AppendToUserMsg( "Reading Old Version of exchange file.\n" );
         _error.GreaterSeverity( SEVERITY_USERMSG );
 
-        exchange_file = 1;
         SetFileType( VERSION_OLD );
     } else if( !strncmp( const_cast<char *>( keywd.c_str() ), "STEP_WORKING_SESSION",
                          strlen( const_cast<char *>( keywd.c_str() ) ) ) ) {
-        exchange_file = 0;
         if( _fileType != WORKING_SESSION ) {
             _error.AppendToUserMsg(
                 "Warning: Reading in file as Working Session file.\n" );
diff --git a/src/express/expr.c b/src/express/expr.c
@@ -298,7 +298,6 @@ EXPresolve_op_dot( Expression expr, Scope scope ) {
 
     /* stuff for dealing with select_ */
     int options = 0;
-    Variable tmp;
     char dt;
     struct Symbol_ *where = NULL;
 
@@ -493,7 +492,6 @@ EXPresolve_op_group( Expression expr, Scope scope ) {
 
     /* stuff for dealing with select_ */
     int options = 0;
-    char dt;
 
     /* op1 is entity expression, op2 is entity */
     /* could be very impossible to determine except */
diff --git a/src/express/express.c b/src/express/express.c
@@ -849,7 +849,6 @@ EXPRESSfind_schema( Dictionary modeldict, char * name ) {
 static void
 connect_lists( Dictionary modeldict, Schema schema, Linked_List list ) {
     Rename * r;
-    Schema ref_schema;
 
     /* translate symbols to schemas */
     LISTdo_links( list, l )
@@ -899,8 +898,7 @@ EXPRESSresolve( Express model ) {
     /* comes first - DEL */
 
     Schema schema;
-    DictionaryEntry de, fg; /* imaginative, eh? */
-    Rename * r;
+    DictionaryEntry de;
 
     jmp_buf env;
     if( setjmp( env ) ) {
diff --git a/src/express/resolve.c b/src/express/resolve.c
@@ -1285,7 +1285,6 @@ void ENTITYresolve_types( Entity e );
 void
 SCOPEresolve_types( Scope s ) {
     Variable var;
-    Type type;
     DictionaryEntry de;
     Generic x;
 
diff --git a/src/express/type.c b/src/express/type.c
@@ -442,7 +442,6 @@ TYPEget_size( Type type ) {
     Class   class;
     int     size;
     Expression  upper;
-    Linked_List list;
     Error   experrc;
 
     class = OBJget_class( type );
diff --git a/src/express/variable.c b/src/express/variable.c
@@ -117,8 +117,6 @@ VARinitialize() {
 /* for example, if var is named SELF\xxx.yyy, return yyy */
 extern char *
 VARget_simple_name( Variable v ) {
-    char tmp;
-
     Expression e = VARget_name( v );
 
     while( TYPEis_expression( EXPget_type( e ) ) ) {
