Apparently we *do* care about TKIND_ALIAS, and everything is procedural (for now)...

Author: comintern

Rubberduck.Parsing/ComReflection/ComModule.cs

@@ -26,17 +26,16 @@ public IEnumerable<ComField> Fields
         }
 
         public ComModule(ITypeLib typeLib, ITypeInfo info, TYPEATTR attrib, int index) : base(typeLib, attrib, index)
-        {           
+        {
+            Type = DeclarationType.ProceduralModule;
             if (attrib.cFuncs > 0)
             {
                 Debug.Assert(attrib.cVars == 0);
-                Type = DeclarationType.ProceduralModule;
                 GetComMembers(info, attrib);
             }
             else
             {
                 Debug.Assert(attrib.cVars > 0);
-                Type = DeclarationType.Module;
                 GetComFields(info, attrib);
             }
         }

Rubberduck.Parsing/ComReflection/ComProject.cs

@@ -109,7 +109,8 @@ private void LoadModules(ITypeLib typeLibrary)
                             var coclass = type ?? new ComCoClass(typeLibrary, info, typeAttributes, index);
                             _classes.Add(coclass as ComCoClass);
                             if (type != null) KnownTypes.TryAdd(typeAttributes.guid, coclass);
-                            break;                       
+                            break;
+                        case TYPEKIND.TKIND_ALIAS:
                         case TYPEKIND.TKIND_DISPATCH:
                         case TYPEKIND.TKIND_INTERFACE:
                             var intface = type ?? new ComInterface(typeLibrary, info, typeAttributes, index);
@@ -124,9 +125,6 @@ private void LoadModules(ITypeLib typeLibrary)
                             _modules.Add(module as ComModule);
                             if (type != null) KnownTypes.TryAdd(typeAttributes.guid, module);
                             break;
-                        case TYPEKIND.TKIND_ALIAS:
-                            //Haven't seen one of these either.
-                            throw new NotImplementedException(string.Format("Didn't expect to find a TKIND_ALIAS in {0}.", Path));
                         default:
                             throw new NotImplementedException(string.Format("Didn't expect a TYPEATTR with multiple typekind flags set in {0}.", Path));
                     }