Subversion Repositories DevTools

Rev

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

Rev 291 Rev 307
Line 1107... Line 1107...
1107 
    #
 1107 
    #
1108 
    my $ofile = "\$(TESTDIR)/$pEntry->{test_name}.cmd";
 1108 
    my $ofile = "\$(TESTDIR)/$pEntry->{test_name}.cmd";
1109 
    push @{$pEntry->{'ShellRecipe'}}, "rm -f $ofile";
 1109 
    push @{$pEntry->{'ShellRecipe'}}, "rm -f $ofile";
1110 
 
 1110 
 
1111 
    my @cmds;
 1111 
    my @cmds;
1112 
    push @cmds, "\$(cmdfile) -wkWeo$ofile";
 1112 
    push @cmds, "\$(cmdfile) -wk1W0o$ofile";
1113 
    foreach my $dll ( @copy_dlls )
 1113 
    foreach my $dll ( @copy_dlls )
1114 
    {
 1114 
    {
1115 
        #
 1115 
        #
1116 
        #   Generate in-line commands to locate and copy in the required
 1116 
        #   Generate in-line commands to locate and copy in the required
1117 
        #   DLL's. The 'cmdfile' utility can be used to do this at runtime
 1117 
        #   DLL's. The 'cmdfile' utility can be used to do this at runtime
1118 
        #
 1118 
        #
1119 
        my $dll_name = $dll;
 1119 
        my $dll_name = $dll;
1120 
        $dll_name .= '$(GBE_TYPE)' unless ( $copy_dll_flags{$dll}{'NonJats'} );
 1120 
        $dll_name .= '$(GBE_TYPE)' unless ( $copy_dll_flags{$dll}{'NonJats'} );
1121 
 
 1121 
 
1122 
        push @cmds, '"' . "cp -f @(vglob2,$dll_name.$::so,PATH) \$(TESTDIR) || exit 98" . '\n"';
 1122 
        push @cmds, '"cp -f \"@(vglob2,' . "$dll_name.$::so" . ',PATH)\" $(TESTDIR) || exit 98\n"';
1123 
    }
 1123 
    }
1124 
    push @cmds, "|| exit 99";
 1124 
    push @cmds, "|| exit 99";
1125 
    push @{$pEntry->{'ShellRecipe'}}, \@cmds;
 1125 
    push @{$pEntry->{'ShellRecipe'}}, \@cmds;
1126 
    push @{$pEntry->{'ShellRecipe'}}, ". $ofile";
 1126 
    push @{$pEntry->{'ShellRecipe'}}, ". $ofile";
1127 
 
 1127