diff --git a/src/modules/files/testsuite.in b/src/modules/files/testsuite.in index e1164f66ee3601e9ad5150058c8ea6e2ccb3a1d1..b40f90f69ca987ece6c880df554bc6a366e68520 100644 --- a/src/modules/files/testsuite.in +++ b/src/modules/files/testsuite.in @@ -91,3 +91,12 @@ test_true(arrayp(get_dir("."))) // - getcwd test_true(stringp(getcwd())) test_eq('/',getcwd()[0]) + +// strerror +cond([[all_efuns()->strerror]], +[[ +test_do(strerror(1)) +test_true(stringp(strerror(2)||"")) +]]) + +