Aleš Najmann littleli

Spike

I looked into the state of GraalVM and Clojure and wrote some small work-related scripts.

GraalVM Build Tools

Downloaded GraalVM and set $GRAALVM_HOME
Found two main libraries for building GraalVM CLIs - https://github.com/luchiniatwork/cambada#packaging-as-a-native-image and https://github.com/taylorwood/clj.native-image (or https://github.com/taylorwood/lein-native-image for the lein equivalent). I chose clj.native-image as it seemed more focused on doing one thing well.
First tried its template example which was easy to follow.
Then added a graalvm build to one of our small cli tools
Found it to be pretty straightforward except for a stdout flushing issue that was trivial to fix

Introductory resources

High level overview https://yogthos.github.io/ClojureDistilled.html
An Animated Introduction to Clojure https://markm208.github.io/cljbook/
Interactive tutorial in a browser https://tryclojure.org/
Interactive exercises http://clojurescriptkoans.com/
Clerk notebooks with introductory examples https://github.clerk.garden/anthonygalea/notes-on-clojure
More interactive exercises https://4clojure.oxal.org/
Lambda Island tutorials https://lambdaisland.com/
Functional Programming with Clojure resources https://practicalli.github.io/

The Pledge

One thing that always made me a little sad about transducers was how map lost its ability to iterate multiple collections in parallel. This is actually my favorite feature of map. For example:

(map + (range 5) (range 5 10))
=> (5 7 9 11 13)

One somewhat practical use of this is if you want to compare two sequences, pairwise, using a comparator. Though I wish that every? took multiple collections, this is an adequate substitute:

Friendly

A beginner-friendly REPL that combines

-#!/usr/bin/env bb
-;; requires bb 0.2.2 or higher
-(require '[clojure.java.io :as io])
-(defn delete-recursively [f]
-  (let [dir (io/file f)]
-    (if (.exists dir)
-      (do (java.nio.file.Files/walkFileTree

	.ONESHELL:
	test: .SHELLFLAGS := -i
	test: SHELL := bb

	test:
	(println :wow)
	(require '[clojure.string :as s])
	(s/reverse (slurp "./Makefile"))


	final case class ZIO[-R, +E, +A](run: R => Either[E, A]) {
	final def map[B](f: A => B): ZIO[R, E, B] =
	ZIO(r => run(r).map(f))

	final def flatMap[R1 <: R, E1 >: E, B](f: A => ZIO[R1, E1, B]): ZIO[R1, E1, B] =
	ZIO(r => run(r).flatMap(a => f(a).run(r)))

	final def provide(r: R): ZIO[Any, E, A] =
	ZIO(_ => run(r))

	;; clj -Sdeps '{:deps {metosin/malli {:git/url "https://github.com/metosin/malli"
	;; :sha "68b9940fcf4671a3fcff7bb4844f7f06b2277a34"}}}'

	;
	; ███▄ ▄███▓ ▄▄▄ ██▓ ██▓ ██▓
	; ▓██▒▀█▀ ██▒▒████▄ ▓██▒ ▓██▒ ▓██▒
	; ▓██ ▓██░▒██ ▀█▄ ▒██░ ▒██░ ▒██▒
	; ▒██ ▒██ ░██▄▄▄▄██ ▒██░ ▒██░ ░██░
	; ▒██▒ ░██▒ ▓█ ▓██▒░██████▒░██████▒░██░
	; ░ ▒░ ░ ░ ▒▒ ▓▒█░░ ▒░▓ ░░ ▒░▓ ░░▓

	;;
	;; http://johnj.com/from-elegance-to-speed.html
	;;
	;; The Clojure version
	;; -------------------

	(ns smt
	(:require [net.cgrand.xforms :as x]
	[criterium.core :as c :refer [quick-bench]]))