Skip to content

✨ Add primitive functions #4

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 3 commits into from
Jan 10, 2020
Merged

✨ Add primitive functions #4

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
3 commits
Select commit Hold shift + click to select a range
247f527
:sparkles: Add primitive functions
rinx Jan 9, 2020
f8a06cc
:zap: Add static
rinx Jan 9, 2020
92467c1
:fire: Remove static flags
rinx Jan 10, 2020
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
12 changes: 9 additions & 3 deletions README.md
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -23,7 +23,7 @@ increments version by git log message contexts.

[semver workflow of this repository](https://github.com/rinx/gitwerk/blob/master/.github/workflows/semver.yml) is an example of this subcommand.

```
```bash
## when the latest tag is v0.0.1
$ git commit -m "[patch] increment patch version"
## the commit comment contains "[patch]"
Expand Down Expand Up @@ -64,7 +64,7 @@ $ gitwerk semver-auto

prints incremented version.

```
```bash
## when the latest tag is v0.0.1

$ gitwerk semver patch
Expand All @@ -81,7 +81,7 @@ v1.0.0

gitwerk supports to run user-defined scripts written in clojure (powered by [borkdude/sci](https://github.com/borkdude/sci)).

```
```bash
## can read stdin
$ echo '(semver ctx ["patch"])' | gitwerk sci
v0.0.2
Expand All @@ -107,6 +107,12 @@ Version not updated
$ git commit --allow-empty -m "[patch] version updated"
$ gitwerk sci examples/example2.clj
Version updated: v0.0.3 -> v0.0.4

## http get/post using clj-http-lite.client
$ echo '(-> (http/get "https://api.github.com/repos/rinx/gitwerk/issues") pprint)' | gitwerk sci

## parse json and convert to clj map
$ echo '(-> (http/get "https://api.github.com/repos/rinx/gitwerk/issues") :body (json/read-value) pprint)' | gitwerk sci
```

## License
Expand Down
12 changes: 10 additions & 2 deletions src/gitwerk/command/sci.clj
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -2,12 +2,20 @@
(:require
[clojure.spec.alpha :as spec]
[clojure.pprint :as pprint]
[clojure.edn :as edn]
[sci.core :as sci]
[gitwerk.internal.io :as internal.io]))
[clj-http.lite.client :as http]
[gitwerk.internal.io :as internal.io]
[gitwerk.internal.json :as json]))

(def clj-primitives
{'println println
'pprint pprint/pprint})
'pprint pprint/pprint
'json/read-value json/read-value
'edn/read-string edn/read-string
'env #(or (System/getenv %) "")
'http/get http/get
'http/post http/post})

(defn run-fn [sci-opts]
(fn [ctx args]
Expand Down