add Context.fatalError (closes #1936)

interp.ml

@@ -2050,6 +2050,12 @@ let macro_lib =
 				raise Abort
 			| _ -> error()
 		);
+		"fatal_error", Fun2 (fun msg p ->
+			match msg, p with
+			| VString s, VAbstract (APos p) ->
+				raise (Typecore.Fatal_error (s,p))
+			| _ -> error()
+		);		
 		"warning", Fun2 (fun msg p ->
 			match msg, p with
 			| VString s, VAbstract (APos p) ->

std/haxe/macro/Context.hx

@@ -45,6 +45,14 @@ class Context {
 	public static function error( msg : String, pos : Position ) : Dynamic {
 		return load("error",2)(untyped msg.__s, pos);
 	}
+	
+	/**
+		Displays a compilation error `msg` at the given `Position` `pos`
+		and aborts the compilation.
+	**/
+	public static function fatalError( msg : String, pos : Position ) : Dynamic {
+		return load("fatal_error",2)(untyped msg.__s, pos);
+	}
 
 	/**
 		Displays a compilation warning `msg` at the given `Position` `pos`.