thickey

(ns flatmap
  (:require [clojure.string :as str]))

(def default-delimiter \$)

;; via https://stackoverflow.com/questions/31704704/depth-first-tree-traversal-accumulation-in-clojure/31709202#31709202

(defn traverse [t]
  (letfn [(traverse- [path t]
            (when (seq t)

thickey

Instructions

Note: you must have Cider version 0.18.*

For pure tools.deps (non-lein)

In deps.edn

{:paths ["src" "resources"]
 :deps {org.clojure/clojure {:mvn/version "1.9.0"}}

thickey

var fs = require('fs');
var vm = require('vm');

var emberjs = fs.readFileSync('public/javascripts/vendor/ember-0.9.5.min.js', 'utf8');
var templatesDir = 'templates';
var destinationDir = 'public/javascripts/templates';

function compileHandlebarsTemplate(templatesDir, fileName) {
  var file = templatesDir + '/' + fileName;

thickey

Instructions

1. Add nrepl server dep to deps.edn :dev alias extra deps

org.clojure/tools.nrepl {:mvn/version "0.2.12"}

2. create dev/user.clj containing the following:

(ns user
 (:require [clojure.tools.nrepl.server :as nrepl]))

thickey

Handling multiple results from SQL that includes temp tables.

NB! this is using clojure.java.jdbc v0.6.1, as we have performance issues w/ 0.7.x

Although this gist was very helpful when all statements return results, this is what is ultimately needed to properly traverse the intermediate reults that return nothing (e.g. temp tables).

thickey

Keybase proof

I hereby claim:

• I am thickey on github.
• I am thickey (https://keybase.io/thickey) on keybase.
• I have a public key whose fingerprint is 0ED7 4731 F2C7 F5EE 5635 8BB7 818A EC24 E433 4A5D

To claim this, I am signing this object:

thickey

(ns pom2proj
  (:require [clojure.xml :as xml]
            [clojure.zip :as zip]
            [clojure.java.io :as io]
            [clojure.data.zip.xml :as zx])
  (:use [clojure.pprint :only [pprint]]))

(defn- text-attrs
  [loc ks]
  (map (fn [k]

thickey

;; Works with nrepl-0.1.6.el

(defun my-form-printing-handler (buffer form)
  (lexical-let ((form form))
    (nrepl-make-response-handler buffer
                                 (lambda (buffer value)
                                   (nrepl-emit-result buffer (format "%s" form) t)
                                   (nrepl-emit-result buffer (format "%s" value) t))
                                 (lambda (buffer out)
                                   (nrepl-emit-output buffer out t))

thickey

;; An implementation of the rock-paper-scissors variant -
;; rock-paper-scissors-lizard-spock - based on Alex Miller's core.async
;; implementation.

;; - http://tech.puredanger.com/2013/07/10/rps-core-async/
;; - https://gist.github.com/puredanger/5965883
;; - https://github.com/relevance/labrepl/blob/master/src/solutions/rock_paper_scissors.clj
;; - http://www.imdb.com/title/tt1256039/quotes?item=qt0493730

(require 'clojure.core.async :refer :all)

thickey

(ns dinesman
  (:refer-clojure :exclude [==])
  (:use clojure.core.logic))

(defne aboveo [x y l]
  ([_ _ [y . r]]
     (membero x l))
  ([_ _ [z . r]]
     (!= z y)
     (aboveo x y r)))