diff options
| author |  Simon Marlow <marlowsd@gmail.com> | 2011-11-11 16:18:48 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2011-11-22 12:36:48 +0000 |
| commit | 34c7bf896f19b182cf6fa104e057f1df9df1254a (patch) | |
| tree | abdb8264ae52c62263fc0fb4b395906a64acb104 /tests/all.T | |
| parent | c213ae2ec6d9c71266aebc8e5b2326a9625fba7a (diff) | |
Provide a raw ByteString version of FilePath and environment APIs
The new module System.Posix.ByteString provides exactly the same API
as System.Posix, except that:
- There is a new type: RawFilePath = ByteString
- All functions mentioning FilePath in the System.Posix API
use RawFilePath in the System.Posix.ByteString API
- RawFilePaths are not subject to Unicode locale encoding and
decoding, unlike FilePaths. They are the exact bytes passed to and
returned from the underlying POSIX API.
- Similarly for functions that deal in environment
strings (System.Posix.Env): these use untranslated ByteStrings
in System.Posix.Environment
- There is a new function
System.Posix.ByteString.getArgs :: [ByteString]
returning the raw untranslated arguments as passed to exec() when
the program was started.
Diffstat (limited to 'tests/all.T')
| -rw-r--r-- | tests/all.T | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/all.T b/tests/all.T index 4b888be..8f8a152 100644 --- a/tests/all.T +++ b/tests/all.T @@ -26,6 +26,7 @@ if config.platform == 'i386-unknown-freebsd': test('queryfdoption01', compose(omit_ways(['ghci']), compose(only_compiler_types(['ghc']), conf)), compile_and_run, ['-package unix']) test('getEnvironment01', conf, compile_and_run, ['-package unix']) +test('getEnvironment02', conf, compile_and_run, ['-package unix']) test('getGroupEntryForName', compose(conf, exit_code(1)), compile_and_run, ['-package unix']) test('getUserEntryForName', compose(conf, exit_code(1)), compile_and_run, @@ -46,6 +47,11 @@ test('fileStatus', compile_and_run, ['-package unix']) +test('fileStatusByteString', + extra_clean(['dir', 'regular', 'link-dir', 'link-regular']), + compile_and_run, + ['-package unix']) + test('1185', [ expect_fail_for(['threaded2']) ], compile_and_run, ['-package unix']) |