[pascal mode] Make keywords case-insensitive

marijnh · marijnh · commit b60e45680164 · 2024-12-05T10:34:18.000+01:00
Closes #7113
diff --git a/mode/pascal/pascal.js b/mode/pascal/pascal.js
@@ -72,7 +72,7 @@ CodeMirror.defineMode("pascal", function() {
       return "operator";
     }
     stream.eatWhile(/[\w\$_]/);
-    var cur = stream.current();
+    var cur = stream.current().toLowerCase();
     if (keywords.propertyIsEnumerable(cur)) return "keyword";
     if (atoms.propertyIsEnumerable(cur)) return "atom";
     return "variable";

Original file line number	Diff line number	Diff line change
`@@ -72,7 +72,7 @@ CodeMirror.defineMode("pascal", function() {`
`72`	`72`	`return "operator";`
`73`	`73`	`}`
`74`	`74`	`stream.eatWhile(/[\w\$_]/);`
`75`		`- var cur = stream.current();`
	`75`	`+ var cur = stream.current().toLowerCase();`
`76`	`76`	`if (keywords.propertyIsEnumerable(cur)) return "keyword";`
`77`	`77`	`if (atoms.propertyIsEnumerable(cur)) return "atom";`
`78`	`78`	`return "variable";`