inflate_codes_state

type inflate_codes_state = record

  mode: inflate_codes_mode;

  len: Cardinal;

  sub: record

    case Byte of

      0: (

          code: record

            tree: pInflate_huft;

            need: Cardinal;

          end;

        );

      1: (

          lit: Cardinal;

        );

      2: (

          copy: record

            get: Cardinal;

            dist: Cardinal;

          end;

        );

  end;

  lbits: Byte;

  dbits: Byte;

  ltree: pInflate_huft;

  dtree: pInflate_huft;

end;