HS: fetch do-not-throw modifier (+1 test)

This commit is contained in:
2026-04-26 10:03:06 +00:00
parent 8e4bdb7216
commit 3a755947ef
6 changed files with 78 additions and 12 deletions

View File

@@ -1832,7 +1832,7 @@
(list (quote fn) (list) (hs-to-sx (nth ast 1)))
(list (quote fn) (list) (hs-to-sx (nth ast 2)))))
((= head (quote fetch))
(list (quote hs-fetch) (hs-to-sx (nth ast 1)) (nth ast 2)))
(list (quote hs-fetch) (hs-to-sx (nth ast 1)) (nth ast 2) (nth ast 3)))
((= head (quote fetch-gql))
(list
(quote hs-fetch-gql)