internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write("return ");
Expression.Write(writer, formatter);
if (semicolon)
writer.WriteLine(";");
}
void Write(IndentedTextWriter writer, GmlFormatter formatter, bool semicolon, bool curlyBraces)
{
Sequence seq;
if (curlyBraces)
{
writer.WriteLine("{");
writer.Indent++;
}
if (First.Kind == StatementKind.Sequence)
{
// Write the sequence without curly braces.
seq = (Sequence)First;
seq.Write(writer, formatter, semicolon, false);
}
else
{
First.Write(writer, formatter);
}
if (Second.Kind == StatementKind.Sequence)
{
// Write the sequence without curly braces.
seq = (Sequence)Second;
seq.Write(writer, formatter, semicolon, false);
}
else
{
Second.Write(writer, formatter);
}
if (curlyBraces)
{
writer.Indent--;
writer.WriteLine("}");
}
}
internal static IndentedTextWriter GetIndentedTextWriter(TextWriter writer, GmlFormatter formatter)
{
return(new IndentedTextWriter(writer, formatter.TabString)
{
NewLine = formatter.Newline
});
}
void Write(IndentedTextWriter writer, GmlFormatter formatter, bool semicolon, bool curlyBraces)
{
Sequence seq;
if (curlyBraces)
{
writer.WriteLine("{");
writer.Indent++;
}
if (First.Kind == StatementKind.Sequence)
{
// Write the sequence without curly braces.
seq = (Sequence)First;
seq.Write(writer, formatter, semicolon, false);
}
else
First.Write(writer, formatter);
if (Second.Kind == StatementKind.Sequence)
{
// Write the sequence without curly braces.
seq = (Sequence)Second;
seq.Write(writer, formatter, semicolon, false);
}
else
Second.Write(writer, formatter);
if (curlyBraces)
{
writer.Indent--;
writer.WriteLine("}");
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
var indent = writer.Indent;
if (indent != 0) writer.Indent--;
writer.WriteLine("default:");
if (indent != 0) writer.Indent++;
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
Lefthand.Write(writer, formatter);
writer.Write(string.Format("{1}{0}{1}", Operator, formatter.Padding));
Expression.Write(writer, formatter);
if (semicolon)
writer.WriteLine(";");
}
public virtual string ToString(GmlFormatter formatter)
{
using (var sw = new StringWriter())
{
Write(sw, formatter);
return(sw.ToString());
}
}
public virtual string ToString(GmlFormatter formatter)
{
using (var sw = new StringWriter())
{
Write(sw, formatter);
return sw.ToString();
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
var indent = writer.Indent;
if (indent != 0) writer.Indent--;
writer.Write("case ");
Expression.Write(writer, formatter);
writer.WriteLine(":");
if (indent != 0) writer.Indent++;
}
public void Write(TextWriter tw, GmlFormatter formatter = null)
{
if (formatter == null)
formatter = GmlFormatter.Default;
using (var writer = GetIndentedTextWriter(tw, formatter))
{
Write(writer, formatter);
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write(string.Concat("with", formatter.Padding, "("));
Instance.Write(writer, formatter);
writer.WriteLine(")");
if (Body.Kind != StatementKind.Sequence)
writer.Indent++;
Body.Write(writer, formatter);
if (Body.Kind != StatementKind.Sequence)
writer.Indent--;
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
writer.Write(Function.Name + "(");
for (int i = 0; i < Expressions.Length; i++)
{
if (i != 0)
writer.Write("," + formatter.Padding);
Expressions[i].Write(writer, formatter);
}
writer.Write(")");
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write(string.Concat("switch", formatter.Padding, "("));
Expression.Write(writer, formatter);
writer.WriteLine(")");
writer.WriteLine("{");
writer.Indent++;
foreach (var stmt in Statements)
stmt.Write(writer, formatter);
writer.Indent--;
writer.WriteLine("}");
}
public void Write(TextWriter tw, GmlFormatter formatter = null)
{
if (formatter == null)
{
formatter = GmlFormatter.Default;
}
using (var writer = GetIndentedTextWriter(tw, formatter))
{
Write(writer, formatter);
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write(string.Concat("for", formatter.Padding, "("));
Initializer.Write(writer, formatter, false);
writer.Write(";" + formatter.Padding);
Test.Write(writer, formatter);
writer.Write(";" + formatter.Padding);
Iterator.Write(writer, formatter, false);
writer.WriteLine(")");
if (Body.Kind != StatementKind.Sequence)
writer.Indent++;
Body.Write(writer, formatter);
if (Body.Kind != StatementKind.Sequence)
writer.Indent--;
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write("globalvar");
if (Variables.Any())
writer.Write(" ");
for (var i = 0; i < Variables.Length; i++)
{
if (i != 0)
writer.Write("," + formatter.Padding);
writer.Write(Variables[i]);
}
if (semicolon)
writer.WriteLine(";");
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write("do");
if (Body.Kind != StatementKind.Sequence && string.IsNullOrEmpty(formatter.Newline))
writer.Write(" ");
writer.WriteLine();
if (Body.Kind != StatementKind.Sequence)
writer.Indent++;
Body.Write(writer, formatter);
if (Body.Kind != StatementKind.Sequence)
writer.Indent--;
writer.Write(string.Concat("while", formatter.Padding, "("));
Expression.Write(writer, formatter);
writer.Write(")");
if (semicolon)
writer.WriteLine(";");
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
if (Value.IsString)
writer.Write(Value.String.Contains("\"") ? string.Format("'{0}'", Value.String) : string.Format("\"{0}\"", Value.String));
else
{
writer.Write((long)Math.Floor(Value.Real));
if (Value.Real - Math.Floor(Value.Real) != 0)
{
writer.Write(".");
// TODO: Do this correctly.
var frac = (long)(Math.Floor(Value.Real) * 1000000000000000.0);
while (frac % 10 == 0)
frac /= 10;
writer.Write(frac);
}
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write(string.Concat("if", formatter.Padding, "("));
Expression.Write(writer, formatter);
writer.WriteLine(")");
if (Body.Kind != StatementKind.Sequence)
writer.Indent++;
Body.Write(writer, formatter);
if (Body.Kind != StatementKind.Sequence)
writer.Indent--;
if (Else != null && Else.Kind != StatementKind.Nop)
{
if (Else.Kind != StatementKind.Sequence)
writer.Indent++;
Else.Write(writer, formatter);
if (Else.Kind != StatementKind.Sequence)
writer.Indent--;
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
if (Instance != null)
{
Instance.Write(writer, formatter);
writer.Write(".");
}
writer.Write(Name);
if (Indices.Length != 0)
{
writer.Write("[");
for (int i = 0; i < Indices.Length; i++)
{
if (i != 0)
writer.Write("," + formatter.Padding);
Indices[i].Write(writer, formatter);
}
writer.Write("]");
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
writer.Write("~");
Operand.Write(writer, formatter);
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{ }
internal static IndentedTextWriter GetIndentedTextWriter(TextWriter writer, GmlFormatter formatter)
{
return new IndentedTextWriter(writer, formatter.TabString) { NewLine = formatter.Newline };
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
// Id is not a valid as an expression, as it is only used during parsing.
throw new InvalidOperationException();
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
Left.Write(writer, formatter);
writer.Write(string.Concat(formatter.Padding, Operator, formatter.Padding));
Right.Write(writer, formatter);
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write(string.Concat("switch", formatter.Padding, "("));
Expression.Write(writer, formatter);
writer.WriteLine(")");
writer.WriteLine("{");
writer.Indent++;
foreach (var stmt in Statements)
{
stmt.Write(writer, formatter);
}
writer.Indent--;
writer.WriteLine("}");
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
// Write nothing
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
writer.Write("(");
InnerExpression.Write(writer, formatter);
writer.Write(")");
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
writer.Write("(");
InnerExpression.Write(writer, formatter);
writer.Write(")");
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
if (Value.IsString)
{
writer.Write(Value.String.Contains("\"") ? string.Format("'{0}'", Value.String) : string.Format("\"{0}\"", Value.String));
}
else
{
writer.Write((long)Math.Floor(Value.Real));
if (Value.Real - Math.Floor(Value.Real) != 0)
{
writer.Write(".");
// TODO: Do this correctly.
var frac = (long)(Math.Floor(Value.Real) * 1000000000000000.0);
while (frac % 10 == 0)
{
frac /= 10;
}
writer.Write(frac);
}
}
}
abstract internal void Write(IndentedTextWriter writer, GmlFormatter formatter);
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
var indent = writer.Indent;
if (indent != 0)
{
writer.Indent--;
}
writer.WriteLine("default:");
if (indent != 0)
{
writer.Indent++;
}
}
public override string ToString(GmlFormatter formatter)
{
return Name;
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
Write(writer, formatter, true);
}
public override string ToString(GmlFormatter formatter)
{
return(Name);
}
internal abstract void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon);
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
if (Instance != null)
{
Instance.Write(writer, formatter);
writer.Write(".");
}
writer.Write(Name);
if (Indices.Length != 0)
{
writer.Write("[");
for (int i = 0; i < Indices.Length; i++)
{
if (i != 0)
{
writer.Write("," + formatter.Padding);
}
Indices[i].Write(writer, formatter);
}
writer.Write("]");
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.WriteLine("exit");
if (semicolon)
{
writer.WriteLine(";");
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
writer.Write(Function.Name + "(");
for (int i = 0; i < Expressions.Length; i++)
{
if (i != 0)
{
writer.Write("," + formatter.Padding);
}
Expressions[i].Write(writer, formatter);
}
writer.Write(")");
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
var indent = writer.Indent;
if (indent != 0)
{
writer.Indent--;
}
writer.Write("case ");
Expression.Write(writer, formatter);
writer.WriteLine(":");
if (indent != 0)
{
writer.Indent++;
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
writer.Write("~");
Operand.Write(writer, formatter);
}
internal override void Write(IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
// Write the sequence with curly braces.
Write(writer, formatter, semicolon, true);
}
internal abstract void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon);
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write("return ");
Expression.Write(writer, formatter);
if (semicolon)
{
writer.WriteLine(";");
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
Lefthand.Write(writer, formatter);
writer.Write(string.Format("{1}{0}{1}", Operator, formatter.Padding));
Expression.Write(writer, formatter);
if (semicolon)
{
writer.WriteLine(";");
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write(string.Concat("for", formatter.Padding, "("));
Initializer.Write(writer, formatter, false);
writer.Write(";" + formatter.Padding);
Test.Write(writer, formatter);
writer.Write(";" + formatter.Padding);
Iterator.Write(writer, formatter, false);
writer.WriteLine(")");
if (Body.Kind != StatementKind.Sequence)
{
writer.Indent++;
}
Body.Write(writer, formatter);
if (Body.Kind != StatementKind.Sequence)
{
writer.Indent--;
}
}
internal override void Write(IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
// Write the sequence with curly braces.
Write(writer, formatter, semicolon, true);
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
// Write nothing
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write(string.Concat("while", formatter.Padding, "("));
Expression.Write(writer, formatter);
writer.WriteLine(")");
if (Body.Kind != StatementKind.Sequence)
{
writer.Indent++;
}
Body.Write(writer, formatter);
if (Body.Kind != StatementKind.Sequence)
{
writer.Indent--;
}
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.Write("var");
if (Variables.Any())
{
writer.Write(" ");
}
for (var i = 0; i < Variables.Length; i++)
{
if (i != 0)
{
writer.Write("," + formatter.Padding);
}
writer.Write(Variables[i]);
}
if (semicolon)
{
writer.WriteLine(";");
}
}
abstract internal void Write(IndentedTextWriter writer, GmlFormatter formatter);
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
// Id is not a valid as an expression, as it is only used during parsing.
throw new InvalidOperationException();
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter, bool semicolon)
{
writer.WriteLine("continue");
if (semicolon)
writer.WriteLine(";");
}
internal override void Write(System.CodeDom.Compiler.IndentedTextWriter writer, GmlFormatter formatter)
{
Left.Write(writer, formatter);
writer.Write(string.Concat(formatter.Padding, Operator, formatter.Padding));
Right.Write(writer, formatter);
}
