diff options
author | Patrik Nyblom <[email protected]> | 2010-02-11 10:15:53 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2010-03-10 14:25:27 +0100 |
commit | 3ddf0126dfcb60f0554e2d52187fa012f378e428 (patch) | |
tree | 34ddd16f0190dcfeda1a7ec57bcc9afa4e667187 /erts/emulator/test/obsolete_SUITE.erl | |
parent | c591f7b2a78b44ab321d0b99c100b349c8606c15 (diff) | |
download | otp-3ddf0126dfcb60f0554e2d52187fa012f378e428.tar.gz otp-3ddf0126dfcb60f0554e2d52187fa012f378e428.tar.bz2 otp-3ddf0126dfcb60f0554e2d52187fa012f378e428.zip |
Teach {wordsize,internal|external} to system_info/1
Some test suites need to differentiate between 32-bit terms
and 32-bit pointers.
While at it, remove some more warnings in process.c for SMP and debug.
Diffstat (limited to 'erts/emulator/test/obsolete_SUITE.erl')
-rw-r--r-- | erts/emulator/test/obsolete_SUITE.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/erts/emulator/test/obsolete_SUITE.erl b/erts/emulator/test/obsolete_SUITE.erl index 33c4726699..eb7e34ad6b 100644 --- a/erts/emulator/test/obsolete_SUITE.erl +++ b/erts/emulator/test/obsolete_SUITE.erl @@ -32,9 +32,9 @@ all(doc) -> []; all(suite) -> - case catch erlang:system_info(wordsize) of + case catch erlang:system_info({wordsize,external}) of 4 -> [erl_threads]; - _ -> {skip, "Only expected to work on 32-bit architectures"} + _ -> {skip, "Only expected to work on true 32-bit architectures"} end. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |