Mercurial > urweb

annotate tests/stuff.lac @ 7:2ce5bf227d01

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add type keyword
author Adam Chlipala <adamc@hcoop.net>
date Sat, 26 Jan 2008 16:51:39 -0500
parents 38bf996e1c2e
children a455a9f85cc3
rev   line source
adamc@7 1 type c1 = t :: Type -> t
adamc@1 2 con c2 :: Type = t :: Type -> t
adamc@1 3 con c3 = fn t :: Type => c1
adamc@1 4 con c4 = c3 c1
adamc@1 5 con c5 = (fn t :: Type => c1) c1
adamc@1 6
adamc@1 7 con name = #MyName
adamc@1 8
adamc@1 9 con c6 = {A : c1, name : c2}
adamc@1 10 con c7 = [A = c1, name = c2]
adamc@5 11
adamc@5 12 con c8 = fn t :: Type => t
adamc@6 13
adamc@6 14 con c9 = {}
adamc@6 15 con c10 = ([]) :: {Type}