anchor.diff:          value = lv_repo && '/info/refs?service=git-upload-pack' ).
       li_client->send( ).
       li_client->receive( ).
  +
  +*    DATA: lt_fields      TYPE tihttpnvp.
  +*    li_client->response->get_header_fields( CHANGING fields = lt_fields ).
  +*    BREAK-POINT.
  +
       li_client->response->get_status(
         IMPORTING
  -        code   = lv_code
  -        reason = lv_status_text ).
  +        code   = lv_code ).
       IF c_debug_http = abap_true.
  -      WRITE: / 'HTTP_STATUS_CODE = ', lv_code, lv_status_text.
  +      WRITE: / 'HTTP_STATUS_CODE = ', lv_code.
       ENDIF.
       lv_data = li_client->response->get_cdata( ).
   
  
positive.code:       ENDIF.
      ENDDO.
  
  *  WRITE: / 'Done,', lv_objects_count, 'objects, expected', lv_objects. "#EC NOTEXT
  * todo, SHA1 at end
  
    ENDMETHOD.                    "decode
  
    METHOD encode.
  * todo
      RETURN.
    ENDMETHOD.                    "encode
  
  ENDCLASS.                    "lcl_pack IMPLEMENTATION
  
negative.code:         PERFORM output_commit USING <ls_object>.
        WHEN OTHERS.
          BREAK-POINT.
          WRITE: / 'todo'.                                    "#EC NOTEXT
      ENDCASE.
    ENDLOOP.
  
  