summaryrefslogtreecommitdiff
path: root/test/coq/pass/exatom.sail
blob: db162536c97aa86be84e8a433384921db9248074 (plain)
1
2
3
4
5
6
7
8
9
$include <prelude.sail>

val f : forall 'n, 'n in {8,16}. atom('n) -> atom('n)

val make : unit -> {'n, 'n in {8,16}. atom('n)}

val test : {'n, 'n in {8,16}. atom('n)} -> int

function test(v) = f(v)