adam@1786: fun counter' () =
adam@1786: s <- source 0;
adam@1786: return
adam@1786:
adam@1786:
adam@1786:
adam@1786: fun counter () =
adam@1786:
adam@1786: fun main () : transaction page = return
adam@1786: {counter ()}
adam@1786:
adam@1786: {counter ()}
adam@1786: