sub end()

in d3d/archive/images/d3d11/postproc.pl [509:553]


    sub end
    {
        my($self, $tagname, $origtext) = @_;
        if ( $in_int && $::no_int ) { return; }
        if ( $in_api && $::in_api ) { return; }
        if ( $in_ddi && $::no_ddi ) { return; }
        if ( $in_rem && $::no_rem ) { return; }
        if ( $in_del10To11 && $::no_del10To11 ) { return; }
        if ($InHeader)
        {
            $NewHeader = GetSectionNumber($InHeader).$Header;
            # strip trailing whitespace - it confuses href tags
            ($NewHeader) = split /\s+$/, $NewHeader;
            $ResolvedNewHeader = ResolveName($NewHeader,0);
            $HeaderList[$HeaderCount][0] = $InHeader;
            $HeaderList[$HeaderCount][1] = $ResolvedNewHeader;
            $HeaderCount++;
            $InHeader = 0;
            $Header = "";

            PrintWithNamesResolved "<A id=\"".$ResolvedNewHeader."\"></A>\n";
            PrintWithNamesResolved "<".uc($tagname).">";
            PrintWithNamesResolved $NewHeader;
            PrintWithNamesResolved "</".uc($tagname).">";
        }
        else
        {
            if( uc($tagname) eq "BODY" )
            {
                ComputeTableOfContents; 
                ComputeConstantList; 
                ValidateLinks;
                $Pass2 = PrintConstantList($Pass1);
                $Pass3 = ResolveLinkSectionNumbers($Pass2);
                $Pass4 = PrintTableOfContents($Pass3);
                print $Pass4;
                if( "" ne $Messages )
                {
                    $Messages .= $MessageCount." potential issues found. \n";
                    die($Messages)
                }
            }
            PrintWithNamesResolved $origtext;
        }
    }