instaparse
This commit is contained in:
parent
b1f981799c
commit
5f783e4d88
4 changed files with 28 additions and 3 deletions
3
deps.edn
3
deps.edn
|
|
@ -42,7 +42,8 @@
|
|||
selmer/selmer {:mvn/version "1.12.44"}
|
||||
com.taoensso/timbre {:mvn/version "5.1.2"}
|
||||
org.clojure/tools.logging {:mvn/version "1.1.0"}
|
||||
org.clojure/data.priority-map {:mvn/version "1.1.0"}}
|
||||
org.clojure/data.priority-map {:mvn/version "1.1.0"}
|
||||
instaparse/instaparse {:mvn/version "1.4.10"}}
|
||||
:aliases {:babashka/dev
|
||||
{:main-opts ["-m" "babashka.main"]}
|
||||
:profile
|
||||
|
|
|
|||
|
|
@ -27,7 +27,8 @@
|
|||
[org.clojure/core.async "1.5.648"]
|
||||
[org.clojure/test.check "1.1.1"]
|
||||
[com.github.clj-easy/graal-build-time "0.1.0"]
|
||||
[rewrite-clj/rewrite-clj "1.0.699-alpha"]]
|
||||
[rewrite-clj/rewrite-clj "1.0.699-alpha"]
|
||||
[instaparse/instaparse "1.4.10"]]
|
||||
:plugins [[org.kipz/lein-meta-bom "0.1.1"]]
|
||||
:metabom {:jar-name "metabom.jar"}
|
||||
:profiles {:feature/xml {:source-paths ["feature-xml"]
|
||||
|
|
|
|||
17
src/babashka/impl/instaparse.clj
Normal file
17
src/babashka/impl/instaparse.clj
Normal file
|
|
@ -0,0 +1,17 @@
|
|||
(ns babashka.impl.instaparse
|
||||
(:require [instaparse.core :as insta]
|
||||
[instaparse.combinators-source :as source]
|
||||
[sci.core :as sci]))
|
||||
|
||||
(def ins (sci/create-ns 'instaparse.core))
|
||||
|
||||
(def instaparse-namespace
|
||||
{'defparser (sci/copy-var insta/defparser ins)
|
||||
'map->Parser (sci/copy-var insta/map->Parser ins)
|
||||
'parser (sci/copy-var insta/parser ins)
|
||||
'transform (sci/copy-var insta/transform ins)})
|
||||
|
||||
(def sns (sci/create-ns 'instaparse.combinators-source))
|
||||
|
||||
(def instaparse.combinators-source-namespace
|
||||
{'regexp (sci/copy-var source/regexp sns)})
|
||||
|
|
@ -333,6 +333,8 @@ Use bb run --help to show this help output.
|
|||
|
||||
(def clojure-main-ns (sci/create-ns 'clojure.main))
|
||||
|
||||
(require 'babashka.impl.instaparse)
|
||||
|
||||
(def namespaces
|
||||
(cond->
|
||||
{'user {'*input* (reify
|
||||
|
|
@ -440,7 +442,11 @@ Use bb run --help to show this help output.
|
|||
'clojure.tools.logging.readable
|
||||
@(resolve 'babashka.impl.logging/tools-logging-readable-namespace))
|
||||
features/priority-map? (assoc 'clojure.data.priority-map
|
||||
@(resolve 'babashka.impl.priority-map/priority-map-namespace))))
|
||||
@(resolve 'babashka.impl.priority-map/priority-map-namespace))
|
||||
true (assoc 'instaparse.core
|
||||
@(resolve 'babashka.impl.instaparse/instaparse-namespace)
|
||||
'instaparse.combinators-source
|
||||
@(resolve 'babashka.impl.instaparse/instaparse.combinators-source-namespace))))
|
||||
|
||||
(def edn-readers (cond-> {}
|
||||
features/yaml?
|
||||
|
|
|
|||
Loading…
Reference in a new issue