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

Merge pull request #1568 from mkaesemann/feature/X_TO_BITBYTE_optimization

Browse Source 
Performance Improvement in X_TO_BITBYTE Conversion
This commit is contained in:
Lars Hvam 2018-07-06 16:28:07 +02:00 committed by GitHub
commit 20d4605491
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
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.