aboutsummaryrefslogtreecommitdiffstats
path: root/http_demo_commands.sexp
diff options
context:
space:
mode:
Diffstat (limited to 'http_demo_commands.sexp')
-rw-r--r--http_demo_commands.sexp4
1 files changed, 4 insertions, 0 deletions
diff --git a/http_demo_commands.sexp b/http_demo_commands.sexp
new file mode 100644
index 0000000..680831f
--- /dev/null
+++ b/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")))