From 899f51f156dbcaa2457c1ccb7f210b3664bc8dc4 Mon Sep 17 00:00:00 2001
From: Syndamia <kamen@syndamia.com>
Date: Sun, 25 Feb 2024 15:57:00 +0200
Subject: (awk-edits/MEL) Error messages now underline which part of the line
 has the error

---
 awk-edits/MEL-parser.awk | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/awk-edits/MEL-parser.awk b/awk-edits/MEL-parser.awk
index af1e26d..90234d4 100644
--- a/awk-edits/MEL-parser.awk
+++ b/awk-edits/MEL-parser.awk
@@ -42,9 +42,15 @@ function usesMEL() {
 	MELLINE      = "l"
 }
 
-function printErr(message) {
-	print "ERROR by MEL-parser.awk: " message " | Found in " FILENAME " at line " FNR " & column " RSTART + length(newLine) - 5 ":\n" $0 > "/dev/stderr"
-	print > "/dev/stderr"
+function printErr(message, column, columnPointer) {
+	column = RSTART + length(newLine) - 5
+	print "ERROR by MEL-parser.awk: " message " | Found in " FILENAME " at line " FNR " & column " column ":" > "/dev/stderr"
+	columnPointer = ""
+	for (i = -5; i < RLENGTH; i++)
+		columnPointer = "^" columnPointer
+	for (i = 1; i < column; i++)
+		columnPointer = " " columnPointer
+	print $0 "\n" columnPointer "\n" > "/dev/stderr"
 }
 
 /<code>/ {
-- 
cgit v1.3.1-23-gd82d