[svn] r6224: nemerle/trunk/ncc/generation/HierarchyEmitter.n

[nazgul]

Log:
Emit Sealed for modules

Author: nazgul
Date: Thu May  4 22:13:37 2006
New Revision: 6224

Modified:
   nemerle/trunk/ncc/generation/HierarchyEmitter.n

Modified: nemerle/trunk/ncc/generation/HierarchyEmitter.n
==============================================================================
--- nemerle/trunk/ncc/generation/HierarchyEmitter.n	(original)
+++ nemerle/trunk/ncc/generation/HierarchyEmitter.n	Thu May  4 22:13:37 2006
@@ -530,8 +530,7 @@
       when (attrs %&& NemerleAttributes.Abstract) result |= TypeAttributes.Abstract;
       when (attrs %&& NemerleAttributes.Sealed) result |= TypeAttributes.Sealed;
       when (attrs %&& NemerleAttributes.SpecialName) result |= TypeAttributes.SpecialName;
-      // we cannot do Sealed at the same time on MS.NET 1.1
-      when (attrs %&& NemerleAttributes.Static) result |= TypeAttributes.Abstract;
+      when (attrs %&& NemerleAttributes.Static) result |= TypeAttributes.Abstract | TypeAttributes.Sealed;
         
       result
     }