summaryrefslogtreecommitdiff
path: root/tests/sqlprecision.ur
blob: 0391ea047bff1f163a2b0dc7a464ab9b0eddf355 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
table t : { N : float }

fun insert r =
    dml (INSERT INTO t (N) VALUES ({[readError r.N]}));
    return <xml/>

fun main () = return <xml><body>
  <form>
    <textbox{#N}/>
    <submit action={insert}/>
  </form>
</body></xml>