X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/27d9de59634e853cac7adf09c9a7f82b3da5fcdc..71420f8bc34bbe2c76bd368613d4e024072e9817:/tests/test.dtl?ds=sidebyside diff --git a/tests/test.dtl b/tests/test.dtl index b23f578..c3c2a19 100644 --- a/tests/test.dtl +++ b/tests/test.dtl @@ -1,3 +1,14 @@ -(\x -> [x, 7]) 13; -0 +extern val tweak : int -> [Root]; +extern val tickle : string -> A => Root; +extern val tackle : [A]; +extern val twitch : int -> [A]; + +tweak 42; +Choice = 19; +tickle "yourself" with + tackle; + tackle; + choice <- Choice; + twitch choice +end