Author: rafael
Date: 2005-04-20 16:42:04 -0400 (Wed, 20 Apr 2005)
New Revision: 43357
Modified:
trunk/mcs/class/System/Microsoft.VisualBasic/ChangeLog
trunk/mcs/class/System/Microsoft.VisualBasic/VBCodeGenerator.cs
Log:
2005-04-20 Rafael Teixeira <[EMAIL PROTECTED]>
* VBCodeGenerator.cs: Better logic for OptionStrict/Explicit generation
Modified: trunk/mcs/class/System/Microsoft.VisualBasic/ChangeLog
===================================================================
--- trunk/mcs/class/System/Microsoft.VisualBasic/ChangeLog 2005-04-20
20:31:09 UTC (rev 43356)
+++ trunk/mcs/class/System/Microsoft.VisualBasic/ChangeLog 2005-04-20
20:42:04 UTC (rev 43357)
@@ -1,3 +1,6 @@
+2005-04-20 Rafael Teixeira <[EMAIL PROTECTED]>
+ * VBCodeGenerator.cs: Better logic for OptionStrict/Explicit generation
+
2004-12-27 Rafael Teixeira <[EMAIL PROTECTED]>
* VBCodeCompiler.cs: Added /quiet argument to avoid the "Alpha message"
Modified: trunk/mcs/class/System/Microsoft.VisualBasic/VBCodeGenerator.cs
===================================================================
--- trunk/mcs/class/System/Microsoft.VisualBasic/VBCodeGenerator.cs
2005-04-20 20:31:09 UTC (rev 43356)
+++ trunk/mcs/class/System/Microsoft.VisualBasic/VBCodeGenerator.cs
2005-04-20 20:42:04 UTC (rev 43357)
@@ -179,9 +179,14 @@
GenerateComment (new CodeComment (" the code is
regenerated."));
GenerateComment (new CodeComment (" </autogenerated>"));
GenerateComment (new CodeComment
("------------------------------------------------------------------------------"));
- Output.WriteLine ();
- Output.WriteLine("Option Explicit
{0}",OnOff(AsBool(compileUnit.UserData["RequireVariableDeclaration"])));
- Output.WriteLine("Option Strict
{0}",OnOff(!AsBool(compileUnit.UserData["AllowLateBound"])));
+ Output.WriteLine ();
+ if (AsBool(compileUnit.UserData["AllowLateBound"])) {
+ Output.WriteLine("Option Explicit
{0}",OnOff(AsBool(compileUnit.UserData["RequireVariableDeclaration"])));
+ Output.WriteLine("Option Strict Off");
+ } else {
+ Output.WriteLine("Option Explicit On"); //
Strict On implies Explicit On
+ Output.WriteLine("Option Strict On");
+ }
Output.WriteLine ();
}
_______________________________________________
Mono-patches maillist - [email protected]
http://lists.ximian.com/mailman/listinfo/mono-patches
