Press n or j to go to the next uncovered block, b, p or k for the previous block.
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x | CLASS lcl_stream IMPLEMENTATION.
METHOD constructor.
mv_data = iv_data.
mv_position = 0.
mv_length = xstrlen( mv_data ).
ENDMETHOD.
METHOD eat_byte.
rv_x = mv_data+mv_position(1).
mv_position = mv_position + 1.
ENDMETHOD.
METHOD eat_bytes.
rv_x = mv_data+mv_position(iv_length).
mv_position = mv_position + iv_length.
ENDMETHOD.
METHOD has_data.
rv_data = boolc( mv_position < mv_length ).
ENDMETHOD.
ENDCLASS.
|