recursion-ninja pushed to branch wip/fix-26109 at Glasgow Haskell Compiler / GHC
Commits:
-
224fb5bd
by Recursion Ninja at 2025-08-07T18:52:16-04:00
1 changed file:
Changes:
... | ... | @@ -12,6 +12,7 @@ opaqueInt8# x = x |
12 | 12 | main :: IO ()
|
13 | 13 | main = let !x = opaqueInt8# 109#Int8
|
14 | 14 | !y = opaqueInt8# 1#Int8
|
15 | - in putStrLn . flip showHex "" . W# $ pext8#
|
|
15 | + in putStrLn $ flip showHex "" (W# ( pext8#
|
|
16 | 16 | (word8ToWord# (int8ToWord8# (0#Int8 `subInt8#` x )))
|
17 | 17 | (word8ToWord# (int8ToWord8# (y `subInt8#` 4#Int8)))
|
18 | + )) |