(ns humpty.core
(require [clojure.set :refer [subset?]]))
Humpty Dumpty
urlPattern = require('url-pattern') | |
RouterMixin = | |
getInitialState: -> | |
match: this.match(this.props.path || window.location.pathname) | |
navigate: (path, callback) -> | |
window.history.pushState(null, null, path) | |
this.setState({ match: this.match(path) }, callback) |
### Keybase proof | |
I hereby claim: | |
* I am mhuebert on github. | |
* I am mhuebert (https://keybase.io/mhuebert) on keybase. | |
* I have a public key whose fingerprint is F0C9 8331 CCA1 0DA3 5719 93D7 A5F1 2850 30B8 1AE7 | |
To claim this, I am signing this object: |
(ns prndoc.core | |
(require | |
[clojure.core.strint :refer [<<]] | |
[clojure.core.match :refer [match]])) | |
(defn has-splat? [arglist] | |
((complement nil?) (first (last (split-with #(not= % '&) arglist))))) | |
(defn parse-arg-pattern | |
"Argument pattern [num-args has-splat?]. Pattern of [func & body] is [1 true]." |
CodeMirror.defineMode("clojure-markdown", function(options){ | |
var clojureMode = CodeMirror.getMode({}, "clojure"); | |
var markdownMode = CodeMirror.getMode({}, "markdown"); | |
return { | |
startState: function() { | |
return { | |
mode: markdownMode, |
(ns app.layout | |
(:require | |
[reagent.core :as r] | |
[reagent.cursor :refer [cursor]])) | |
(defonce my-state (r/atom {1 "aaa" | |
2 "bbb"})) | |
(defn display-item [item-cursor id] | |
(fn [] |
; I want to use the files referenced in deps.cljs | |
; - CodeMirror must run before -overlay, -subpar, and -match-brackets. | |
(ns my-project.core | |
(:require | |
[CodeMirror] | |
[CodeMirror-overlay] | |
[CodeMirror-subpar] | |
[CodeMirror-match-brackets] | |
[reagent.core :as r :refer [cursor]] |
assuming you've already installed the Oculus runtime & it's working on your machine
(cljs/eval (cljs/empty-state) | |
'(def x 1) | |
{:eval cljs/js-eval | |
:context :expr | |
:def-emits-var true | |
:ns cells.core | |
} | |
#(pprint %)) |
ClojureScript from master w/ zero dependencies
foo ├── build.clj