public static TypeSpec[] CreateBinaryPromotionsTypes (BuiltinTypes types)
		{
			return new TypeSpec[] { 
				types.Decimal, types.Double, types.Float,
				types.ULong, types.Long, types.UInt
			};
		}

		public UIntConstant (BuiltinTypes types, uint v, Location loc)
			: this (types.UInt, v, loc)
		{
		}

		public CompilerContext (CompilerSettings settings, ReportPrinter reportPrinter)
		{
			this.settings = settings;
			this.report = new Report (this, reportPrinter);
			this.builtin_types = new BuiltinTypes ();
			this.TimeReporter = DisabledTimeReporter;
		}

		public RegexLiteral (BuiltinTypes types, string regex, string options, Location loc)
			: base (loc)
		{
			Regex = regex;
			Options = options ?? "";
		}

		public UShortConstant (BuiltinTypes types, ushort v, Location loc)
			: this (types.UShort, v, loc)
		{
		}

		public CharConstant (BuiltinTypes types, char v, Location loc)
			: this (types.Char, v, loc)
		{
		}

		public StringConstant (BuiltinTypes types, string s, Location loc)
			: this (types.String, s, loc)
		{
		}

		public DoubleConstant (BuiltinTypes types, double v, Location loc)
			: this (types.Double, v, loc)
		{
		}

		public FloatLiteral (BuiltinTypes types, float f, Location loc)
			: base (types, f, loc)
		{
		}

		public ULongLiteral (BuiltinTypes types, ulong l, Location loc)
			: base (types, l, loc)
		{
		}

		public UIntLiteral (BuiltinTypes types, uint l, Location loc)
			: base (types, l, loc)
		{
		}

		public CharLiteral (BuiltinTypes types, char c, Location loc)
			: base (types, c, loc)
		{
		}

		public static FullNamedExpression CreateDelegateTypeExpression (BuiltinTypes builtinTypes, ParametersCompiled parameters, FullNamedExpression retType, Location loc){
			bool hasParams = parameters != null && parameters.Count > 0;
			int paramCount = hasParams ? parameters.Count : 0;
			bool hasRetType = !(retType is TypeExpression && ((TypeExpression)retType).Type == builtinTypes.Void);
			int typeParamCount = paramCount;
			if (hasRetType)
				typeParamCount++;
			TypeArguments typeArgs = null;
			if (typeParamCount > 0) {
				var typeArgArray = new FullNamedExpression[typeParamCount];
				for (var i = 0; i < paramCount; i++) {
					if (i < paramCount) {
						var param = parameters.FixedParameters[i] as Parameter;
						typeArgArray[i] = param.TypeExpression;
					} else {
						typeArgArray[i] = retType;
					}
				}
				typeArgs = new TypeArguments (typeArgArray);
			}
			if (!hasRetType) {
				return new MemberAccess(new SimpleName("System", loc), "Action", typeArgs, loc);
			} else {
				return new MemberAccess(new SimpleName("System", loc), "Func", typeArgs, loc);
			}
		}

		public XmlLiteral (BuiltinTypes types, string xml, Location loc)
			: base (loc)
		{
			Xml = xml;
		}

		public ULongConstant (BuiltinTypes types, ulong v, Location loc)
			: this (types.ULong, v, loc)
		{
		}

		public FloatConstant (BuiltinTypes types, float v, Location loc)
			: this (types.Float, v, loc)
		{
		}

		public DoubleLiteral (BuiltinTypes types, double d, Location loc)
			: base (types, d, loc)
		{
		}

		public DecimalConstant (BuiltinTypes types, decimal d, Location loc)
			: this (types.Decimal, d, loc)
		{
		}

		public DecimalLiteral (BuiltinTypes types, decimal d, Location loc)
			: base (types, d, loc)
		{
		}

		public BoolConstant (BuiltinTypes types, bool val, Location loc)
			: this (types.Bool, val, loc)
		{
		}