diff tests/num.ur @ 391:fe8f75f7e130

lt, le working for int
author Adam Chlipala <adamc@hcoop.net>
date Tue, 21 Oct 2008 10:56:43 -0400
parents 519366a76603
children
line wrap: on
line diff
--- a/tests/num.ur	Tue Oct 21 10:40:22 2008 -0400
+++ b/tests/num.ur	Tue Oct 21 10:56:43 2008 -0400
@@ -1,5 +1,5 @@
 fun main () : transaction page = return <xml><body>
-  {txt _ (-1)}, {txt _ (1 + 1)}, {txt _ (9 - 3)}, {txt _ (9 * 3)}, {txt _ (9 / 3)}, {txt _ (9 % 3)}<br/>
-  {txt _ (-1.1)}, {txt _ (1.0 + 1.1)}, {txt _ (9.1 - 3.0)}, {txt _ (9.1 * 3.0)},
-  {txt _ (9.1 / 3.0)}, {txt _ (9.1 % 3.0)}<br/>
+  {[ -1 ]}, {[ 1 + 1 ]}, {[ 9 - 3 ]}, {[ 9 * 3 ]}, {[ 9 / 3 ]}, {[ 9 % 3 ]}<br/>
+  {[ -1.1 ]}, {[ 1.0 + 1.1 ]}, {[ 9.1 - 3.0 ]}, {[ 9.1 * 3.0 ]},
+  {[ 9.1 / 3.0 ]}, {[ 9.1 % 3.0 ]}<br/>
 </body></xml>