inflate_codes_state

type inflate_codes_state = record

  mode: inflate_codes_mode;

  len: uInt;

  sub: record

    case Byte of

      0: (

          code: record

            tree: pInflate_huft;

            need: uInt;

          end;

        );

      1: (

          lit: uInt;

        );

      2: (

          copy: record

            get: uInt;

            dist: uInt;

          end;

        );

  end;

  lbits: Byte;

  dbits: Byte;

  ltree: pInflate_huft;

  dtree: pInflate_huft;

end;