Added additional operators to Reason (#1648)

This adds the `|>` and `->` operators to Reason.

components/prism-reason.js

@@ -10,7 +10,7 @@ Prism.languages.reason = Prism.languages.extend('clike', {
 	// 'class-name' must be matched *after* 'constructor' defined below
 	'class-name': /\b[A-Z]\w*/,
 	'keyword': /\b(?:and|as|assert|begin|class|constraint|do|done|downto|else|end|exception|external|for|fun|function|functor|if|in|include|inherit|initializer|lazy|let|method|module|mutable|new|nonrec|object|of|open|or|private|rec|sig|struct|switch|then|to|try|type|val|virtual|when|while|with)\b/,
-	'operator': /\.{3}|:[:=]|=(?:==?|>)?|<=?|>=?|[|^?'#!~`]|[+\-*\/]\.?|\b(?:mod|land|lor|lxor|lsl|lsr|asr)\b/
+	'operator': /\.{3}|:[:=]|\|>|->|=(?:==?|>)?|<=?|>=?|[|^?'#!~`]|[+\-*\/]\.?|\b(?:mod|land|lor|lxor|lsl|lsr|asr)\b/
 });
 Prism.languages.insertBefore('reason', 'class-name', {
 	'character': {

tests/languages/reason/operator_feature.test

@@ -8,6 +8,7 @@
 +. -. *. /.
 mod land lor lxor
 lsl lsr asr
+|> ->
 
 ----------------------------------------------------
 
@@ -21,7 +22,8 @@ lsl lsr asr
 	["operator", "+"], ["operator", "-"], ["operator", "*"], ["operator", "/"],
 	["operator", "+."], ["operator", "-."], ["operator", "*."], ["operator", "/."],
 	["operator", "mod"], ["operator", "land"], ["operator", "lor"], ["operator", "lxor"],
-	["operator", "lsl"], ["operator", "lsr"], ["operator", "asr"]
+	["operator", "lsl"], ["operator", "lsr"], ["operator", "asr"],
+	["operator", "|>"], ["operator", "->"]
 ]
 
 ----------------------------------------------------