diff options
Diffstat (limited to 'libraries/base/System/Environment.hs')
| -rw-r--r-- | libraries/base/System/Environment.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libraries/base/System/Environment.hs b/libraries/base/System/Environment.hs index 8397fc30b5..4288a603c8 100644 --- a/libraries/base/System/Environment.hs +++ b/libraries/base/System/Environment.hs @@ -266,6 +266,8 @@ ioe_missingEnvVar name = ioException (IOError Nothing NoSuchThing "getEnv" -- -- Throws `Control.Exception.IOException` if @name@ is the empty string or -- contains an equals sign. +-- +-- /Since: 4.7.0.0/ setEnv :: String -> String -> IO () setEnv key_ value_ | null key = throwIO (mkIOError InvalidArgument "setEnv" Nothing Nothing) @@ -308,6 +310,8 @@ foreign import ccall unsafe "putenv" c_putenv :: CString -> IO CInt -- -- Throws `Control.Exception.IOException` if @name@ is the empty string or -- contains an equals sign. +-- +-- /Since: 4.7.0.0/ unsetEnv :: String -> IO () #ifdef mingw32_HOST_OS unsetEnv key = withCWString key $ \k -> do |