blob: a29f0c3a0814bc9795dd8017d9c42e36d30e01b6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
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ᵣ
-- Modifier letters are also allowed in the middle of an identifier.
-- This should not be lexed as 2 separate identifiers.
xᵦx :: Int
xᵦx = 1
|