blob: 71f6350cc22df9e76a8e35a55a658da3ed678923 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
-- Trac #2632
module MkData where
import Language.Haskell.TH
op :: Num v => v -> v -> v
op a b = a + b
decl1 = [d| func = 0 `op` 3 |]
decl2 = [d| op x y = x
func = 0 `op` 3 |]
|