Fixed operator-like functions in Scheme (#1467)

This fixes operator-like functions in Scheme.
PrismJS · Mar 3, 2019 · f8c8add · f8c8add
1 parent b62e282
commit f8c8add
Show file tree

Hide file tree

Showing 3 changed files with 12 additions and 6 deletions.
diff --git a/components/prism-scheme.js b/components/prism-scheme.js
@@ -22,12 +22,12 @@ Prism.languages.scheme = {
 	},
 	'boolean': /#[tf]/,
 	'operator': {
-		pattern: /(\()(?:[-+*%\/]|[<>]=?|=>?)/,
+		pattern: /(\()(?:[-+*%\/]|[<>]=?|=>?)(?=\s|$)/,
 		lookbehind: true
 	},
-	'function': {
-		pattern: /(\()[^()#'\s]+(?=[()\s)])/,
-		lookbehind: true
+	'function' : {
+		pattern : /(\()[^()'\s]+(?=[()\s)]|$)/,
+		lookbehind : true
 	},
-	'punctuation': /[()']/
+	'punctuation' : /[()']/
 };
diff --git a/components/prism-scheme.min.js b/components/prism-scheme.min.js
diff --git a/tests/languages/scheme/function_feature.test b/tests/languages/scheme/function_feature.test
@@ -3,6 +3,9 @@
 (exact? 2)
 (inexact->exact 3)
 (!fact)
+(** 10)
+(exact?
+(**
 (defined foo)
 
 ----------------------------------------------------
@@ -13,6 +16,9 @@
 	["punctuation", "("], ["function", "exact?"], ["number", "2"], ["punctuation", ")"],
 	["punctuation", "("], ["function", "inexact->exact"], ["number", "3"], ["punctuation", ")"],
 	["punctuation", "("], ["function", "!fact"], ["punctuation", ")"],
+	["punctuation", "("], ["function", "**"], ["number", "10"], ["punctuation", ")"],
+	["punctuation", "("], ["function", "exact?"],
+	["punctuation", "("], ["function", "**"],
 	["punctuation", "("], ["function", "defined"], " foo", ["punctuation", ")"]
 ]