aihc-parser-1.0.0.2: test/Test/Fixtures/golden/module/fixity-operator.yaml

extensions: []
input: |
  module D9 where
  infixr 5 <++>
  (<++>) :: [a] -> [a] -> [a]
  (<++>) = (++ )
ast: |-
  Module {ModuleHead {"D9"}, [DeclFixity InfixR Nothing 5 [UnqualifiedName {"<++>"}], DeclTypeSig ["<++>"] (TFun (TList [TVar "a"]) (TFun (TList [TVar "a"]) (TList [TVar "a"]))), DeclValue (PatternBind (PVar "<++>") (EVar "++"))]}
status: pass