Commit f5dc1f61 authored by simonpj@microsoft.com's avatar simonpj@microsoft.com

Add an INLINE pragma on fromInteger on Int

parent 4e089af6
......@@ -111,6 +111,7 @@ instance Num Int where
| n `eqInt` 0 = 0
| otherwise = 1
{-# INLINE fromInteger #-} -- Just to be sure!
fromInteger i = I# (toInt# i)
quotRemInt :: Int -> Int -> (Int, Int)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment