Subversion Repositories DevTools

Rev

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

Rev 1578 Rev 1580
Line 3102... Line 3102...
3102
 
3102
 
3103
 
3103
 
3104
    #
3104
    #
3105
    #   Process each file
3105
    #   Process each file
3106
    #
3106
    #
-
 
3107
    my ($ExcludedFlag) = "false";
3107
    foreach my $sfile ( @flist )
3108
    foreach my $sfile ( @flist )
3108
    {
3109
    {
3109
 
3110
 
3110
        # we exclude .dll files if this is a sparc build
3111
        # we exclude .dll files if this is a sparc build
3111
        #
3112
        #
3112
        if ( "$MachType" eq "sparc"  &&
3113
        if ( "$MachType" eq "sparc"  &&
3113
             $sfile =~ m/\.dll/
3114
             $sfile =~ m/\.dll/
3114
           )
3115
           )
3115
        {
3116
        {
3116
            Verbose("Excluding item [$sfile] from build, as we do not deliver dlls for this machine type [$MachType].");
3117
            Verbose("Excluding item [$sfile] from build, as we do not deliver dlls for this machine type [$MachType].");
-
 
3118
            $ExcludedFlag = "true";
3117
            return 1;
3119
            next;
3118
        }
3120
        }
3119
 
3121
 
3120
        # we exclude .so files if this is a win32 build
3122
        # we exclude .so files if this is a win32 build
3121
        #
3123
        #
3122
        if ( "$MachType" eq "win32"  &&
3124
        if ( "$MachType" eq "win32"  &&
3123
             $sfile =~ m/\.so/
3125
             $sfile =~ m/\.so/
3124
           )
3126
           )
3125
        {
3127
        {
3126
            Verbose("Excluding item [$sfile] from build, as we do not deliver sosss for this machine type [$MachType].");
3128
            Verbose("Excluding item [$sfile] from build, as we do not deliver sosss for this machine type [$MachType].");
-
 
3129
            $ExcludedFlag = "true";
3127
            return 1;
3130
            next;
3128
        }
3131
        }
3129
 
3132
 
3130
        my ($libName) = $sfile;
3133
        my ($libName) = $sfile;
3131
        if ( "$MachType" eq "sparc" )
3134
        if ( "$MachType" eq "sparc" )
3132
        {
3135
        {
Line 3140... Line 3143...
3140
 
3143
 
3141
        my ($i);
3144
        my ($i);
3142
        my ($j);
3145
        my ($j);
3143
        my ($count);
3146
        my ($count);
3144
        my ($foundFileFlag) = "false";
3147
        my ($foundFileFlag) = "false";
3145
        my ($ExcludedFlag) = "false";
-
 
3146
 
3148
 
3147
        #
3149
        #
3148
        #   Search all the 'lib' locations, or a specified subset
3150
        #   Search all the 'lib' locations, or a specified subset
3149
        #
3151
        #
3150
        my (@libDirList) = @{$DpkgLibDirList{$select}};
3152
        my (@libDirList) = @{$DpkgLibDirList{$select}};