Format WHILE .. LOOP

Author: nene

src/syntax/procedural_language.ts

@@ -141,6 +141,8 @@ export const proceduralLanguageMap: Partial<CstToDocMap<AllProceduralNodes>> = {
       hardline,
       print.spaced("endWhileKw"),
     ]),
+  while_loop_stmt: (print) =>
+    group(print.spaced(["whileKw", "condition", "loop"])),
   // FOR .. IN
   for_stmt: (print) =>
     group([

test/proc/loops.test.ts

@@ -1,5 +1,5 @@
 import dedent from "dedent-js";
-import { testBigquery } from "../test_utils";
+import { testBigquery, testPlpgsql } from "../test_utils";
 
 describe("loops", () => {
   it(`formats LOOP`, async () => {
@@ -26,6 +26,14 @@ describe("loops", () => {
     `);
   });
 
+  it(`formats WHILE .. LOOP .. END LOOP`, async () => {
+    await testPlpgsql(dedent`
+      WHILE x < 10 LOOP
+        x = x + 1;
+      END LOOP
+    `);
+  });
+
   it(`formats FOR .. IN`, async () => {
     await testBigquery(dedent`
       FOR record IN (SELECT * FROM tbl) DO