view tests/letwhere.ur @ 2302:ace43b90b388

Tiny concurrency bugfix (race condition on cache->timeNow).
author Ziv Scully <ziv@mit.edu>
date Fri, 20 Nov 2015 10:51:43 -0500
parents afeeabdcce77
children
line wrap: on
line source
fun main () : transaction page =
    let
        return <xml>Hi {[alice]} and {[bob]}!</xml>
    where
        val alice = "Alice"
        val bob = "Bob"
    end