aboutsummaryrefslogtreecommitdiff
path: root/examples/trace.fusp
blob: 2f7805966480c13efacb3d7012b882e45a98dc6e (plain) (blame)
1
2
3
4
5
6
7
import list;

trace p r = code trace p r;

dup f x = f x x;

main = map (dup trace) [1:[2:[3:[4:[5:[]]]]]];