ref: eeac1a81c25a9c4cf9cee92bc4c988c07a15c6c9
dir: /lib/Data/Int.hs/
-- Copyright 2023 Lennart Augustsson -- See LICENSE file for full license. module Data.Int(module Data.Int, Int) where import Primitives import Data.Bool_Type infixl 6 +,- infixl 7 *,`quot`,`rem` -- Arithmetic (+) :: Int -> Int -> Int (+) = primIntAdd (-) :: Int -> Int -> Int (-) = primIntSub (*) :: Int -> Int -> Int (*) = primIntMul quot :: Int -> Int -> Int quot = primIntQuot rem :: Int -> Int -> Int rem = primIntRem subtract :: Int -> Int -> Int subtract = primIntSubR negate :: Int -> Int negate x = 0 - x -------------------------------- infix 4 ==,/=,<,<=,>,>= -- Comparison (==) :: Int -> Int -> Bool (==) = primIntEQ (/=) :: Int -> Int -> Bool (/=) = primIntNE (<) :: Int -> Int -> Bool (<) = primIntLT (<=) :: Int -> Int -> Bool (<=) = primIntLE (>) :: Int -> Int -> Bool (>) = primIntGT (>=) :: Int -> Int -> Bool (>=) = primIntGE eqInt :: Int -> Int -> Bool eqInt = (==) --------------------------------