diff options
Diffstat (limited to 'lib/Graphics/Fountainhead/Type.hs')
| -rw-r--r-- | lib/Graphics/Fountainhead/Type.hs | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/lib/Graphics/Fountainhead/Type.hs b/lib/Graphics/Fountainhead/Type.hs index beaf6e4..e809d9c 100644 --- a/lib/Graphics/Fountainhead/Type.hs +++ b/lib/Graphics/Fountainhead/Type.hs @@ -9,12 +9,10 @@ module Graphics.Fountainhead.Type , FWord , UFWord , fixed2Double - , newlineBuilder , succIntegral , ttfEpoch ) where -import qualified Data.Text.Lazy.Builder as Text.Builder import Data.Bits ((.>>.), (.&.)) import Data.Int (Int16) import Data.Word (Word16, Word32) @@ -41,6 +39,3 @@ fixed2Double (F2Dot14 fixed) = let mantissa = realToFrac (fixed .>>. 14) fraction = realToFrac (fixed .&. 0x3fff) / 16384.0 in mantissa + fraction - -newlineBuilder :: Text.Builder.Builder -newlineBuilder = Text.Builder.singleton '\n' |