Hopefully finished Xarbon...HEADmaster

1 files changed, 24 insertions, 0 deletions

diff --git a/xanguage/bash.h b/xanguage/bash.h
new file mode 100755
index 0000000..eca4c43
--- /dev/null
+++ b/xanguage/bash.h
@@ -0,0 +1,24 @@
+static procedure language_highlight_bash (language_structure * language, syntax_structure * syntax) {
+	character * separators = ".,:;<=>+-*/%!&~^?|@#$()[]{}'\" \t\r\n";
+
+	character * keywords [] = {
+		"exit",         "set",          "elif",         "done",         "in",           "then",         "function",     "fi",
+		"if",           "else",         "do",           "while",        "for"
+	};
+
+	syntax_define (syntax, false, false, "#",   "\n", '\0', language->comment_colour, language->comment_effect);
+	syntax_define (syntax, false, false, "'",   "'",  '\0', language->string_colour,  language->string_effect);
+	syntax_define (syntax, false, false, "\"",  "\"", '\0', language->string_colour,  language->string_effect);
+
+	for (natural_64 word = 0; word < array_length (keywords); ++word) {
+		syntax_define (syntax, false, true, keywords [word], separators, '\0', language->keyword_colour, language->keyword_effect);
+	}
+
+	syntax_define (syntax, true, false, "()[]{}",                "", '\0', language->bracket_colour,  language->bracket_effect);
+	syntax_define (syntax, true, false, ".,:;<=>+*-/%!&~^?|@#$", "", '\0', language->operator_colour, language->operator_effect);
+
+	syntax_define (syntax, true, true, language_digits,    separators, '\0', language->number_colour,     language->number_effect);
+	syntax_define (syntax, true, true, language_lowercase, separators, '\0', language->lowercase_colour,  language->lowercase_effect);
+	syntax_define (syntax, true, true, language_uppercase, separators, '\0', language->uppercase_colour,  language->uppercase_effect);
+	syntax_define (syntax, true, true, "_",                separators, '\0', language->underscore_colour, language->underscore_effect);
+}