annotate tests/getenv.ur @ 2117:f1c4edf0a655

New release
author Adam Chlipala <adam@chlipala.net>
date Sat, 14 Feb 2015 08:17:36 -0500
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