ghc-exactprint-0.5.0.0: tests/examples/ghc8/T10196.hs

module T10196 where

data X = Xᵦ | Xᵤ | Xᵩ | Xᵢ | Xᵪ | Xᵣ

f :: Int
f =
  let xᵦ = 1
      xᵤ = xᵦ
      xᵩ = xᵤ
      xᵢ = xᵩ
      xᵪ = xᵢ
      xᵣ = xᵪ
  in xᵣ