Skip to content

Instantly share code, notes, and snippets.

@death
death / dataset.lisp
Last active November 12, 2023 02:27
Lisp similarity
(defvar *langs*
'((common-lisp cons parens defmacro eval special quote)
(emacs-lisp cons parens defmacro eval special quote)
(clojure -cons parens defmacro eval special quote)
(janet -cons parens defmacro eval special quote)
(scheme cons parens hygienic eval -special quote)
(dylan cons -parens hygienic -eval -special -quote)
(maclisp cons parens defmacro eval special quote)
(interlisp cons parens defmacro eval special quote)
(autolisp cons parens -macro eval special quote)
@death
death / late-hours-localization.lisp
Last active September 22, 2022 00:50
late hours localization
(defpackage #:localization
(:use #:cl #:constantia))
(in-package #:localization)
(defvar *english-translations*
(make-hash-table))
(setf (gethash 'the-sum-of-x-and-y-is-z *english-translations*)
'("The sum of " x " and " y " is " z))
@death
death / circle-tweaker.lisp
Last active June 8, 2022 20:53
circle tweaker
;; For https://old.reddit.com/r/lisp/comments/v7xdky/simple_mechanism_for_clos_slot_dependencies/
(defpackage #:circle-tweaker
(:use #:clim-lisp #:clim #:cells)
(:export #:run))
(in-package #:circle-tweaker)
(defmodel circle-shape ()
((diameter
@death
death / langsim.lisp
Created January 24, 2022 23:38
language similarity
(in-package :clim-user)
(defvar *langs*
'((common-lisp cons parens defmacro eval special quote)
(emacs-lisp cons parens defmacro eval special quote)
(clojure -cons parens defmacro eval special quote)
(janet -cons parens defmacro eval special quote)
(scheme cons parens hygienic eval -special quote)
(dylan cons -parens hygienic -eval -special -quote)
(maclisp cons parens defmacro eval special quote)
@death
death / aoc2021-day19.lisp
Last active December 19, 2021 16:40
aoc2021 day19
;;;; +----------------------------------------------------------------+
;;;; | Advent of Code 2021 |
;;;; +----------------------------------------------------------------+
(defpackage #:snippets/aoc2021/day19
(:use #:cl)
(:export
#:day19))
(in-package #:snippets/aoc2021/day19)
@death
death / aoc2021-day18.lisp
Created December 18, 2021 13:23
aoc2021 day18
;;;; +----------------------------------------------------------------+
;;;; | Advent of Code 2021 |
;;;; +----------------------------------------------------------------+
(defpackage #:snippets/aoc2021/day18
(:use #:cl)
(:import-from
#:alexandria)
(:export
#:day18))
@death
death / aoc2021-day17.lisp
Last active December 17, 2021 06:16
aoc2021 day17
;;;; +----------------------------------------------------------------+
;;;; | Advent of Code 2021 |
;;;; +----------------------------------------------------------------+
(defpackage #:snippets/aoc2021/day17
(:use #:cl)
(:export
#:day17))
(in-package #:snippets/aoc2021/day17)
@death
death / aoc2021-day16.lisp
Last active December 16, 2021 07:19
aoc2021 day16
;;;; +----------------------------------------------------------------+
;;;; | Advent of Code 2021 |
;;;; +----------------------------------------------------------------+
(defpackage #:snippets/aoc2021/day16
(:use #:cl)
(:export
#:day16))
(in-package #:snippets/aoc2021/day16)
@death
death / aoc2021-day15.lisp
Created December 15, 2021 05:43
aoc2021 day15
;;;; +----------------------------------------------------------------+
;;;; | Advent of Code 2021 |
;;;; +----------------------------------------------------------------+
(defpackage #:snippets/aoc2021/day15
(:use #:cl)
(:import-from
#:snippets/slhelpers)
(:export
#:day15))
@death
death / aoc2021-day14.lisp
Created December 14, 2021 06:24
aoc2021 day14
;;;; +----------------------------------------------------------------+
;;;; | Advent of Code 2021 |
;;;; +----------------------------------------------------------------+
(defpackage #:snippets/aoc2021/day14
(:use #:cl)
(:export
#:day14))
(in-package #:snippets/aoc2021/day14)