Skip to content

Instantly share code, notes, and snippets.

@vdikan
vdikan / vega-serv.bb
Last active September 13, 2022 10:34
Single-script Vega-Lite plotter made with Babashka (Clojure). A remix of wee-httpd.
#!/usr/bin/env bb
(ns vega-serv)
(import (java.net ServerSocket))
(require '[clojure.string :as string]
'[clojure.java.io :as io]
'[cheshire.core :as json]
'[clojure.tools.cli :refer [parse-opts]])
@superblaubeere27
superblaubeere27 / LWJGLMain.java
Created June 8, 2020 13:11
Render GLSL Shaders in LWJGL
package net.superblaubeere27.glslsandboxrenderer;
import org.lwjgl.*;
import org.lwjgl.glfw.*;
import org.lwjgl.opengl.*;
import org.lwjgl.system.*;
import java.io.IOException;
import java.nio.*;
@fnky
fnky / ANSI.md
Last active May 19, 2024 06:10
ANSI Escape Codes

ANSI Escape Sequences

Standard escape codes are prefixed with Escape:

  • Ctrl-Key: ^[
  • Octal: \033
  • Unicode: \u001b
  • Hexadecimal: \x1B
  • Decimal: 27
@borkdude
borkdude / cljscript
Last active July 4, 2018 16:34
Execute all in one clj script
deps=`awk '/^;; deps.edn$/{flag=1;next}/^;; end deps.edn$/{flag=0}flag' $1`
script=`awk '/^;; script$/{flag=1;next}/^;; end script$/{flag=0}flag' $1`
clj -Sdeps "$deps" -e "$script"
@bhb
bhb / README.md
Last active May 15, 2023 01:28
Clojure friendly mode, inspired by https://github.com/slipset/friendly
(ns css.core
(:require [garden.core :refer [css]]
[garden.stylesheet :refer [at-keyframes at-media]]))
(def styles (atom {})) ;; styles cache
;; ignore this code, it generates unique short class names
(def cls->id (atom {}))
(def vc* (atom {:id 0
@semperos
semperos / deps.edn
Last active September 5, 2019 19:32
Clojure deps.edn Workflow
{:aliases {:dev {:extra-deps
{org.clojure/tools.nrepl {:mvn/version "0.2.13"}
cider/cider-nrepl {:mvn/version "0.17.0-SNAPSHOT"}}}
:std {:extra-paths ["resources"]}
:test {:extra-paths ["test"]}}
:mvn/repos {"private-repo" {:url "https://example.com/repository/maven-releases/"}}}
@borkdude
borkdude / script.cljs
Created May 13, 2017 14:02
Standard input with lumo / node / ClojureScript
#!/usr/bin/env lumo
(defn greeting! [name]
(println (str "Hello " name "!")))
(def stdinput (atom ""))
(js/require "process")
(.setEncoding js/process.stdin "utf8")
(.on js/process.stdin "data"
(defn code-mirror
"Create a code-mirror editor. The parameters:
value-atom (reagent atom)
when this changes, the editor will update to reflect it.
options
:style (reagent style map)
will be applied to the container element
:js-cm-opts
options passed into the CodeMirror constructor
:on-cm-init (fn [cm] -> nil)
@nathanmarz
nathanmarz / demo.clj
Created January 11, 2016 18:53
Recursive navigation with Specter
(use 'com.rpl.specter)
(use 'com.rpl.specter.macros)
(defprotocolpath TreeWalker [])
(extend-protocolpath TreeWalker
Object nil
clojure.lang.PersistentVector [ALL TreeWalker])
(select [TreeWalker number?] [:a 1 [2 [[[3]]] :e] [4 5 [6 7]]])