diff options
| author | Ben Gamari <bgamari.foss@gmail.com> | 2018-06-14 09:13:11 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2018-06-14 10:03:28 -0400 |
| commit | ca7653a97e660e95e2a52713cb0a9417c1c239ae (patch) | |
| tree | 70834642455fab0cca32d20ce786717f64c715c0 /testsuite/tests | |
| parent | 97d141989348b2bd399ff7bc92eaf1a502f59952 (diff) | |
| download | haskell-ca7653a97e660e95e2a52713cb0a9417c1c239ae.tar.gz | |
testsuite: Fix T4442 on i386
Test Plan: Validate on i386
Reviewers: tdammers
Reviewed By: tdammers
Subscribers: rwbarton, thomie, carter
GHC Trac Issues: #15184
Differential Revision: https://phabricator.haskell.org/D4838
Diffstat (limited to 'testsuite/tests')
| -rw-r--r-- | testsuite/tests/primops/should_run/T4442.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/testsuite/tests/primops/should_run/T4442.hs b/testsuite/tests/primops/should_run/T4442.hs index 0d09f621e0..40d7879cac 100644 --- a/testsuite/tests/primops/should_run/T4442.hs +++ b/testsuite/tests/primops/should_run/T4442.hs @@ -8,6 +8,9 @@ import GHC.Stable( StablePtr(..), castStablePtrToPtr, castPtrToStablePtr, newStablePtr) import GHC.Exts import Data.Char(ord) +#if WORD_SIZE_IN_BITS < 64 +import GHC.Int (Int64(..)) +#endif assertEqual :: (Show a, Eq a) => a -> a -> IO () assertEqual a b |