[hcoop/domtool2.git] / tests / test.dtl

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
Commit	Line	Data
234b917a AC	1	extern val tweak : int -> [Root];
	2
	3	extern val tickle : string -> A => Root;
	4	extern val tackle : [A];
	5	extern val twitch : int -> [A];
27d9de59	6
234b917a AC	7	tweak 42;
	8	Choice = 19;
	9	tickle "yourself" with
	10	tackle;
	11	tackle;
	12	choice <- Choice;
	13	twitch choice
	14	end