Subversion Repositories DevTools

Rev

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

Rev 3890 Rev 3893
Line 366... Line 366...
366 
    'PFTPp'                 => 'IgnoreMakeProject,ForceProjectBase=/DPG_SWCode',        # Need to test
 366 
    'PFTPp'                 => 'IgnoreMakeProject,ForceProjectBase=/DPG_SWCode',        # Need to test
367 
    'ocp5000'               => 'ForceProjectBase=/DPG_SWCode,RetainCompressed,IgnoreMakeProject', # Need to test
 367 
    'ocp5000'               => 'ForceProjectBase=/DPG_SWCode,RetainCompressed,IgnoreMakeProject', # Need to test
368 
    'SPOS'                  => 'ForceProjectBase=/DPG_SWCode',
 368 
    'SPOS'                  => 'ForceProjectBase=/DPG_SWCode',
369 
 
 369 
 
370 
    'gak6000'               => 'ForceProjectBase=/DPG_SWCode',
 370 
    'gak6000'               => 'ForceProjectBase=/DPG_SWCode',
371 
    'gak5000'               => 'ForceProjectBase=/DPG_SWCode,IgnoreProjectBase',
 371 
    'gak5000'               => 'ForceProjectBase=/DPG_SWCode',
372 
    'hcp6000'               => 'ForceProjectBase=/DPG_SWCode,RetainCompressed',
 372 
    'hcp6000'               => 'ForceProjectBase=/DPG_SWCode,RetainCompressed',
373 
    'tp6000'                => 'ForceProjectBase=/DPG_SWCode,RetainCompressed',
 373 
    'tp6000'                => 'ForceProjectBase=/DPG_SWCode,RetainCompressed',
374 
    'vcp6000'               => 'ForceProjectBase=/DPG_SWCode,RetainCompressed',
 374 
    'vcp6000'               => 'ForceProjectBase=/DPG_SWCode,RetainCompressed',
375 
    'agents_unit'           => 'ForceProjectBase=/DPG_SWCode,RetainCompressed',
 375 
    'agents_unit'           => 'ForceProjectBase=/DPG_SWCode,RetainCompressed',
376 
 
 376 
 
Line 3914... Line 3914...
3914 
#                        $retval = 1;
 3914 
#                        $retval = 1;
3915 
                         $definitionError++;
 3915 
                         $definitionError++;
3916 
                    }
 3916 
                    }
3917 
                    else
 3917 
                    else
3918 
                    {
 3918 
                    {
- 
 
 3919 
                        Warning ("Build: $buildFile");
- 
 
 3920 
                        #
- 
 
 3921 
                        #   Whats the file for
- 
 
 3922 
                        #
- 
 
 3923 
                        if (open (BF, '<', $buildFile ))
- 
 
 3924 
                        {
- 
 
 3925 
                            while ( <BF> )
- 
 
 3926 
                            {
- 
 
 3927 
                                s~\s+$~~;
- 
 
 3928 
                                if ( m~\s*BuildName~ )
- 
 
 3929 
                                {
- 
 
 3930 
                                    Warning ("BuildName: $_");
- 
 
 3931 
                                    last;
- 
 
 3932 
                                }
- 
 
 3933 
                            }
- 
 
 3934 
                            close BF;
- 
 
 3935 
                        }
- 
 
 3936 
 
- 
 
 3937 
 
3919 
                        #
 3938 
                        #
3920 
                        #   Determine the depth of the view root
 3939 
                        #   Determine the depth of the view root
3921 
                        #
 3940 
                        #
3922 
                        Warning ("Build: $buildFile");
 - 
 
3923 
                        my $countPath = ($data->{ViewPath} =~ tr~/~/~);
 3941 
                        my $countPath = ($data->{ViewPath} =~ tr~/~/~);
3924 
                        my $countBuild = ($buildFile =~ tr~/~/~);
 3942 
                        my $countBuild = ($buildFile =~ tr~/~/~);
3925 
                        my $max_up = $countBuild - $countPath -1;
 3943 
                        my $max_up = $countBuild - $countPath -1;
3926 
 
 3944 
 
3927 
                        m~--Up=(\d+)~i;
 3945 
                        m~--Up=(\d+)~i;