diff options
Diffstat (limited to 'testsuite/tests/codeGen/should_run')
| -rw-r--r-- | testsuite/tests/codeGen/should_run/T10870.hs | 1 | ||||
| -rw-r--r-- | testsuite/tests/codeGen/should_run/T10870.stdout | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/testsuite/tests/codeGen/should_run/T10870.hs b/testsuite/tests/codeGen/should_run/T10870.hs index 642ef2c1ff..255f5780dd 100644 --- a/testsuite/tests/codeGen/should_run/T10870.hs +++ b/testsuite/tests/codeGen/should_run/T10870.hs @@ -8,4 +8,5 @@ unsafeShift32R x = unsafeShiftR x 32 main :: IO () main = do print $ map unsafeShift32R [ 123456, 0x7fffffff :: Int ] + print $ map unsafeShift32R [ -123456, -0x80000000 :: Int ] print $ map unsafeShift32R [ 123456, 0xffffffff :: Word ] diff --git a/testsuite/tests/codeGen/should_run/T10870.stdout b/testsuite/tests/codeGen/should_run/T10870.stdout index 945f244e36..54b015cbda 100644 --- a/testsuite/tests/codeGen/should_run/T10870.stdout +++ b/testsuite/tests/codeGen/should_run/T10870.stdout @@ -1,2 +1,3 @@ [0,0] +[-1,-1] [0,0] |