zelark

;; For supporting more PG types, see https://github.com/remodoy/clj-postgresql
(ns pg-test.types
  (:require [cheshire.core :as json]
            [clojure.java.jdbc :as jdbc])
  (:import  [org.postgresql.util PGobject]
            [java.sql PreparedStatement]))


;; Writing
(defn- to-pg-json [data json-type]

zelark

Set up Jekyll environment on macOS

Set p Ruby, Bundler and a project-level Jekyll on macOS Catalina and up

This guide is for macOS Catalina and is based on the Jekyll on macOS doc and my experience.

1. Install dev tools

Use the XCode CLI to install dev tools. Recommended so that you can install native extensions when installing gems.

zelark

import bs4
import requests
import argparse
import re
from multiprocessing import Pool


root_url = 'http://pyvideo.org'
index_url = root_url + '/category/50/pycon-us-2014'

zelark

.vscode/
.lsp/
.calva/
.clj-kondo/cache/

zelark

#!/usr/bin/env bb

(require '[clojure.java.io :as io])
(require '[bencode.core :refer [read-bencode]])
(require '[clojure.walk :refer [prewalk]])
(require '[clojure.pprint :refer [pprint]])
(import 'java.io.PushbackInputStream)

(defn bytes->strings [coll]
  (prewalk #(if (bytes? %) (String. % "UTF-8") %) coll))

zelark

(defn posts-after [post-id]
  (slurp (str "https://grumpy.website/after/" post-id)))

(defn get-post-ids [posts]
  (->> posts
       (re-seq #"data\-id=\"(.+?)\"")
       (map second)))

(defn post-ids [start-id]
  (loop [post-ids [start-id]

zelark

(ns zelark.small-life
  (:require [clojure.pprint :refer [pprint]]))

(defn empty-board
  "Creates a rectangular empty board of the specified width
   and height."
  [w h]
  (vec (repeat w (vec (repeat h nil)))))

(defn populate

zelark

// Place your key bindings in this file to overwrite the defaults
[
    {
        "key": "cmd+enter",
        "command": "clojureVSCode.evalAndShowResult"
    },
    {
        "key": "cmd+k cmd+e",
        "command": "clojureVSCode.eval"
    },

zelark

  (defn take-first-sorted-by
    "Performs the same result as (take n (sort-by keyfn comp coll))
     but more efficient in terms of time and memory"
    ([n keyfn coll] (take-first-sorted-by n keyfn compare coll))
    ([n keyfn ^java.util.Comparator comp coll]
     (if (pos? n)
       (let [m ^java.util.TreeMap (java.util.TreeMap. comp)
             m-size (volatile! 0)
            ;;  if it is guaranteed that (keyfn v) will be unique for all v in coll
            ;;  we can attach :unique? key to keyfn meta and algorythm will use single val map

zelark

Clojure Reading

REPL

• The REPL and main entry points
• The Ultimate Guide To Clojure REPLs

tools.deps

• Deps and CLI Reference

Eric Normand's Guides