-'.source.haskell':
+'.source .haskell':
   'Pragma':
     'prefix': '{-#'
     'body': '{-# $1 #-'

  'Black star':
    'prefix': '*'
    'body': '★' #0x2605
'.source.haskell:not(.comment)':
  'Guard':
    'prefix': '|'
    'body': '| ${1:predicate} = ${0:definition}'
'.source.haskell .comment':
  'Haddock Postfix':
    'prefix': '|'
    'body': '| ${0:documentation}'
  'Haddock Prefix':
    'prefix': '^'
    'body': '^ ${0:documentation}'
'.source.haskell .constant.language.empty-list':
  'List Comprehension':
    'prefix': '['
    'body': '[ ${1:expression} | ${2:${3:name} <- ${4:expression}}$0'
'.source.haskell .meta.type-signature':
  'Type Constraint':
    'prefix': '='
    'body': '(${1:Class}) => $0'
'.source.haskell .meta.type':
  'deriving …':
    'prefix': 'der'
    'body': 'deriving (${0:Class})'

      module Main where

      main :: IO ()
      main = ${0:putStrLn "Hello World"}
      '''
  'Right Arrow':
    'prefix': '>'
