From aa736f5f36de0c8196534497c47e0d1f614c311d Mon Sep 17 00:00:00 2001
From: Jade Lovelace <software@lfcode.ca>
Date: Sun, 18 Sep 2022 12:54:18 -0700
Subject: [PATCH] haskell/highlights: Match `pattern` as a keyword

Sample:
-- | Smart constructor that deduplicates plugins
pattern IdePlugins :: [PluginDescriptor ideState] -> IdePlugins ideState
pattern IdePlugins{ipMap} <- IdePlugins_ (sortOn (Down . pluginPriority) . HashMap.elems -> ipMap) _
  where
    IdePlugins ipMap = IdePlugins_{ipMap_ = HashMap.fromList $ (pluginId &&& id) <$> ipMap
                                  , lookupCommandProvider = lookupPluginId ipMap
                                  }
---
 queries/haskell/highlights.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/queries/haskell/highlights.scm b/queries/haskell/highlights.scm
index 06f59b5f5..c37c33b3e 100644
--- a/queries/haskell/highlights.scm
+++ b/queries/haskell/highlights.scm
@@ -81,6 +81,7 @@
   "in"
   "class"
   "instance"
+  "pattern"
   "data"
   "newtype"
   "family"