diff options
| author | Eugen Wissner <belka@caraus.de> | 2023-11-29 01:34:31 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2023-11-29 01:34:31 +0100 |
| commit | 271b69839aaaa5f61b70061d5a2353eb1d86db59 (patch) | |
| tree | 40c85646a06790737053454f2ccd34ae28923123 /src/Graphics/Fountainhead/Parser.hs | |
| parent | 752f093b7228511a874cdb826a7615a34c8e6bb1 (diff) | |
| download | fountainhead-271b69839aaaa5f61b70061d5a2353eb1d86db59.tar.gz | |
Dump the post table
Diffstat (limited to 'src/Graphics/Fountainhead/Parser.hs')
| -rw-r--r-- | src/Graphics/Fountainhead/Parser.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Graphics/Fountainhead/Parser.hs b/src/Graphics/Fountainhead/Parser.hs index 209faa2..2e86696 100644 --- a/src/Graphics/Fountainhead/Parser.hs +++ b/src/Graphics/Fountainhead/Parser.hs @@ -692,7 +692,7 @@ cmapFormatTableP = do cmapFormat14TableP :: Parser CmapFormat14Table cmapFormat14TableP = do initialOffset <- (+ (-2)) <$> Megaparsec.getOffset - Megaparsec.Binary.word32be -- Length. + void Megaparsec.Binary.word32be -- Length. numVarSelectorRecords <- fromIntegral <$> Megaparsec.Binary.word32be variationSelectorRecords' <- sortBy sortOffset . fold <$> Megaparsec.count numVarSelectorRecords variationSelectorRecordP |