annotate tests/test.urs @ 1451:b6ce8ef0ea88

Before allowing an indirect return, check (dynamically, for now) that we aren't in an RPC handler
author Adam Chlipala <adam@chlipala.net>
date Sun, 17 Apr 2011 13:43:00 -0400
parents eac1974924bb
children
rev   line source
adamc@764 1 type t
adamc@764 2
adamc@764 3 val create : string -> t
adamc@764 4 val out : t -> string
adamc@764 5 val frob : t -> string -> t
adamc@765 6 val print : transaction unit
adamc@766 7
adamc@766 8 val foo : transaction unit
adamc@766 9 val bar : string -> transaction unit
adamc@771 10
adamc@771 11 val transactional : transaction unit