Re-enable posix005 test (#5648)

tests/libposix/all.T

@@ -6,7 +6,7 @@ test('posix003', if_os('mingw32', skip), compile_and_run, [''])
 
 test('posix004', [ reqlib('unix') ], compile_and_run, [''])
 
-test('posix005', [reqlib('unix'), expect_broken(5648)], compile_and_run, [''])
+test('posix005', [reqlib('unix') ], compile_and_run, [''])
 
 test('posix006', reqlib('unix'), compile_and_run, [''])
 test('posix009', [ omit_ways(threaded_ways), reqlib('unix') ], compile_and_run, [''])

tests/libposix/posix005.hs

@@ -4,8 +4,8 @@ import System.Posix.Env
 
 main = do
     hSetBuffering stdout NoBuffering
-    term <- getEnvVar "TERM"
-    putStrLn term
+    term <- getEnv "TERM"
+    maybe (return ()) putStrLn term
     setEnvironment [("one","1"),("two","2")]
     getEnvironment >>= print
     setEnv "foo" "bar" True
@@ -16,6 +16,6 @@ main = do
     getEnvironment >>= print
     unsetEnv "foo"
     getEnvironment >>= print
-    setEnvironment []
+    clearEnv
     getEnvironment >>= print
 

tests/libposix/posix005.stdout

-emacs
+vt100
 [("one","1"),("two","2")]
 [("one","1"),("two","2"),("foo","bar")]
 [("one","1"),("two","2"),("foo","baz")]