Mercurial > urweb
comparison tests/recReal3.ur @ 244:71bafe66dbe1
Laconic -> Ur
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 31 Aug 2008 08:32:18 -0400 |
parents | tests/recReal3.lac@5df655503288 |
children |
comparison
equal
deleted
inserted
replaced
243:2b9dfaffb008 | 244:71bafe66dbe1 |
---|---|
1 val rec endlessList1 = fn () => <body> | |
2 <li> Buy eggs.</li> | |
3 {endlessList2 ()} | |
4 </body> | |
5 | |
6 and endlessList2 = fn () => <body> | |
7 <li> Buy milk.</li> | |
8 {endlessList1 ()} | |
9 {endlessList3 ()} | |
10 </body> | |
11 | |
12 and endlessList3 = fn () => <body> | |
13 <li> Buy goat.</li> | |
14 </body> | |
15 | |
16 val main = fn () => <html><body> | |
17 {endlessList1 ()} | |
18 </body></html> |