From dbeba0347d706a300f7fccd163ee5dbaf6dc71b2 Mon Sep 17 00:00:00 2001
From: Paul Vorobyev <paul.vorobyev@gmail.com>
Date: Sun, 10 Nov 2019 10:56:25 -0500
Subject: [PATCH] scheme: Add racket support to scheme parser

---
 parsers/scheme.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/parsers/scheme.c b/parsers/scheme.c
index e77831cbc1..1f853416a2 100644
--- a/parsers/scheme.c
+++ b/parsers/scheme.c
@@ -111,10 +111,10 @@ static void findSchemeTags (void)
 extern parserDefinition* SchemeParser (void)
 {
 	static const char *const extensions [] = {
-		"SCM", "SM", "sch", "scheme", "scm", "sm", NULL
+		"SCM", "SM", "sch", "scheme", "scm", "sm", "rkt", NULL
 	};
 	static const char *const aliases [] = {
-		"gosh", "guile", NULL
+		"gosh", "guile", "racket", NULL
 	};
 	parserDefinition* def = parserNew ("Scheme");
 	def->kindTable      = SchemeKinds;