Idris2/tests/refc/issue2452/BitsCase.idr
György Kurucz 7a5f63eab0 [ fix ] Add missing cases for BITS types in extractInt
e79e4277 ("[ fix ] Make Bits types use int switch statement in RefC")
made the RefC backend generate code calling `extractInt` with Bits
types, bit did not add the extra cases to `extractInt`. This commit adds
the missing cases.

Fixes #2452
2022-05-04 10:18:58 +01:00

10 lines
102 B
Idris

x : Bits8
x = 0
main : IO ()
main = do
putStrLn $
case x of
0 => "good"
_ => "bad"