Subversion Repositories DevTools

Rev

Rev 351 | Rev 379 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 351 Rev 363
Line 1124... Line 1124...
1124 
    #
 1124 
    #
1125 
    my $ofile = "\$(TESTDIR)/$pEntry->{test_name}.cmd";
 1125 
    my $ofile = "\$(TESTDIR)/$pEntry->{test_name}.cmd";
1126 
    push @{$pEntry->{'ShellRecipe'}}, "rm -f $ofile";
 1126 
    push @{$pEntry->{'ShellRecipe'}}, "rm -f $ofile";
1127 
 
 1127 
 
1128 
    my @cmds;
 1128 
    my @cmds;
1129 
    push @cmds, "\$(cmdfile) -wk1W0o$ofile";
 1129 
    push @cmds, "\$(cmdfile) -wk1W1o$ofile";
1130 
    foreach my $dll ( @copy_dlls )
 1130 
    foreach my $dll ( @copy_dlls )
1131 
    {
 1131 
    {
1132 
        #
 1132 
        #
1133 
        #   Generate in-line commands to locate and copy in the required
 1133 
        #   Generate in-line commands to locate and copy in the required
1134 
        #   DLL's. The 'cmdfile' utility can be used to do this at runtime
 1134 
        #   DLL's. The 'cmdfile' utility can be used to do this at runtime
1135 
        #
 1135 
        #
1136 
        my $dll_name = $dll;
 1136 
        my $dll_name = $dll;
1137 
        $dll_name .= '$(GBE_TYPE)' unless ( $copy_dll_flags{$dll}{'NonJats'} );
 1137 
        $dll_name .= '$(GBE_TYPE)' unless ( $copy_dll_flags{$dll}{'NonJats'} );
1138 
 
 1138 
 
1139 
        push @cmds, '"cp -f \"@(vglob2,' . "$dll_name.$::so" . ',PATH)\" $(TESTDIR) || exit 98\n"';
 1139 
        push @cmds, '"' . "cp -f @(vglob2,$dll_name.$::so,PATH,/) \$(TESTDIR) || exit 98" . '\n"';
1140 
    }
 1140 
    }
1141 
    push @cmds, "|| exit 99";
 1141 
    push @cmds, "|| exit 99";
1142 
    push @{$pEntry->{'ShellRecipe'}}, \@cmds;
 1142 
    push @{$pEntry->{'ShellRecipe'}}, \@cmds;
1143 
    push @{$pEntry->{'ShellRecipe'}}, ". $ofile";
 1143 
    push @{$pEntry->{'ShellRecipe'}}, ". $ofile";
1144 
 
 1144