annotate tests/getenv.ur @ 1995:057b08253a75

-explainEmbed
author Adam Chlipala <adam@chlipala.net>
date Mon, 17 Mar 2014 16:52:10 -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