From ac4b0dc07c3b2ac710f51fa804068ee7a76f916f Mon Sep 17 00:00:00 2001
From: Teddy Wing
Date: Wed, 25 May 2022 01:39:35 +0200
Subject: 100-increment-decrement: Add tests for integers with leading zero

---
 t/100-increment-decrement.t | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/t/100-increment-decrement.t b/t/100-increment-decrement.t
index eda27ca..50d76c5 100644
--- a/t/100-increment-decrement.t
+++ b/t/100-increment-decrement.t
@@ -44,6 +44,22 @@ is_deeply(
 	'increments the first integer'
 );
 
+@got = incdec::incdec('test 012 0', 1);
+@want = ('test 013 0', 6);
+is_deeply(
+	\@got,
+	\@want,
+	'increments an integer with a leading zero'
+);
+
+@got = incdec::incdec('test A-02 0', -1);
+@want = ('test A-03 0', 7);
+is_deeply(
+	\@got,
+	\@want,
+	'increments a negative integer with a leading zero'
+);
+
 @got = incdec::incdec('test 12 0', 1, 6);
 @want = ('test 13 0', 5);
 is_deeply(
-- 
cgit v1.2.3