2
// <copyright see="prj:///doc/copyright.txt"/>
3
// <license see="prj:///doc/license.txt"/>
4
// <owner name="Daniel Grunwald" email="daniel@danielgrunwald.de"/>
5
// <version>$Revision: 4482 $</version>
9
using ICSharpCode.OldNRefactory.Parser.VB;
11
namespace ICSharpCode.OldNRefactory.PrettyPrinter
14
/// Description of VBNetOutputFormatter.
16
public sealed class VBNetOutputFormatter : AbstractOutputFormatter
18
public VBNetOutputFormatter(VBNetPrettyPrintOptions prettyPrintOptions) : base(prettyPrintOptions)
22
public override void PrintToken(int token)
24
PrintText(Tokens.GetTokenString(token));
27
public override void PrintIdentifier(string identifier)
29
if (Keywords.IsNonIdentifierKeyword(identifier)) {
31
PrintText(identifier);
34
PrintText(identifier);
38
public override void PrintComment(Comment comment, bool forceWriteInPreviousBlock)
40
switch (comment.CommentType) {
41
case CommentType.Block:
42
WriteLineInPreviousLine("'" + comment.CommentText.Replace("\n", "\n'"), forceWriteInPreviousBlock);
44
case CommentType.Documentation:
45
WriteLineInPreviousLine("'''" + comment.CommentText, forceWriteInPreviousBlock);
48
WriteLineInPreviousLine("'" + comment.CommentText, forceWriteInPreviousBlock);
53
public override void PrintPreprocessingDirective(PreprocessingDirective directive, bool forceWriteInPreviousBlock)
56
&& (string.Equals(directive.Cmd, "#Region", StringComparison.InvariantCultureIgnoreCase)
57
|| string.Equals(directive.Cmd, "#End", StringComparison.InvariantCultureIgnoreCase)
58
&& directive.Arg.StartsWith("Region", StringComparison.InvariantCultureIgnoreCase)))
60
WriteLineInPreviousLine("'" + directive.Cmd + " " + directive.Arg, forceWriteInPreviousBlock);
61
} else if (!directive.Expression.IsNull) {
62
VBNetOutputVisitor visitor = new VBNetOutputVisitor();
63
directive.Expression.AcceptVisitor(visitor, null);
64
WriteLineInPreviousLine(directive.Cmd + " " + visitor.Text + " Then", forceWriteInPreviousBlock);
66
base.PrintPreprocessingDirective(directive, forceWriteInPreviousBlock);
70
public void PrintLineContinuation()
72
if (!LastCharacterIsWhiteSpace)
74
PrintText("_" + Environment.NewLine);