aboutsummaryrefslogblamecommitdiff
path: root/hypsrc-test/src/Literals.hs
blob: 997b6615610d44dda226382b867e8da0eb3703a5 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17















                                     
module Literals where


str :: String
str = "str literal"

num :: Num a => a
num = 0 + 1 + 1010011 * 41231 + 12131

frac :: Fractional a => a
frac = 42.0000001

list :: [[[[a]]]]
list = [[], [[]], [[[]]]]

pair :: ((), ((), (), ()), ())
pair = ((), ((), (), ()), ())