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

Performance Improvement in X_TO_BITBYTE Conversion

Browse Source 
- Changed: Since X_TO_BITBYTE only converts a single byte to a bitstring, it is faster to use direct addressing instead of a loop/concatenate pair, since concatenate on characters has to process the whole char array in each run.
This commit is contained in:
Michael Käsemann 2018-07-06 14:24:40 +02:00
parent 47a313602d
commit f7f78dfc26
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/utils/zcl_abapgit_convert.clas.abap
View File

@ -159,10 +159,14 @@ CLASS ZCL_ABAPGIT_CONVERT IMPLEMENTATION.
CLEAR rv_bitbyte. CLEAR rv_bitbyte.
DO 8 TIMES. GET BIT 1 OF iv_x INTO rv_bitbyte+0(1).
GET BIT sy-index OF iv_x INTO lv_b. GET BIT 2 OF iv_x INTO rv_bitbyte+1(1).
CONCATENATE rv_bitbyte lv_b INTO rv_bitbyte. GET BIT 3 OF iv_x INTO rv_bitbyte+2(1).
ENDDO. GET BIT 4 OF iv_x INTO rv_bitbyte+3(1).
GET BIT 5 OF iv_x INTO rv_bitbyte+4(1).
GET BIT 6 OF iv_x INTO rv_bitbyte+5(1).
GET BIT 7 OF iv_x INTO rv_bitbyte+6(1).
GET BIT 8 OF iv_x INTO rv_bitbyte+7(1).
ENDMETHOD. "x_to_bitbyte ENDMETHOD. "x_to_bitbyte
ENDCLASS. ENDCLASS.