diff options
Diffstat (limited to 'config')
| -rw-r--r-- | config/config-unix.sexp | 4 | ||||
| -rw-r--r-- | config/config.sexp | 5 | ||||
| -rw-r--r-- | config/http_demo_commands.sexp | 4 |
3 files changed, 13 insertions, 0 deletions
diff --git a/config/config-unix.sexp b/config/config-unix.sexp new file mode 100644 index 0000000..7598840 --- /dev/null +++ b/config/config-unix.sexp @@ -0,0 +1,4 @@ +(server + (storage (memory)) + (transport (tcp + (path "/tmp/sakura.sock")))) diff --git a/config/config.sexp b/config/config.sexp new file mode 100644 index 0000000..67a48a5 --- /dev/null +++ b/config/config.sexp @@ -0,0 +1,5 @@ +(server + (nt (sqlite "/tmp/sakura.db")) + (transport (tcp + (address "127.0.0.1") + (port 7777)))) 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"))) |