SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 04:08:27 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Fixes test_classes on ABAP 7.02

Browse Source
This commit is contained in:
eduardocopat 2017-01-31 09:37:25 +01:00
parent c6d1bb8e69
commit e47811c97d
2 changed files with 19 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
src/zabapgit_object_clas.prog.abap
View File

@ -82,15 +82,16 @@ INTERFACE lif_object_oriented_object_fnc.
VALUE(rv_exists) TYPE abap_bool,
serialize_abap
IMPORTING
is_class_key TYPE seoclskey
iv_type TYPE seop_include_ext_app OPTIONAL
CHANGING
cv_test_classes_skipped TYPE abap_bool OPTIONAL
is_class_key TYPE seoclskey
iv_type TYPE seop_include_ext_app OPTIONAL
RETURNING
VALUE(rt_source) TYPE ty_string_tt
VALUE(rt_source) TYPE ty_string_tt
RAISING
lcx_exception
cx_sy_dyn_call_error,
get_skip_test_classes
RETURNING
VALUE(rv_skip) TYPE abap_bool,
get_class_properties
IMPORTING
is_class_key TYPE seoclskey
@ -391,6 +392,7 @@ CLASS lcl_object_oriented_base DEFINITION ABSTRACT.
PUBLIC SECTION.
INTERFACES: lif_object_oriented_object_fnc.
PRIVATE SECTION.
DATA mv_skip_test_classes TYPE abap_bool.
METHODS deserialize_abap_source_old
IMPORTING is_clskey TYPE seoclskey
it_source TYPE ty_string_tt
@ -549,10 +551,14 @@ CLASS lcl_object_oriented_base IMPLEMENTATION.
rt_source = lo_oo_serializer->serialize_macros( is_class_key ).
WHEN seop_ext_class_testclasses.
rt_source = lo_oo_serializer->serialize_testclasses( is_class_key ).
mv_skip_test_classes = lo_oo_serializer->are_test_classes_skipped( ).
WHEN OTHERS.
rt_source = lo_oo_serializer->serialize_abap_clif_source( is_class_key ).
ENDCASE.
ENDMETHOD.
METHOD lif_object_oriented_object_fnc~get_skip_test_classes.
rv_skip = mv_skip_test_classes.
ENDMETHOD.
METHOD lif_object_oriented_object_fnc~get_class_properties.
ASSERT 0 = 1.
ENDMETHOD.
@ -1158,11 +1164,10 @@ CLASS lcl_object_clas IMPLEMENTATION.
ENDIF.
lt_source = mo_object_oriented_object_fct->serialize_abap(
EXPORTING
is_class_key = ls_class_key
iv_type = seop_ext_class_testclasses
CHANGING
cv_test_classes_skipped = mv_skip_testclass ).
is_class_key = ls_class_key
iv_type = seop_ext_class_testclasses ).
mv_skip_testclass = mo_object_oriented_object_fct->get_skip_test_classes( ).
IF NOT lt_source[] IS INITIAL AND mv_skip_testclass = abap_false.
mo_files->add_abap( iv_extra = 'testclasses'
it_abap = lt_source ). "#EC NOTEXT

5
src/zabapgit_unit_test_clas_intf.prog.abap
View File

@ -111,7 +111,6 @@ CLASS ltd_spy_oo_object IMPLEMENTATION.
rt_source = mt_local_macros.
WHEN seop_ext_class_testclasses.
rt_source = mt_local_test_classes.
cv_test_classes_skipped = mv_skip_test_classes.
WHEN OTHERS.
rt_source = mt_source.
ENDCASE.
@ -141,6 +140,10 @@ CLASS ltd_spy_oo_object IMPLEMENTATION.
rt_descriptions = mt_descriptions.
ENDMETHOD.
METHOD lif_object_oriented_object_fnc~get_skip_test_classes.
rv_skip = mv_skip_test_classes.
ENDMETHOD.
ENDCLASS.
CLASS ltd_fake_object_files DEFINITION FOR TESTING