{-# LINE 1 "FreeType/Format/Type1/Types.hsc" #-}
{-# LANGUAGE ForeignFunctionInterface #-}

module FreeType.Format.Type1.Types where

import           FreeType.Core.Types.Types

import           Data.Function ((&))
import           Data.Word
import           Foreign.Ptr
import           Foreign.Storable




data PS_FontInfoRec = PS_FontInfoRec
                        { firVersion             :: Ptr FT_String
                        , firNotice              :: Ptr FT_String
                        , firFull_name           :: Ptr FT_String
                        , firFamily_name         :: Ptr FT_String
                        , firWeight              :: Ptr FT_String
                        , firItalic_angle        :: FT_Long
                        , firIs_fixed_pitch      :: FT_Bool
                        , firUnderline_position  :: FT_Short
                        , firUnderline_thickness :: FT_UShort
                        }

instance Storable PS_FontInfoRec where
  sizeOf _    = (56)
{-# LINE 29 "FreeType/Format/Type1/Types.hsc" #-}
  alignment _ = 8
{-# LINE 30 "FreeType/Format/Type1/Types.hsc" #-}

  peek ptr =
    PS_FontInfoRec
      <$> (\hsc_ptr -> peekByteOff hsc_ptr 0) ptr
{-# LINE 34 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 8) ptr
{-# LINE 35 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 16) ptr
{-# LINE 36 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 24) ptr
{-# LINE 37 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 32) ptr
{-# LINE 38 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 40) ptr
{-# LINE 39 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 48) ptr
{-# LINE 40 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 50) ptr
{-# LINE 41 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 52) ptr
{-# LINE 42 "FreeType/Format/Type1/Types.hsc" #-}

  poke ptr val = do
    (\hsc_ptr -> pokeByteOff hsc_ptr 0) ptr $ val & firVersion
{-# LINE 45 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 8) ptr $ val & firNotice
{-# LINE 46 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 16) ptr $ val & firFull_name
{-# LINE 47 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 24) ptr $ val & firFamily_name
{-# LINE 48 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 32) ptr $ val & firWeight
{-# LINE 49 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 40) ptr $ val & firItalic_angle
{-# LINE 50 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 48) ptr $ val & firIs_fixed_pitch
{-# LINE 51 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 50) ptr $ val & firUnderline_position
{-# LINE 52 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 52) ptr $ val & firUnderline_thickness
{-# LINE 53 "FreeType/Format/Type1/Types.hsc" #-}



type PS_FontInfo = Ptr PS_FontInfoRec



data PS_PrivateRec = PS_PrivateRec
                       { prUnique_id              :: FT_Int
                       , prLenIV                  :: FT_Int
                       , prNum_blue_values        :: FT_Byte
                       , prNum_other_blues        :: FT_Byte
                       , prNum_family_blues       :: FT_Byte
                       , prNum_family_other_blues :: FT_Byte
                       , prBlue_values            :: FT_Short
                       , prOther_blues            :: FT_Short
                       , prFamily_blues           :: FT_Short
                       , prFamily_other_blues     :: FT_Short
                       , prBlue_scale             :: FT_Fixed
                       , prBlue_shift             :: FT_Int
                       , prBlue_fuzz              :: FT_Int
                       , prStandard_width         :: FT_UShort
                       , prStandard_height        :: FT_UShort
                       , prNum_snap_widths        :: FT_Byte
                       , prNum_snap_heights       :: FT_Byte
                       , prForce_bold             :: FT_Bool
                       , prRound_stem_up          :: FT_Bool
                       , prSnap_widths            :: FT_Short
                       , prSnap_heights           :: FT_Short
                       , prExpansion_factor       :: FT_Fixed
                       , prLanguage_group         :: FT_Long
                       , prPassword               :: FT_Long
                       , prMin_feature            :: FT_Short
                       }

instance Storable PS_PrivateRec where
  sizeOf _    = (224)
{-# LINE 90 "FreeType/Format/Type1/Types.hsc" #-}
  alignment _ = 8
{-# LINE 91 "FreeType/Format/Type1/Types.hsc" #-}

  peek ptr =
    PS_PrivateRec
      <$> (\hsc_ptr -> peekByteOff hsc_ptr 0) ptr
{-# LINE 95 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 4) ptr
{-# LINE 96 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 8) ptr
{-# LINE 97 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 9) ptr
{-# LINE 98 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 10) ptr
{-# LINE 99 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 11) ptr
{-# LINE 100 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 12) ptr
{-# LINE 101 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 40) ptr
{-# LINE 102 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 60) ptr
{-# LINE 103 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 88) ptr
{-# LINE 104 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 112) ptr
{-# LINE 105 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 120) ptr
{-# LINE 106 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 124) ptr
{-# LINE 107 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 128) ptr
{-# LINE 108 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 130) ptr
{-# LINE 109 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 132) ptr
{-# LINE 110 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 133) ptr
{-# LINE 111 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 134) ptr
{-# LINE 112 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 135) ptr
{-# LINE 113 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 136) ptr
{-# LINE 114 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 162) ptr
{-# LINE 115 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 192) ptr
{-# LINE 116 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 200) ptr
{-# LINE 117 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 208) ptr
{-# LINE 118 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 216) ptr
{-# LINE 119 "FreeType/Format/Type1/Types.hsc" #-}

  poke ptr val = do
    (\hsc_ptr -> pokeByteOff hsc_ptr 0) ptr $ val & prUnique_id
{-# LINE 122 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 4) ptr $ val & prLenIV
{-# LINE 123 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 8) ptr $ val & prNum_blue_values
{-# LINE 124 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 9) ptr $ val & prNum_other_blues
{-# LINE 125 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 10) ptr $ val & prNum_family_blues
{-# LINE 126 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 11) ptr $ val & prNum_family_other_blues
{-# LINE 127 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 12) ptr $ val & prBlue_values
{-# LINE 128 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 40) ptr $ val & prOther_blues
{-# LINE 129 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 60) ptr $ val & prFamily_blues
{-# LINE 130 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 88) ptr $ val & prFamily_other_blues
{-# LINE 131 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 112) ptr $ val & prBlue_scale
{-# LINE 132 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 120) ptr $ val & prBlue_shift
{-# LINE 133 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 124) ptr $ val & prBlue_fuzz
{-# LINE 134 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 128) ptr $ val & prStandard_width
{-# LINE 135 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 130) ptr $ val & prStandard_height
{-# LINE 136 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 132) ptr $ val & prNum_snap_widths
{-# LINE 137 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 133) ptr $ val & prNum_snap_heights
{-# LINE 138 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 134) ptr $ val & prForce_bold
{-# LINE 139 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 135) ptr $ val & prRound_stem_up
{-# LINE 140 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 136) ptr $ val & prSnap_widths
{-# LINE 141 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 162) ptr $ val & prSnap_heights
{-# LINE 142 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 192) ptr $ val & prExpansion_factor
{-# LINE 143 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 200) ptr $ val & prLanguage_group
{-# LINE 144 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 208) ptr $ val & prPassword
{-# LINE 145 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 216) ptr $ val & prMin_feature
{-# LINE 146 "FreeType/Format/Type1/Types.hsc" #-}



type PS_Private = Ptr PS_PrivateRec



data CID_FaceDictRec = CID_FaceDictRec
                         { fdrPrivate_dict        :: PS_PrivateRec
                         , fdrLen_buildchar       :: FT_UInt
                         , fdrForcebold_threshold :: FT_Fixed
                         , fdrStroke_width        :: FT_Pos
                         , fdrExpansion_factor    :: FT_Fixed
                         , fdrPaint_type          :: FT_Byte
                         , fdrFont_type           :: FT_Byte
                         , fdrFont_matrix         :: FT_Matrix
                         , fdrFont_offset         :: FT_Vector
                         , fdrNum_subrs           :: FT_UInt
                         , fdrSubrmap_offset      :: FT_ULong
                         , fdrSd_bytes            :: FT_Int
                         }

instance Storable CID_FaceDictRec where
  sizeOf _    = (336)
{-# LINE 170 "FreeType/Format/Type1/Types.hsc" #-}
  alignment _ = 8
{-# LINE 171 "FreeType/Format/Type1/Types.hsc" #-}

  peek ptr =
    CID_FaceDictRec
      <$> (\hsc_ptr -> peekByteOff hsc_ptr 0) ptr
{-# LINE 175 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 224) ptr
{-# LINE 176 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 232) ptr
{-# LINE 177 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 240) ptr
{-# LINE 178 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 248) ptr
{-# LINE 179 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 256) ptr
{-# LINE 180 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 257) ptr
{-# LINE 181 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 264) ptr
{-# LINE 182 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 296) ptr
{-# LINE 183 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 312) ptr
{-# LINE 184 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 320) ptr
{-# LINE 185 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 328) ptr
{-# LINE 186 "FreeType/Format/Type1/Types.hsc" #-}

  poke ptr val = do
    (\hsc_ptr -> pokeByteOff hsc_ptr 0) ptr $ val & fdrPrivate_dict
{-# LINE 189 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 224) ptr $ val & fdrLen_buildchar
{-# LINE 190 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 232) ptr $ val & fdrForcebold_threshold
{-# LINE 191 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 240) ptr $ val & fdrStroke_width
{-# LINE 192 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 248) ptr $ val & fdrExpansion_factor
{-# LINE 193 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 256) ptr $ val & fdrPaint_type
{-# LINE 194 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 257) ptr $ val & fdrFont_type
{-# LINE 195 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 264) ptr $ val & fdrFont_matrix
{-# LINE 196 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 296) ptr $ val & fdrFont_offset
{-# LINE 197 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 312) ptr $ val & fdrNum_subrs
{-# LINE 198 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 320) ptr $ val & fdrSubrmap_offset
{-# LINE 199 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 328) ptr $ val & fdrSd_bytes
{-# LINE 200 "FreeType/Format/Type1/Types.hsc" #-}



type CID_FaceDict = Ptr CID_FaceDictRec



data CID_FaceInfoRec = CID_FaceInfoRec
                         { firCid_font_name :: Ptr FT_String
                         , firCid_version   :: FT_Fixed
                         , firCid_font_type :: FT_Int
                         , firRegistry      :: Ptr FT_String
                         , firOrdering      :: Ptr FT_String
                         , firSupplement    :: FT_Int
                         , firFont_info     :: PS_FontInfoRec
                         , firFont_bbox     :: FT_BBox
                         , firUid_base      :: FT_ULong
                         , firNum_xuid      :: FT_Int
                         , firXuid          :: FT_ULong
                         , firCidmap_offset :: FT_ULong
                         , firFd_bytes      :: FT_Int
                         , firGd_bytes      :: FT_Int
                         , firCid_count     :: FT_ULong
                         , firNum_dicts     :: FT_Int
                         , firFont_dicts    :: CID_FaceDict
                         , firData_offset   :: FT_ULong
                         }

instance Storable CID_FaceInfoRec where
  sizeOf _    = (328)
{-# LINE 230 "FreeType/Format/Type1/Types.hsc" #-}
  alignment _ = 8
{-# LINE 231 "FreeType/Format/Type1/Types.hsc" #-}

  peek ptr =
    CID_FaceInfoRec
      <$> (\hsc_ptr -> peekByteOff hsc_ptr 0) ptr
{-# LINE 235 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 8) ptr
{-# LINE 236 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 16) ptr
{-# LINE 237 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 24) ptr
{-# LINE 238 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 32) ptr
{-# LINE 239 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 40) ptr
{-# LINE 240 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 48) ptr
{-# LINE 241 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 104) ptr
{-# LINE 242 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 136) ptr
{-# LINE 243 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 144) ptr
{-# LINE 244 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 152) ptr
{-# LINE 245 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 280) ptr
{-# LINE 246 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 288) ptr
{-# LINE 247 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 292) ptr
{-# LINE 248 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 296) ptr
{-# LINE 249 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 304) ptr
{-# LINE 250 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 312) ptr
{-# LINE 251 "FreeType/Format/Type1/Types.hsc" #-}
      <*> (\hsc_ptr -> peekByteOff hsc_ptr 320) ptr
{-# LINE 252 "FreeType/Format/Type1/Types.hsc" #-}

  poke ptr val = do
    (\hsc_ptr -> pokeByteOff hsc_ptr 0) ptr $ val & firCid_font_name
{-# LINE 255 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 8) ptr $ val & firCid_version
{-# LINE 256 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 16) ptr $ val & firCid_font_type
{-# LINE 257 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 24) ptr $ val & firRegistry
{-# LINE 258 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 32) ptr $ val & firOrdering
{-# LINE 259 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 40) ptr $ val & firSupplement
{-# LINE 260 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 48) ptr $ val & firFont_info
{-# LINE 261 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 104) ptr $ val & firFont_bbox
{-# LINE 262 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 136) ptr $ val & firUid_base
{-# LINE 263 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 144) ptr $ val & firNum_xuid
{-# LINE 264 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 152) ptr $ val & firXuid
{-# LINE 265 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 280) ptr $ val & firCidmap_offset
{-# LINE 266 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 288) ptr $ val & firFd_bytes
{-# LINE 267 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 292) ptr $ val & firGd_bytes
{-# LINE 268 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 296) ptr $ val & firCid_count
{-# LINE 269 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 304) ptr $ val & firNum_dicts
{-# LINE 270 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 312) ptr $ val & firFont_dicts
{-# LINE 271 "FreeType/Format/Type1/Types.hsc" #-}
    (\hsc_ptr -> pokeByteOff hsc_ptr 320) ptr $ val & firData_offset
{-# LINE 272 "FreeType/Format/Type1/Types.hsc" #-}



type CID_FaceInfo = Ptr CID_FaceInfoRec



type T1_Blend_Flags = Word32
{-# LINE 280 "FreeType/Format/Type1/Types.hsc" #-}



type T1_EncodingType = Word32
{-# LINE 284 "FreeType/Format/Type1/Types.hsc" #-}



type PS_Dict_Keys = Word32
{-# LINE 288 "FreeType/Format/Type1/Types.hsc" #-}



type T1_FontInfo = Ptr PS_FontInfoRec



type T1_Private = Ptr PS_PrivateRec



type CID_FontDict = Ptr CID_FaceDictRec



type CID_Info = CID_FaceInfoRec