diff options
| author | Marcos Magueta <maguetamarcos@gmail.com> | 2026-05-18 12:41:08 -0300 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2026-05-18 12:41:08 -0300 |
| commit | f9097a0562ea8b40d40a19059578a9280b945de4 (patch) | |
| tree | 67907194b90977758c6b024809eb887a44601935 /config/http_demo_commands.sexp | |
| parent | d39b1433e2ed754640049d04462f6a151bce7d14 (diff) | |
| download | Sakura-f9097a0562ea8b40d40a19059578a9280b945de4.tar.gz Sakura-f9097a0562ea8b40d40a19059578a9280b945de4.zip | |
cleanup root
Diffstat (limited to 'config/http_demo_commands.sexp')
| -rw-r--r-- | config/http_demo_commands.sexp | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/config/http_demo_commands.sexp b/config/http_demo_commands.sexp new file mode 100644 index 0000000..680831f --- /dev/null +++ b/config/http_demo_commands.sexp @@ -0,0 +1,4 @@ +(prl (LoadLibrary "C:/Users/mague/source/repos/_build/default/plugin/lib/plugin.cmxs")) +(prl (DefineFunctionPredicate ((name "http.get") (schema (("url" "string") ("status_code" "string") ("body" "string"))) (symbol "http.get") (purity Pure) (cardinality ConstrainedFinite)))) +(drl (Select (Const (("url" (Str "https://example.com")))) (Base "public:http.get"))) +(drl (Join (url) (Const (("url" (Str "https://json.org/example.html")))) (Base "public:http.get"))) |