annotate tests/getenv.ur @ 2178:c76a9712334c

Database-server reconnection for MySQL
author Adam Chlipala <adam@chlipala.net>
date Sat, 17 Oct 2015 11:31:22 -0400
parents 94529780bbcf
children
rev   line source
adam@1993 1 task initialize = fn _ =>
adam@1993 2 v <- getenv (blessEnvVar "USER");
adam@1994 3 case v of
adam@1994 4 None => debug "No USER"
adam@1994 5 | Some u => debug u