Mercurial > urweb
view demo/refFun.urs @ 434:c471345f5165
Remove need for '() <-' notation
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Mon, 27 Oct 2008 08:27:45 -0400 |
parents | cb5897276abf |
children |
line wrap: on
line source
functor Make(M : sig type data val inj : sql_injectable data end) : sig type ref val new : M.data -> transaction ref val read : ref -> transaction M.data val write : ref -> M.data -> transaction unit val delete : ref -> transaction unit end