Home | History | Annotate | Download | only in util

Lines Matching refs:rassigned

135 my %rassigned;  # lib -> colon-separated list of assigned reason codes
159         $rassigned{$lib} = ":";
221                 if $rassigned{$lib} =~ /:$code:/;
222             $rassigned{$lib} .= "$code:";
238             if ( $rassigned{$lib} =~ m/^:(.*):$/ ) {
239                 my @rassigned = sort { $a <=> $b } split( ":", $1 );
240                 print STDERR "  ", join(' ', @rassigned), "\n";
372                     $rassigned{$lib} =~ m/^:([^:]*):/;
375                     while ( $rassigned{$lib} =~ m/:$findcode:/ ) {
379                     $rassigned{$lib} .= "$findcode:";
475                 $rassigned{$lib} =~ m/^:([^:]*):/;
478                 while ( $rassigned{$lib} =~ m/:$findcode:/ ) {
482                 $rassigned{$lib} .= "$findcode:";