luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

README

Browse source
This commit is contained in:
Michiel Borkent 2020-05-06 21:30:56 +02:00
parent eb4f25f5c5
commit efab1e28a4
4 changed files with 7 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
examples/pods/pod-babashka-filewatcher/README.md
View file

@ -9,7 +9,7 @@ $ cargo build --release
## Run ## Run
``` ```
(babashka.pods/load-pod "examples/pods/pod-babashka-filewatcher/target/release/pod-babashka-filewatcher") (babashka.pods/load-pod "target/release/pod-babashka-filewatcher")
(def chan (pod.babashka.filewatcher/watch "/tmp")) (def chan (pod.babashka.filewatcher/watch "/tmp"))
(require '[clojure.core.async :as async]) (require '[clojure.core.async :as async])
(loop [] (prn (async/<!! chan)) (recur)) (loop [] (prn (async/<!! chan)) (recur))

5
examples/pods/pod-babashka-hsqldb/README.md
View file

@ -7,6 +7,7 @@ Run `./compile`
## Run ## Run
``` clojure ``` clojure
(babashka.pods/load-pod "examples/pods/pod-babashka-hsqldb/pod-babashka-hsqldb") (babashka.pods/load-pod "./pod-babashka-hsqldb")
(pod.hsqldb/execute! "jdbc:hsqldb:mem:testdb;sql.syntax_mys=true" ["create table foo ( foo int );"])' (pod.babashka.hsqldb/execute! "jdbc:hsqldb:mem:testdb;sql.syntax_mys=true" ["create table foo ( foo int );"])'
;;=> [#:next.jdbc{:update-count 0}]
``` ```

4
examples/pods/pod-babashka-hsqldb/src/pod/babashka/hsqldb.clj
View file

@ -9,7 +9,7 @@
(def stdin (PushbackInputStream. System/in)) (def stdin (PushbackInputStream. System/in))
(def lookup (def lookup
{'pod.hsqldb/execute! jdbc/execute!}) {'pod.babashka.hsqldb/execute! jdbc/execute!})
(defn write [v] (defn write [v]
(bencode/write-bencode System/out v) (bencode/write-bencode System/out v)
@ -32,7 +32,7 @@
op (keyword op)] op (keyword op)]
(case op (case op
:describe (do (write {"format" "edn" :describe (do (write {"format" "edn"
"namespaces" [{"name" "pod.hsqldb" "namespaces" [{"name" "pod.babashka.hsqldb"
"vars" [{"name" "execute!"}]}]}) "vars" [{"name" "execute!"}]}]})
(recur)) (recur))
:invoke (let [var (-> (get message "var") :invoke (let [var (-> (get message "var")

2
examples/pods/pod-lispyclouds-sqlite/README.md
View file

@ -11,7 +11,7 @@ To run this:
Then run as pod: Then run as pod:
``` clojure ``` clojure
(babashka.pods/load-pod ["examples/pods/pod-lispyclouds-sqlite/pod-lispyclouds-sqlite.py"]) (babashka.pods/load-pod ["./pod-lispyclouds-sqlite.py"])
(require '[pod.lispy-clouds.sqlite :as sqlite]) (require '[pod.lispy-clouds.sqlite :as sqlite])
(sqlite/execute! "create table if not exists foo ( int foo )") (sqlite/execute! "create table if not exists foo ( int foo )")
(sqlite/execute! "delete from foo") (sqlite/execute! "delete from foo")