This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; largely @emccue's implementation in https://clojurians-log.clojureverse.org/clojure on 2021-05-04 | |
;; with a few fixes and adjustments | |
(defmacro let% [clauses & body] | |
(loop [clauses clauses | |
bindings []] | |
(if (empty? clauses) | |
`(let ~bindings ~@body) | |
(let [[fc & rcs] clauses] | |
(if (list? fc) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(require '[clojure.set :as set] | |
'[clojure.string :as str] | |
'[clojure.tools.namespace.dir :as dir] | |
'[clojure.tools.namespace.find :as find] | |
'[clojure.tools.namespace.track :as track]) | |
(defn create-tracker [] | |
(->> {:platform find/clj | |
:add-all? true} | |
(dir/scan-dirs {} repl/refresh-dirs))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<!DOCTYPE html> | |
<html> | |
<head> | |
<meta charset="utf-8"> | |
<meta name="viewport" content="width=device-width"> | |
<title>JS Bin</title> | |
<script src="https://fb.me/react-15.1.0.js"></script> | |
<script src="https://fb.me/react-dom-15.1.0.js"></script> | |
<script src="https://cdnjs.cloudflare.com/ajax/libs/redux/3.7.1/redux.js"></script> | |
</head> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Set-StrictMode -Version Latest | |
$ErrorActionPreference = "Stop" | |
$stopwatch = [System.Diagnostics.Stopwatch]::StartNew() | |
try | |
{ | |
# do stuff here | |
} | |
finally | |
{ |