From 19152f21755d9df84392bed85f7fec2a004f87e8 Mon Sep 17 00:00:00 2001
From: Vanessa McHale <vanessa.mchale@reconfigure.io>
Date: Mon, 26 Feb 2018 17:40:25 -0600
Subject: [PATCH] package publish

---
 syntax/ats.vim | 19 +++++++++++++++----
 1 file changed, 15 insertions(+), 4 deletions(-)

diff --git a/syntax/ats.vim b/syntax/ats.vim
index cdacc31..6d2c2bd 100644
--- a/syntax/ats.vim
+++ b/syntax/ats.vim
@@ -17,25 +17,36 @@ syn match atsUint "\v[0-9]+u"
 syn match atsInt "\v[0-9]+"
 
 syn match atsSpecial +\v\\["nt]+
+syn match atsSpecial -\v\\[0-9]+-
 
 syn region atsString start=+"+ end=+"+ contains=atsSpecial
 
-syn keyword atsKeyword staload dynload overload with fun symintr include
-syn keyword atsKeyword lam llam
+syn keyword atsKeyword staload dynload overload with fun symintr include fn fnx and prfun prfn
+syn keyword atsKeyword lam llam fix raise of var val prval case ifcase
+syn match atsOperator "\$"
 
-syn match atsArrow "\v\=\>+"
+syn match atsKeyword "\v[\%\+\-\<\>\=!]+"
 
 syn keyword atsFixity infixr infixl prefix postfix
 
+syn keyword arrowContents cloref1 cloptr1 lincloptr cloref cloptr
+
+syn region atsArrow start="=<" end=">" contains=arrowContents
+
 syn keyword atsType void bool string char int uint charNZ strnptr Strptr0 Strptr1 nat
 syn keyword atsType datavtype datatype vtypedef dataviewtype viewtypdef typedef
 syn keyword atsType implement primplmnt extern
 
-syn match atsSpecial "\v[@\[\]]"
+syn match atsParens "[()]"
+
+syn match atsOperator "\v[@\[\]]"
 
 syn match atsMacro "\v\#.*$"
 
+highlight link atsParens Underlined
+highlight link atsArrow Special
 highlight link atsFixity Underlined
+highlight link atsOperator Special
 highlight link atsSpecial Special
 highlight link atsString String
 highlight link atsUint Number