From 2d6c93c03ba8a2392ff09b92bfd51fb8afe7a23c Mon Sep 17 00:00:00 2001 From: Teddy Wing Date: Thu, 19 Aug 2021 20:58:01 +0200 Subject: incdec: Get backward incrementing working in middle of a number --- t/100-increment-decrement.t | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 't') diff --git a/t/100-increment-decrement.t b/t/100-increment-decrement.t index b234f83..1345dfe 100644 --- a/t/100-increment-decrement.t +++ b/t/100-increment-decrement.t @@ -61,4 +61,10 @@ is( 'increments the fourth double-digit integer with point at position 16 backward' ); +is( + incdec::incdec('test 12 19 555 64', 13, 1), + 'test 12 19 556 64', + 'increments the third triple-digit integer with point at position 13 backward' +); + done_testing; -- cgit v1.2.3