Mercurial > openid
diff src/ur/openid.urs @ 3:f59083771ee2
Saving associations
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Sun, 26 Dec 2010 15:11:23 -0500 |
parents | b757dc2bd2f6 |
children | 2d409aff8800 |
line wrap: on
line diff
--- a/src/ur/openid.urs Sun Dec 26 13:28:06 2010 -0500 +++ b/src/ur/openid.urs Sun Dec 26 15:11:23 2010 -0500 @@ -1,1 +1,4 @@ val discover : string -> transaction (option {Endpoint : string, LocalId : option string}) + +datatype association = Handle of string | Error of string +val association : string -> transaction association