Added syntax highlighting for ReScript (SpartanJ/ecode#407).

Author: SpartanJ

src/modules/languages-syntax-highlighting/src/eepp/ui/doc/languages/pony.cpp

@@ -64,7 +64,7 @@ void addPony() {
 			  { "iftype", "keyword" },
 			  { "struct", "keyword" },
 			  { "break", "keyword2" },
-			  { "is", "keyword2" },
+			  { "is", "keyword" },
 			  { "use", "keyword" },
 			  { "or", "keyword2" },
 			  { "until", "keyword" },

src/modules/languages-syntax-highlighting/src/eepp/ui/doc/languages/rescript.cpp

@@ -0,0 +1,54 @@
+#include <eepp/ui/doc/languages/rescript.hpp>
+#include <eepp/ui/doc/syntaxdefinitionmanager.hpp>
+
+namespace EE { namespace UI { namespace Doc { namespace Language {
+
+void addRescript() {
+
+	SyntaxDefinitionManager::instance()->add(
+
+		{ "ReScript",
+		  { "%.res$" },
+		  {
+			  { { "//.-\n" }, "comment" },
+			  { { "/%*", "%*/" }, "comment" },
+			  { { "\"", "\"", "\\" }, "string" },
+			  { { "`", "`", "\\" }, "string" },
+
+			  { { "%f[^<]![%a_][%w%_%-]*" }, "keyword2" },
+			  { { "%f[^<][%a_][%w%_%-]*" }, "function" },
+			  { { "%f[^<]/[%a_][%w%_%-]*" }, "function" },
+			  { { "([%a_-][%w-_]*)(%\?\?)(=)%f[%{%\"]" },
+				{ "normal", "keyword", "normal", "operator" } },
+
+			  { { "js_number_parser" }, "number", "", SyntaxPatternMatchType::Parser },
+			  { { "#[%a_][%w_]*" }, "literal" },
+			  { { "%l[%w_]*%f[(]" }, "function" },
+			  { { "%u[%w_]*" }, "keyword2" },
+			  { { "[%+%-=/%*%^%%<>!~|&]" }, "operator" },
+			  { { "'[%a_][%w_]*" }, "keyword3" },
+			  { { "@%l[%w_]*" }, "keyword3" },
+			  { { "[%l_][%w_%.]*" }, "symbol" },
+
+		  },
+		  {
+			  { "int", "keyword2" },	   { "in", "keyword" },		 { "external", "keyword" },
+			  { "and", "keyword" },		   { "include", "keyword" }, { "switch", "keyword" },
+			  { "bool", "keyword2" },	   { "try", "keyword" },	 { "as", "keyword" },
+			  { "exception", "keyword" },  { "lazy", "keyword" },	 { "of", "keyword" },
+			  { "rec", "keyword" },		   { "with", "keyword" },	 { "module", "keyword" },
+			  { "false", "literal" },	   { "for", "keyword" },	 { "array", "keyword2" },
+			  { "while", "keyword" },	   { "assert", "keyword" },	 { "true", "literal" },
+			  { "else", "keyword" },	   { "option", "keyword2" }, { "when", "keyword" },
+			  { "downto", "keyword" },	   { "string", "keyword2" }, { "if", "keyword" },
+			  { "constraint", "keyword" }, { "let", "keyword" },	 { "mutable", "keyword" },
+			  { "open", "keyword" },	   { "type", "keyword" },	 { "to", "keyword" },
+
+		  },
+		  "//",
+		  {}
+
+		} );
+}
+
+}}}} // namespace EE::UI::Doc::Language

src/modules/languages-syntax-highlighting/src/eepp/ui/doc/languages/rescript.hpp

@@ -0,0 +1,10 @@
+#ifndef EE_UI_DOC_Rescript
+#define EE_UI_DOC_Rescript
+
+namespace EE { namespace UI { namespace Doc { namespace Language {
+
+extern void addRescript();
+
+}}}} // namespace EE::UI::Doc::Language
+
+#endif

src/modules/languages-syntax-highlighting/src/eepp/ui/doc/languagessyntaxhighlighting.cpp

@@ -72,6 +72,7 @@
 #include <eepp/ui/doc/languages/powershell.hpp>
 #include <eepp/ui/doc/languages/r.hpp>
 #include <eepp/ui/doc/languages/rave.hpp>
+#include <eepp/ui/doc/languages/rescript.hpp>
 #include <eepp/ui/doc/languages/ring.hpp>
 #include <eepp/ui/doc/languages/ruby.hpp>
 #include <eepp/ui/doc/languages/rust.hpp>
@@ -184,6 +185,7 @@ void LanguagesSyntaxHighlighting::load() {
 	addPowerShell();
 	addR();
 	addRave();
+	addRescript();
 	addRuby();
 	addRust();
 	addSass();

src/tools/ecode/ecode.cpp

@@ -3536,7 +3536,7 @@ void App::init( const LogLevel& logLevel, std::string file, const Float& pidelDe
 	mThreadPool->run( [this] {
 		// Load language definitions
 		Clock defClock;
-		SyntaxDefinitionManager::createSingleton( 124 );
+		SyntaxDefinitionManager::createSingleton( 125 );
 		Language::LanguagesSyntaxHighlighting::load();
 		SyntaxDefinitionManager::instance()->setLanguageExtensionsPriority(
 			mConfig.languagesExtensions.priorities );