comparison tests/sequence.ur @ 338:e976b187d73a

SQL sequences
author Adam Chlipala <adamc@hcoop.net>
date Sun, 14 Sep 2008 11:02:18 -0400
parents
children
comparison
equal deleted inserted replaced
337:18d5affa790d 338:e976b187d73a
1 sequence seq
2
3 fun main () : transaction page =
4 n <- nextval seq;
5 return <html><body>
6 {txt _ n}
7 </body></html>