예제 #1
0
 public ClassModuleDeclaration(ComCoClass coClass, Declaration parent, QualifiedModuleName module,
                               Attributes attributes)
     : base(
         module.QualifyMemberName(coClass.Name),
         parent,
         parent,
         coClass.Name,
         null,
         false,
         coClass.EventInterfaces.Any(),
         Accessibility.Public,
         DeclarationType.ClassModule,
         null,
         Selection.Home,
         false,
         null,
         false,
         new List <IAnnotation>(),
         attributes)
 {
     _supertypeNames =
         coClass.ImplementedInterfaces.Where(i => !i.IsRestricted && !IgnoredInterfaces.Contains(i.Name))
         .Select(i => i.Name)
         .ToList();
     _supertypes       = new HashSet <Declaration>();
     _subtypes         = new ConcurrentDictionary <Declaration, byte>();
     IsControl         = coClass.IsControl;
     _isExtensible     = new Lazy <bool>(() => IsExtensibleToCache());
     _isExposed        = new Lazy <bool>(() => IsExposedToCache());
     _hasPredeclaredId = new Lazy <bool>(() => HasPredeclaredIdToCache());
 }
예제 #2
0
 public ClassModuleDeclaration(ComCoClass coClass, Declaration parent, QualifiedModuleName module,
                               Attributes attributes)
     : base(
         module.QualifyMemberName(coClass.Name),
         parent,
         parent,
         coClass.Name,
         null,
         false,
         coClass.EventInterfaces.Any(),
         Accessibility.Public,
         DeclarationType.ClassModule,
         null,
         Selection.Home,
         false,
         null,
         true,
         new List <IAnnotation>(),
         attributes)
 {
     _supertypeNames =
         coClass.ImplementedInterfaces.Where(i => !i.IsRestricted && !IgnoredInterfaces.Contains(i.Name))
         .Select(i => i.Name)
         .ToList();
     _supertypes = new HashSet <Declaration>();
     _subtypes   = new HashSet <Declaration>();
     IsControl   = coClass.IsControl;
 }
 public ClassModuleDeclaration(ComCoClass coClass, Declaration parent, QualifiedModuleName module,
                               Attributes attributes)
     : this(
         module.QualifyMemberName(coClass.Name),
         parent,
         coClass.Name,
         false,
         new List <IAnnotation>(),
         attributes,
         coClass.EventInterfaces.Any(),
         coClass.IsAppObject,
         coClass.IsControl)
 {
     _supertypeNames =
         coClass.ImplementedInterfaces.Where(i => !i.IsRestricted && !IgnoredInterfaces.Contains(i.Name))
         .Select(i => i.Name)
         .ToList();
     _supertypes       = new HashSet <Declaration>();
     _subtypes         = new ConcurrentDictionary <Declaration, byte>();
     _isExtensible     = new Lazy <bool>(IsExtensibleToCache);
     _isExposed        = new Lazy <bool>(IsExposedToCache);
     _hasPredeclaredId = new Lazy <bool>(HasPredeclaredIdToCache);
 }