This file contains hidden or 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
(ns stateful-session | |
(:refer-clojure :exclude (get))) | |
(def ^:dynamic *session*) | |
(def stateful-session | |
{:name ::stateful-session | |
:enter | |
(fn [context] | |
(let [old-value (get-in context [:request :session] {})] |
This file contains hidden or 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
### Keybase proof | |
I hereby claim: | |
* I am aroemers on github. | |
* I am arnout (https://keybase.io/arnout) on keybase. | |
* I have a public key ASC4xD3JS7DlI8pTW3DC9pVRfVpXu6jHLyjyjzX-Xznutwo | |
To claim this, I am signing this object: |
This file contains hidden or 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
(ns app | |
(:require [lifecycle :refer [combine parallel]])) | |
(defn components [app-config] | |
(combine (parallel (users-db/component) | |
(tasks-db/component)) | |
(rest-api/component app-config))) |
This file contains hidden or 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
/.tailwind |
This file contains hidden or 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
;;;; Implementation based on | |
;;;; https://blog.bruce-hill.com/packrat-parsing-from-scratch | |
(ns crustimoney2.core | |
(:require [clojure.string :as str])) | |
;;; Utils | |
(defn success? [o] | |
(and (map? o) o)) |
This file contains hidden or 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
import java.io.IOException; | |
import java.io.Reader; | |
import java.util.Arrays; | |
import java.util.List; | |
import java.util.regex.Matcher; | |
import java.util.regex.Pattern; | |
public class ReaderBuffer implements CharSequence { | |
private StringBuilder buffer; | |
private Reader reader; |