Changeset 34119
- Timestamp:
- 2012-11-08T12:24:15+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/attitude_adjustment/scripts/remote-gdb
r26885 r34119 15 15 my ( $tid, $arch, $libc, @arches ); 16 16 17 if( $ARGV[1] =~ m!\btarget-(.+?)_([^_]+libc[^ _/]+)\b!i )17 if( $ARGV[1] =~ m!\btarget-(.+?)_([^_]+libc[^/]+)\b!i ) 18 18 { 19 19 print("Using target $1 ($2)\n"); … … 27 27 while( defined( my $e = readdir SD ) ) 28 28 { 29 if( -d "$Bin/../staging_dir/$e" && $e =~ /^target-(.+?)_([^_]+libc [^_]+)/i )29 if( -d "$Bin/../staging_dir/$e" && $e =~ /^target-(.+?)_([^_]+libc.+)/i ) 30 30 { 31 31 push @arches, [ $1, $2 ];
Note: See TracChangeset
for help on using the changeset viewer.