Lines Matching refs:standard_form
3551 my %standard_form;
3553 main::set_access('standard_form', \%standard_form);
3601 sub standard_form($self) {
3610 return $standard_form{$addr} if defined $standard_form{$addr};
3614 return $standard_form{$addr} = main::standardize($value);
3627 if (! defined $standard_form{$addr}) {
3630 elsif ($standard_form{$addr} ne $value{$addr}) {
3631 $return .= "(standard '$standard_form{$addr}')";
4449 my $standard_form = ($type) ? $value : main::standardize($value);
4462 if ($r->[$j]->standard_form ne $standard_form) {
4629 && $r->[$i-1]->standard_form eq $standard_form
4634 && $r->[$j+1]->standard_form eq $standard_form