add support for debugging with gas

Author: MESYETI

source/backends/x86_64.d

@@ -50,6 +50,7 @@ class BackendX86_64 : CompilerBackend {
 	uint             tempLabelNum;
 	bool             useGas = false;
 	bool             useFramePtr = true;
+	int[string]      fileID;
 
 	this() {
 		output = new Output();
@@ -112,6 +113,21 @@ class BackendX86_64 : CompilerBackend {
 		);
 	}
 
+	int GetMaxFileID() {
+		int ret = 0;
+		foreach (key, value ; fileID) {
+			if (value > ret) ret = value;
+		}
+		return ret;
+	}
+
+	int GetOrCreateFileID(string file) {
+		if (file !in fileID) {
+			fileID[file] = GetMaxFileID() + 1;
+		}
+		return fileID[file];
+	}
+
 	string TempLabel() {
 		++ tempLabelNum;
 		return format("__temp_%d", tempLabelNum);
@@ -260,6 +276,28 @@ class BackendX86_64 : CompilerBackend {
 		}
 	}
 
+	override void BeforeCompile(Node node) {
+		static string thisFile;
+
+		if (useDebug && useGas) {
+			if (thisFile != node.error.file) {
+				thisFile  = node.error.file;
+
+				if (node.error.file !in fileID) {
+					output ~= format(
+						".file %d \"%s\"\n", GetOrCreateFileID(node.error.file),
+						node.error.file
+					);
+				}
+			}
+
+			output ~= format(
+				".loc %d %d %d\n", GetOrCreateFileID(node.error.file),
+				node.error.line + 1, node.error.col + 1
+			);
+		}
+	}
+
 	override void BeginMain() {
 		output ~= "__calmain:\n";
 
@@ -774,11 +812,6 @@ class BackendX86_64 : CompilerBackend {
 		}
 
 		if (node.inline) {
-			if (node.errors) {
-				output ~= format("lea rax, __global_%s\n", Sanitise("_cal_exception"));
-				output ~= "mov [rax], 0\n";
-			}
-
 			words[node.name] = Word(
 				WordType.Callisto, true, node.nodes, node.errors, params
 			);

source/compiler.d

@@ -103,6 +103,8 @@ class CompilerBackend {
 	abstract string   DefaultHeader();
 	abstract bool     HandleOption(string opt, ref string[] versions, Preprocessor preproc);
 
+	void BeforeCompile(Node node) {}
+
 	abstract void BeginMain();
 
 	abstract void Init();
@@ -404,6 +406,8 @@ class Compiler {
 	}
 
 	void CompileNode(Node inode) {
+		backend.BeforeCompile(inode);
+
 		switch (inode.type) {
 			case NodeType.Word: {
 				auto node = cast(WordNode) inode;