adam@1685: fun diffThem tm =
adam@1685: tm' <- now;
adam@1685: return
adam@1685: Diff: {[diffInMilliseconds tm tm']}
adam@1685:
adam@1685:
adam@1685: fun main () : transaction page =
adam@1685: tm <- now;
adam@1685:
adam@1685: return
adam@1685: Now: {[toMilliseconds tm]}
adam@1685: Diff
adam@1685:
adam@1685:
adam@1685: