ssc/ssc/ast/nodes.operators.cs

using PerCederberg.Grammatica.Runtime;

namespace arookas {
	enum Associativity {
		Left,
		Right,
	}

	abstract class sunOperator : sunNode {
		public virtual Associativity Associativity { get { return Associativity.Left; } }
		public abstract int Precedence { get; }

		public bool IsLeftAssociative { get { return Associativity == Associativity.Left; } }
		public bool IsRightAssociative { get { return Associativity == Associativity.Right; } }

		protected sunOperator(sunSourceLocation location)
			: base(location) { }
	}

	// precedence 0
	class sunLogOR : sunOperator {
		public override int Precedence { get { return 0; } }

		public sunLogOR(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteOR(); }
	}

	// precedence 1
	class sunLogAND : sunOperator {
		public override int Precedence { get { return 1; } }

		public sunLogAND(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteAND(); }
	}

	// precedence 2
	class sunBitOR : sunOperator {
		public override int Precedence { get { return 2; } }

		public sunBitOR(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteBOR(); }
	}

	// precedence 3
	class sunBitAND : sunOperator {
		public override int Precedence { get { return 3; } }

		public sunBitAND(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteBAND(); }
	}

	// precedence 4
	class sunEq : sunOperator {
		public override int Precedence { get { return 4; } }

		public sunEq(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteEQ(); }
	}

	class sunNtEq : sunOperator {
		public override int Precedence { get { return 4; } }

		public sunNtEq(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteNE(); }
	}

	// precedence 5
	class sunLt : sunOperator {
		public override int Precedence { get { return 5; } }

		public sunLt(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteLT(); }
	}

	class sunLtEq : sunOperator {
		public override int Precedence { get { return 5; } }

		public sunLtEq(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteLE(); }
	}

	class sunGt : sunOperator {
		public override int Precedence { get { return 5; } }

		public sunGt(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteGT(); }
	}

	class sunGtEq : sunOperator {
		public override int Precedence { get { return 5; } }

		public sunGtEq(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteGE(); }
	}

	// precedence 6
	class sunBitLsh : sunOperator {
		public override int Precedence { get { return 6; } }

		public sunBitLsh(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteSHL(); }
	}

	class sunBitRsh : sunOperator {
		public override int Precedence { get { return 6; } }

		public sunBitRsh(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteSHR(); }
	}

	// precedence 7
	class sunAdd : sunOperator {
		public override int Precedence { get { return 7; } }

		public sunAdd(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteADD(); }
	}

	class sunSub : sunOperator {
		public override int Precedence { get { return 7; } }

		public sunSub(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteSUB(); }
	}

	// precedence 8
	class sunMul : sunOperator {
		public override int Precedence { get { return 8; } }

		public sunMul(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteMUL(); }
	}

	class sunDiv : sunOperator {
		public override int Precedence { get { return 8; } }

		public sunDiv(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteDIV(); }
	}

	class sunMod : sunOperator {
		public override int Precedence { get { return 8; } }

		public sunMod(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteMOD(); }
	}

	// precedence 9
	class sunLogNOT : sunOperator {
		public override int Precedence { get { return 9; } }

		public sunLogNOT(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteNOT(); }
	}
	class sunNeg : sunOperator {
		public override int Precedence { get { return 9; } }

		public sunNeg(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context) { context.Text.WriteNEG(); }
	}

	// assignment operators
	class sunAssign : sunOperator {
		public override Associativity Associativity { get { return Associativity.Right; } }
		public override int Precedence { get { return -1; } }

		public sunAssign(sunSourceLocation location)
			: base(location) { }

		public virtual void Compile(sunContext context, sunStorableSymbol symbol, sunExpression expression) {
			expression.Compile(context);
			symbol.CompileSet(context);
		}
	}

	class sunAssignAdd : sunAssign {
		public sunAssignAdd(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context, sunStorableSymbol symbol, sunExpression expression) {
			symbol.CompileGet(context);
			expression.Compile(context);
			context.Text.WriteADD();
			symbol.CompileSet(context);
		}
	}

	class sunAssignSub : sunAssign {
		public sunAssignSub(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context, sunStorableSymbol symbol, sunExpression expression) {
			symbol.CompileGet(context);
			expression.Compile(context);
			context.Text.WriteSUB();
			symbol.CompileSet(context);
		}
	}

	class sunAssignMul : sunAssign {
		public sunAssignMul(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context, sunStorableSymbol symbol, sunExpression expression) {
			symbol.CompileGet(context);
			expression.Compile(context);
			context.Text.WriteMUL();
			symbol.CompileSet(context);
		}
	}

	class sunAssignDiv : sunAssign {
		public sunAssignDiv(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context, sunStorableSymbol symbol, sunExpression expression) {
			symbol.CompileGet(context);
			expression.Compile(context);
			context.Text.WriteDIV();
			symbol.CompileSet(context);
		}
	}

	class sunAssignMod : sunAssign {
		public sunAssignMod(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context, sunStorableSymbol symbol, sunExpression expression) {
			symbol.CompileGet(context);
			expression.Compile(context);
			context.Text.WriteMOD();
			symbol.CompileSet(context);
		}
	}

	class sunAssignBitAND : sunAssign {
		public sunAssignBitAND(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context, sunStorableSymbol symbol, sunExpression expression) {
			symbol.CompileGet(context);
			expression.Compile(context);
			context.Text.WriteBAND();
			symbol.CompileSet(context);
		}
	}

	class sunAssignBitOR : sunAssign {
		public sunAssignBitOR(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context, sunStorableSymbol symbol, sunExpression expression) {
			symbol.CompileGet(context);
			expression.Compile(context);
			context.Text.WriteBOR();
			symbol.CompileSet(context);
		}
	}

	class sunAssignBitLsh : sunAssign {
		public sunAssignBitLsh(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context, sunStorableSymbol symbol, sunExpression expression) {
			symbol.CompileGet(context);
			expression.Compile(context);
			context.Text.WriteSHL();
			symbol.CompileSet(context);
		}
	}

	class sunAssignBitRsh : sunAssign {
		public sunAssignBitRsh(sunSourceLocation location)
			: base(location) { }

		public override void Compile(sunContext context, sunStorableSymbol symbol, sunExpression expression) {
			symbol.CompileGet(context);
			expression.Compile(context);
			context.Text.WriteSHR();
			symbol.CompileSet(context);
		}
	}
}