vb.net folding works

git-svn-id: svn://svn.sharpdevelop.net/sharpdevelop/trunk@45 1ccf3a8d-04fe-1044-b7c0-cef0b8235c61

src/AddIns/BackendBindings/VBNetBinding/Project/Src/Parser/Parser.cs

@@ -59,7 +59,8 @@ namespace VBNetBinding.Parser
 				ICSharpCode.NRefactory.Parser.PreProcessingDirective directive = tracker.CurrentSpecials[i] as ICSharpCode.NRefactory.Parser.PreProcessingDirective;
 				if (directive != null)
 				{
-					if (directive.Cmd == "#region")
+					System.Console.WriteLine("directive " + directive.Cmd.ToLower());
+					if (directive.Cmd.ToLower() == "#region")
 					{
 						int deep = 1;
 						for (int j = i + 1; j < tracker.CurrentSpecials.Count; ++j)
@@ -67,7 +68,8 @@ namespace VBNetBinding.Parser
 							ICSharpCode.NRefactory.Parser.PreProcessingDirective nextDirective = tracker.CurrentSpecials[j] as ICSharpCode.NRefactory.Parser.PreProcessingDirective;
 							if (nextDirective != null)
 							{
-								switch (nextDirective.Cmd)
+								System.Console.WriteLine("next directive " + nextDirective.Cmd.ToLower());
+								switch (nextDirective.Cmd.ToLower())
 								{
 									case "#region":
 										++deep;
@@ -84,7 +86,7 @@ namespace VBNetBinding.Parser
 								}
 							}
 						}
-					end: ;
+						end: ;
 					}
 				}
 			}