From 14dc3c624760eba9bafea21aaee403fcd216ad65 Mon Sep 17 00:00:00 2001
From: Jacob Haip <jhaip@users.noreply.github.com>
Date: Tue, 21 Mar 2023 22:51:57 -0400
Subject: initial tests of wishes to create web endpoints

---
 user-programs/folk-haip.local/web-endpoints.folk | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 user-programs/folk-haip.local/web-endpoints.folk

(limited to 'user-programs')

diff --git a/user-programs/folk-haip.local/web-endpoints.folk b/user-programs/folk-haip.local/web-endpoints.folk
new file mode 100644
index 00000000..2d239197
--- /dev/null
+++ b/user-programs/folk-haip.local/web-endpoints.folk
@@ -0,0 +1,20 @@
+Wish the Web server handles route "/static-html/$" with handler {
+    set html "<h1>Hello World!</h1>"
+}
+
+Wish the Web server handles route "/score/$" with handler {
+    set response [dict create contentType "application/json" body "{\"score\": 5}"]
+}
+
+When /program/ has region /region/ {
+  Wish the Web server handles route "/region/$" with handler {
+    # We are currently missing $region from being in scope
+    set html "<h1>[info vars]</h1>"
+  }
+}
+
+Wish the Web server handles route {/pagee/(\d*)$} with handler {
+    if {[regexp -all {/pagee/(\d*)$} $path whole_match pageNumber]} {
+        set html "<h1>Hello Page Number $pageNumber</h1>"
+    }
+}
-- 
cgit v1.2.3