3 "

     1 "

     4  COPYRIGHT (c) 2000 eXept Software AG

     2  COPYRIGHT (c) 2000 eXept Software AG

     5               All Rights Reserved

     3               All Rights Reserved

     6 

     4 

     7  This software is furnished under a license and may be used

     5  This software is furnished under a license and may be used

  1166     "/ defClass := aPackage asPackageId projectDefinitionClass.

  1164     "/ defClass := aPackage asPackageId projectDefinitionClass.

  1167     "/ defClass validateDescription.

  1165     "/ defClass validateDescription.

  1168 

  1166 

  1169     checker := ProjectChecker new.

  1167     checker := ProjectChecker new.

  1170     checker checkExtensionsOnly:(doClasses not and:[ doExtensions ]).

  1168     checker checkExtensionsOnly:(doClasses not and:[ doExtensions ]).

  1171     report := checker check: aPackageSymbolOrClass.

  1170     report := checker check: aPackageSymbolOrClass.

  1172     (report notNil and:[(problems := report problems) notEmptyOrNil]) ifTrue:[

  1171     (report notNil and:[(problems := report problems) notEmptyOrNil]) ifTrue:[

  1173         numProblems := problems size.

  1172         numProblems := problems size.

  1174         numProblems == 1 ifTrue:[

  1173         numProblems == 1 ifTrue:[

  1175             msg := 'The ProblemChecker found the following error/inconsistency:\\    %2\\Need more detail or help for repair?'

  1174             msg := 'The ProblemChecker found the following error/inconsistency:\\    %2\\Need more detail or help for repair?'