From a026ec3840230a22c6e1d3812a446401565deeb2 Mon Sep 17 00:00:00 2001
From: Sandy Brownlee <sbr@cs.stir.ac.uk>
Date: Mon, 5 Sep 2022 17:15:08 +0100
Subject: [PATCH] add while example

---
 programs/while.tri | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 programs/while.tri

diff --git a/programs/while.tri b/programs/while.tri
new file mode 100644
index 0000000..9bbb664
--- /dev/null
+++ b/programs/while.tri
@@ -0,0 +1,11 @@
+let
+  var a : Integer
+in
+begin
+  a := 0;
+  while a < 5 do
+  begin
+    put('a');
+    a := a + 1;
+  end
+end