Add testcase for bug #21488

data/scenario-test.cfg

@@ -3928,6 +3928,45 @@ unplagueable: %s"
             [/command]
         [/set_menu_item]
     [/event]
+    [event]
+        name=start
+
+        [store_locations]
+            x=5-8
+            variable=x_locs
+        [/store_locations]
+        [store_locations]
+            x,y=5-8,0-99
+            variable=xy_locs
+        [/store_locations]
+        [set_variable]
+            name=x_len
+            value=$x_locs.length
+        [/set_variable]
+        [set_variable]
+            name=xy_len
+            value=$xy_locs.length
+        [/set_variable]
+
+        [if]
+            [variable]
+                name=x_len
+                numerical_not_equals=$xy_len
+            [/variable]
+            [then]
+                [message]
+                    speaker=narrator
+                    image=wesnoth-icon.png
+                    message="Single-dimensional [store_locations] is broken, as $x_len does not equal $xy_len|. See bug #21488"
+                [/message]
+            [/then]
+        [/if]
+
+        {CLEAR_VARIABLE x_locs}
+        {CLEAR_VARIABLE xy_locs}
+        {CLEAR_VARIABLE x_len}
+        {CLEAR_VARIABLE xy_len}
+    [/event]
 [/test]
 
 [+units]