shithub: fnt

Download patch

ref: e6306c331254e39bcf8395045b7abd4bd84d28c7
parent: 62d35d45d158769cefe5545c1fa5c46643cbe9ad
author: Sigrid Solveig Haflínudóttir <sigrid@ftrv.se>
date: Mon Jun 10 17:38:42 EDT 2024

more unused fields

--- a/otf.rkt
+++ b/otf.rkt
@@ -218,17 +218,17 @@
          (mkfields {uint16 platformID (= 0 1 2 3 4)} {uint16 encodingID} {Offset32 subtableOffset}))
 
 (mkcmplx TableCmap
-         (mkfields {uint16 version (= 0)}
+         (mkfields {uint16 version unused (= 0)}
                    {uint16 numTables}
                    {EncodingRecord encodingRecords (count numTables)})
          "cmap")
 
 (mkcmplx TableHead
-         (mkfields {uint16 majorVersion (= 1)}
-                   {uint16 minorVersion (= 0)}
-                   {Fixed fontRevision}
-                   {uint32 checksumAdjustment}
-                   {uint32 magicNumber (= #x5f0f3cf5)}
+         (mkfields {uint16 majorVersion unused (= 1)}
+                   {uint16 minorVersion unused (= 0)}
+                   {Fixed fontRevision unused}
+                   {uint32 checksumAdjustment unused}
+                   {uint32 magicNumber unused (= #x5f0f3cf5)}
                    {uint16 flags}
                    {uint16 unitsPerEm}
                    {LONGDATETIME created unused}
@@ -241,7 +241,7 @@
                    {uint16 lowestRecPPEM}
                    {int16 fontDirectionHint unused (= -2 -1 0 1 2)}
                    {int16 indexToLocFormat (= 0 1)}
-                   {int16 glyphDataFormat (= 0)})
+                   {int16 glyphDataFormat unused (= 0)})
          "head")
 
 (printf (format gen-h))