annotate tests/getenv.ur @ 2147:265c1aeed71b

Return to working version mode
author Adam Chlipala <adam@chlipala.net>
date Wed, 20 May 2015 12:44:28 -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