Subversion Repositories DevTools

Rev

Rev 255 | Rev 275 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 255 Rev 271
Line 211... Line 211...
211 
        next if ( $symname =~ m/^SIG$/  );              # Useless
 211 
        next if ( $symname =~ m/^SIG$/  );              # Useless
212 
        next if ( $symname =~ m/^ENV$/  );              # Don't keep the user ENV
 212 
        next if ( $symname =~ m/^ENV$/  );              # Don't keep the user ENV
213 
        next if ( $symname =~ m/^INC$/  );              # Don't keep the INC paths
 213 
        next if ( $symname =~ m/^INC$/  );              # Don't keep the INC paths
214 
        next if ( $symname =~ m/^DEFINES/  );           # Don't keep
 214 
        next if ( $symname =~ m/^DEFINES/  );           # Don't keep
215 
        next if ( $symname =~ m/^TOOLSETRULES/  );      # Don't keep
 215 
        next if ( $symname =~ m/^TOOLSETRULES/  );      # Don't keep
- 
 
 216 
        next if ( $symname =~ m/^RULES/  );             # Don't keep
216 
 
 217 
 
217 
        next if ( $symname =~ m/^ScmCompilerOptions/ );         # Not internal data
 218 
        next if ( $symname =~ m/^ScmCompilerOptions/ );         # Not internal data
218 
        next if ( $symname =~ m/^ScmToolsetCompilerOptions/ );  # Not internal data
 219 
        next if ( $symname =~ m/^ScmToolsetCompilerOptions/ );  # Not internal data
219 
 
 220 
 
220 
        local *::sym = $main::{$symname};
 221 
        local *::sym = $main::{$symname};