Home | History | Annotate | Download | only in util

Lines Matching refs:rassigned

131 my %rassigned;  # lib -> colon-separated list of assigned reason codes
157         $rassigned{$lib} = ":";
213                 if $rassigned{$lib} =~ /:$code:/;
214             $rassigned{$lib} .= "$code:";
234             if ( $rassigned{$lib} =~ m/^:(.*):$/ ) {
235                 my @rassigned = sort { $a <=> $b } split( ":", $1 );
236                 print STDERR "  ", join(' ', @rassigned), "\n";
522             $rassigned{$lib} =~ m/^:([^:]*):/;
525             while ( $rassigned{$lib} =~ m/:$findcode:/ ) {
529             $rassigned{$lib} .= "$findcode:";