HS runtime: add Set/Map coercions to hs-coerce

Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>

shared/static/wasm/sx/hs-runtime.sx

@@ -355,6 +355,21 @@
             (list)
             value)
           value))
+      ((= type-name "Set")
+        (if
+          (list? value)
+          (reduce
+            (fn
+              (acc x)
+              (if (some (fn (a) (= a x)) acc) acc (append acc (list x))))
+            (list)
+            value)
+          value))
+      ((= type-name "Map")
+        (if
+          (dict? value)
+          (map (fn (k) (list k (get value k))) (keys value))
+          value))
       (true value))))
 
 (define