Exemplo n.º 1
0
 private IEnumerable <Declaration> BuiltInVariantStringFunctionsWithStringTypedVersion(DeclarationFinder finder)
 {
     return(finder
            .BuiltInDeclarations(DeclarationType.Member)
            .Where(item => item.Scope.StartsWith("VBE7.DLL;") &&
                   (_tokens.Contains(item.IdentifierName) ||
                    item.IdentifierName.StartsWith("_B_var_") &&
                    _tokens.Contains(item.IdentifierName.Substring("_B_var_".Length)))));
 }
Exemplo n.º 2
0
        public void Execute(IReadOnlyCollection <QualifiedModuleName> modules)
        {
            var toRelsolveSupertypesFor = _declarationFinder.UserDeclarations(DeclarationType.ClassModule)
                                          .Concat(_declarationFinder.UserDeclarations(DeclarationType.Document))
                                          .Where(decl => modules.Contains(decl.QualifiedName.QualifiedModuleName))
                                          .Concat(_declarationFinder.BuiltInDeclarations(DeclarationType.ClassModule));

            foreach (var declaration in toRelsolveSupertypesFor)
            {
                AddImplementedInterface(declaration);
            }
        }