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

[nazgul]

Log:
I guess we should Dispose the file in mono flow

Author: nazgul
Date: Sun May 14 19:12:01 2006
New Revision: 6277

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	Sun May 14 19:12:01 2006
@@ -144,6 +144,7 @@
             
             def meth = _module_builder.GetType ().GetMethod ("DefineManifestResource");
             if (meth == null) {
+              try {
               def res = array (fs.Length :> int);
               def loop (pos) {
                 if (res.Length == pos) {}
@@ -159,7 +160,13 @@
               else
                 _ = meth.Invoke (_assembly_builder, array [name : object, res, 
                                                            ResourceAttributes.Public]);
-            } else {
+              }
+              finally {
+                fs.Dispose ();                                                          
+              }
+            } 
+            else {
+              // this method does the Dispose for us
               _ = meth.Invoke (_module_builder, array [name : object, 
                                                        fs, ResourceAttributes.Public])
             }