Lines Matching defs:closing
1149 my $emitted; # the tag actually emitted, used for closing
1470 sub closing ($) { local($_) = shift; (defined && s/\s+$//) ? length : 0 }
1480 my( $lev, $rstr, $func, $closing ) = @_;
1495 my $par = go_ahead( $rstr, 'C', $closing );
1525 my $par = go_ahead( $rstr, 'L', $closing );
1650 my $term = pattern $closing;
1653 # terminate at closing angle bracket(s)
1659 $res .= process_text1( $lev, $rstr, $3, closing $4 );
1675 my( $rstr, $func, $closing ) = @_;
1677 my @closing = ($closing);
1679 s/\A(.*?)(([BCEFILSXZ])<(<+[^\S\n]+)?|@{[pattern $closing[0]]})//s ){
1682 shift @closing;
1683 return $res unless @closing;
1685 unshift @closing, closing $4;
2011 my( $rstr, $func, $closing ) = @_;
2018 $res .= $1 . depod1( $rstr, $2, closing $3);
2033 # terminate at closing angle bracket
2034 my $term = pattern $closing;
2038 $res .= depod1( $rstr, $3, closing $4 );