strange behaviour of GHCi when int value exceed int range

import Data.Char type Bit = Int

int2bin :: Int -> [Bit] int2bin 0 = [] int2bin n = reverse (n mod2 : (reverse (int2bin (n div2))))

When n = 4200000000, GHCi crash with "out of memory" but if n = 4300000000 GHCi send a result as [1,0,0,1,1,0,0,1,1,0,0,1,0,1,1,0,0,0,0,0,0,0,0]

Trac metadata

Trac field	Value
Version	8.0.1
Type	Bug
TypeOfFailure	OtherFailure
Priority	normal
Resolution	Unresolved
Component	GHCi
Test case
Differential revisions
BlockedBy
Related
Blocking
CC
Operating system
Architecture

changed weight to 5

added GHCi Tbug Trac import labels

closed

I assume this is on a 32-bit system.

Consider the fact that (-1) div 2 = -1 and that repeatedly applying ``div 2 to a negative `Int` (like `4200000000 = -94967296`) will eventually reach `-1`.

Trac metadata

Trac field	Value
Resolution	Unresolved → ResolvedInvalid

added Pnormal label