add testcase

Author: larshp

package.json

@@ -15,11 +15,11 @@
   },
   "license": "MIT",
   "dependencies": {
-    "@abaplint/cli": "^2.113.233",
+    "@abaplint/cli": "^2.113.234",
     "@abaplint/database-pg": "^2.11.78",
     "@abaplint/database-sqlite": "^2.11.78",
-    "@abaplint/runtime": "^2.12.7",
-    "@abaplint/transpiler-cli": "^2.12.7",
+    "@abaplint/runtime": "^2.12.8",
+    "@abaplint/transpiler-cli": "^2.12.8",
     "0x": "^6.0.0"
   }
 }

src/abap/regex/cl_abap_regex.clas.testclasses.abap

@@ -11,6 +11,7 @@ CLASS ltcl_test DEFINITION FOR TESTING DURATION SHORT RISK LEVEL HARMLESS FINAL.
     METHODS replace_oo   FOR TESTING RAISING cx_static_check.
     METHODS pcre_slashes FOR TESTING RAISING cx_static_check.
     METHODS classic_slashes FOR TESTING RAISING cx_static_check.
+    METHODS digits FOR TESTING RAISING cx_static_check.
 
 ENDCLASS.
 
@@ -218,4 +219,25 @@ CLASS ltcl_test IMPLEMENTATION.
 
   ENDMETHOD.
 
+  METHOD digits.
+
+    DATA l_offset  TYPE i.
+    DATA l_counter TYPE string.
+    DATA name      TYPE string.
+    DATA lo_regex  TYPE REF TO cl_abap_regex.
+
+    name = 'notFound'.
+    CREATE OBJECT lo_regex EXPORTING pattern = '([[:digit:]]*)$'.
+    FIND FIRST OCCURRENCE OF REGEX lo_regex IN name SUBMATCHES l_counter MATCH OFFSET l_offset.
+
+    cl_abap_unit_assert=>assert_equals(
+      act = l_counter
+      exp = '' ).
+
+    cl_abap_unit_assert=>assert_equals(
+      act = l_offset
+      exp = 8 ).
+
+  ENDMETHOD.
+
 ENDCLASS.