Searched refs:mkLitNatural (Results 1 – 15 of 15) sorted by relevance
/dports/devel/hs-hlint/hlint-3.3.4/_cabal_deps/ghc-lib-parser-9.0.1.20210324/compiler/GHC/Core/Opt/ |
H A D | ConstantFold.hs | 1438 else ret 2 $ Lit (mkLitNatural (x - y)) 1476 , bignum_bit "naturalBit" naturalBitName mkLitNatural 1485 , bignum_shift "naturalShiftL" naturalShiftLName shiftL mkLitNatural 1486 , bignum_shift "naturalShiftR" naturalShiftRName shiftR mkLitNatural 1496 , divop_one "naturalQuot" naturalQuotName quot mkLitNatural 1497 , divop_one "naturalRem" naturalRemName rem mkLitNatural 1533 if | x >= 0 -> pure $ Lit $ mkLitNatural x 1535 | clamp -> pure $ Lit $ mkLitNatural 0 -- clamp to 0 1549 LitNumber _ i | i >= 0 -> pure (Lit (mkLitNatural i)) 1562 pure (Lit (mkLitNatural (x `op` y))) [all …]
|
/dports/devel/hs-hlint/hlint-3.3.4/_cabal_deps/ghc-lib-parser-9.0.1.20210324/compiler/GHC/Types/ |
H A D | Literal.hs | 24 , mkLitInteger, mkLitNatural 416 mkLitNatural :: Integer -> Literal 417 mkLitNatural x = ASSERT2( inNaturalRange x, integer x ) function
|
/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/ghc-lib-parser-8.10.7.20210828/compiler/basicTypes/ |
H A D | Literal.hs | 23 , mkLitInteger, mkLitNatural 436 mkLitNatural :: Integer -> Type -> Literal 437 mkLitNatural x ty = ASSERT2( inNaturalRange x, integer x ) function
|
/dports/lang/ghc/ghc-8.10.7/compiler/basicTypes/ |
H A D | Literal.hs | 23 , mkLitInteger, mkLitNatural 436 mkLitNatural :: Integer -> Type -> Literal 437 mkLitNatural x ty = ASSERT2( inNaturalRange x, integer x ) function
|
/dports/devel/hs-ormolu/ormolu-0.4.0.0/_cabal_deps/ghc-lib-parser-9.2.1.20211101/compiler/GHC/Core/Opt/ |
H A D | ConstantFold.hs | 1988 else ret 2 $ Lit (mkLitNatural (x - y)) 2096 , bignum_bit "naturalBit" naturalBitName mkLitNatural 2105 , bignum_shift "naturalShiftL" naturalShiftLName shiftL mkLitNatural 2106 , bignum_shift "naturalShiftR" naturalShiftRName shiftR mkLitNatural 2116 , divop_one "naturalQuot" naturalQuotName quot mkLitNatural 2117 , divop_one "naturalRem" naturalRemName rem mkLitNatural 2177 if | x >= 0 -> pure $ Lit $ mkLitNatural x 2179 | clamp -> pure $ Lit $ mkLitNatural 0 -- clamp to 0 2193 LitNumber _ i | i >= 0 -> pure (Lit (mkLitNatural i)) 2206 pure (Lit (mkLitNatural (x `op` y))) [all …]
|
/dports/devel/hs-ormolu/ormolu-0.4.0.0/_cabal_deps/ghc-lib-parser-9.2.1.20211101/compiler/GHC/Types/ |
H A D | Literal.hs | 34 , mkLitInteger, mkLitNatural 571 mkLitNatural :: Integer -> Literal 572 mkLitNatural x = ASSERT2( inNaturalRange x, integer x ) function
|
/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/ghc-lib-parser-8.10.7.20210828/compiler/coreSyn/ |
H A D | MkCore.hs | 271 return (Lit (mkLitNatural i (mkTyConTy t)))
|
/dports/lang/ghc/ghc-8.10.7/compiler/coreSyn/ |
H A D | MkCore.hs | 271 return (Lit (mkLitNatural i (mkTyConTy t)))
|
/dports/devel/hs-ormolu/ormolu-0.4.0.0/_cabal_deps/ghc-lib-parser-9.2.1.20211101/compiler/GHC/Core/ |
H A D | Make.hs | 281 mkNaturalExpr i = Lit (mkLitNatural i)
|
H A D | SimpleOpt.hs | 1303 | dc == naturalNSDataCon -> Just (mkLitNatural i)
|
/dports/devel/hs-hlint/hlint-3.3.4/_cabal_deps/ghc-lib-parser-9.0.1.20210324/compiler/GHC/Core/ |
H A D | Make.hs | 275 mkNaturalExpr i = Lit (mkLitNatural i)
|
H A D | SimpleOpt.hs | 1273 | dc == naturalNSDataCon -> Just (mkLitNatural i)
|
/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/ghc-lib-parser-8.10.7.20210828/compiler/prelude/ |
H A D | PrelRules.hs | 1608 = Just (Lit (mkLitNatural (x `binop` y) i)) 1616 = Just (Lit (mkLitNatural z i))
|
/dports/lang/ghc/ghc-8.10.7/compiler/prelude/ |
H A D | PrelRules.hs | 1608 = Just (Lit (mkLitNatural (x `binop` y) i)) 1616 = Just (Lit (mkLitNatural z i))
|
/dports/lang/ghc/ghc-8.10.7/compiler/iface/ |
H A D | TcIface.hs | 1393 return (mkLitNatural i (mkTyConTy t))
|