This directory contains Architecture Decision Records (ADRs) that document technical decisions made during the development of the system.
A good ADR should have the following parts:
- A date
- People involved with the decision
| (ns jsonb-postgres-clojure | |
| (:require | |
| [jsonista.core :as json] | |
| [next.jdbc.prepare :as prepare] | |
| [next.jdbc.result-set :as rs]) | |
| (:import | |
| [org.postgresql.util PGobject] | |
| [java.sql PreparedStatement Array])) | |
| (def mapper (json/object-mapper {:decode-key-fn keyword})) |
| (ns partitions) | |
| (defn nth-partition | |
| "Interpreting i as a binary sequence, split coll at every 1 in the sequence." | |
| [i coll] | |
| (loop [current [(first coll)] | |
| out [] | |
| coll (next coll) | |
| i i] | |
| (if-not coll |
https://www.metosin.fi/blog/2024-09-26-on-seniority-and-acceptance
There have been two hard pills for me to swallow as I've matured in my career, moving to more senior positions. By maturing I mean widening my impact from my individual contribution to the team level and beyond – being a multiplier, as they say. These hard pills are:
| (ns a10n | |
| (:require [clojure.set :as set] | |
| [clojure.string :as str])) | |
| (defn i4t [t2e w2d val] | |
| (if (empty? w2d) | |
| (assoc t2e :end val) | |
| (update t2e | |
| (first w2d) | |
| i4t (rest w2d) val))) |
| (declare unparse) | |
| (defn unparse-args [lang args] | |
| (cond | |
| (map? (first args)) | |
| (update-vals (first args) (partial unparse lang)) | |
| :else | |
| (mapv (partial unparse lang) args))) | |
| (defn unparse [lang data] |
| {:deps {org.apache.logging.log4j/log4j-api {:mvn/version "2.17.2"} | |
| org.apache.logging.log4j/log4j-core {:mvn/version "2.17.2"} | |
| org.apache.logging.log4j/log4j-layout-template-json {:mvn/version "2.17.2"} | |
| org.apache.logging.log4j/log4j-slf4j18-impl {:mvn/version "2.17.2"}}} |
| {-# LANGUAGE DeriveFunctor, StandaloneDeriving #-} | |
| import Data.Functor.Classes (Show1) | |
| data ExprFunctor a = Literal Int | Plus a a | Times a a | |
| deriving (Show, Functor) | |
| data LineNumber a = LineNumber Int a | |
| deriving (Show, Functor) |