X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/63920aa5296a85edd9d734a65be22d9911358df2..71420f8bc34bbe2c76bd368613d4e024072e9817:/tests/test.dtl?ds=sidebyside diff --git a/tests/test.dtl b/tests/test.dtl index 8a6ae2c..c3c2a19 100644 --- a/tests/test.dtl +++ b/tests/test.dtl @@ -1,6 +1,14 @@ -\x : ([int] -> [Root]) -> x; -let - Day = "Tuesday" -in - kill monkeys +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