More specific loop keyword high-lighting

queries/highlights.scm

@@ -4,6 +4,13 @@
  "primitive"
 ] @keyword.function
 
+[
+  "do"
+  "for"
+  "to"
+  "while"
+] @keyword.repeat
+
 [
   "array"
   (break_expression)

test/highlight/keywords.tig

@@ -28,13 +28,13 @@ in
   /*            ^ keyword */
 
   for i := 12 to 27 do 42;
-  /* <- keyword */
-  /*          ^ keyword */
-  /*                ^ keyword */
+  /* <- keyword.repeat */
+  /*          ^ keyword.repeat */
+  /*                ^ keyword.repeat */
 
   while 12 do break
-  /* <- keyword */
-  /*       ^ keyword */
+  /* <- keyword.repeat */
+  /*       ^ keyword.repeat */
   /*          ^ keyword */
 
 end