logの引数がDoubleに変換されるからだと思う。

Prelude> 2^1023 :: Double
8.98846567431158e307

Prelude> 2^1024 :: Double
Infinity

Prelude> log(2^1023)/log 10
307.95368556425274

Prelude> log(2^1024)/log 10
Infinity