fixed

Pure Haskell large fixed-width integers and Montgomery arithmetic.
git clone git://git.ppad.tech/fixed.git
Log | Files | Refs | README | LICENSE

commit 736355e962618618cae4a932c469a66de81e3352
parent 4c5b8fa72b0c8044a1b78a01de68b47ff930dbac
Author: Jared Tobin <jared@jtobin.io>
Date:   Fri, 12 Dec 2025 16:32:21 +0400

lib: add inline pragmas

Diffstat:
Mlib/Numeric/Montgomery/Secp256k1/Curve.hs | 1+
Mlib/Numeric/Montgomery/Secp256k1/Scalar.hs | 1+
2 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/lib/Numeric/Montgomery/Secp256k1/Curve.hs b/lib/Numeric/Montgomery/Secp256k1/Curve.hs @@ -1021,6 +1021,7 @@ exp b = loop 1 b where odd# :: (# Limb, Limb, Limb, Limb #) -> C.Choice odd# = WW.odd# +{-# INLINE odd #-} -- | Check if a 'Montgomery' value is odd. -- diff --git a/lib/Numeric/Montgomery/Secp256k1/Scalar.hs b/lib/Numeric/Montgomery/Secp256k1/Scalar.hs @@ -959,6 +959,7 @@ exp b = loop 1 b where odd# :: (# Limb, Limb, Limb, Limb #) -> C.Choice odd# = WW.odd# +{-# INLINE odd #-} -- | Check if a 'Montgomery' value is odd. --