This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(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) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(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)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; 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 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(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) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;;; +----------------------------------------------------------------+ | |
;;;; | Advent of Code 2021 | | |
;;;; +----------------------------------------------------------------+ | |
(defpackage #:snippets/aoc2021/day19 | |
(:use #:cl) | |
(:export | |
#:day19)) | |
(in-package #:snippets/aoc2021/day19) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;;; +----------------------------------------------------------------+ | |
;;;; | Advent of Code 2021 | | |
;;;; +----------------------------------------------------------------+ | |
(defpackage #:snippets/aoc2021/day18 | |
(:use #:cl) | |
(:import-from | |
#:alexandria) | |
(:export | |
#:day18)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;;; +----------------------------------------------------------------+ | |
;;;; | Advent of Code 2021 | | |
;;;; +----------------------------------------------------------------+ | |
(defpackage #:snippets/aoc2021/day17 | |
(:use #:cl) | |
(:export | |
#:day17)) | |
(in-package #:snippets/aoc2021/day17) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;;; +----------------------------------------------------------------+ | |
;;;; | Advent of Code 2021 | | |
;;;; +----------------------------------------------------------------+ | |
(defpackage #:snippets/aoc2021/day16 | |
(:use #:cl) | |
(:export | |
#:day16)) | |
(in-package #:snippets/aoc2021/day16) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;;; +----------------------------------------------------------------+ | |
;;;; | Advent of Code 2021 | | |
;;;; +----------------------------------------------------------------+ | |
(defpackage #:snippets/aoc2021/day15 | |
(:use #:cl) | |
(:import-from | |
#:snippets/slhelpers) | |
(:export | |
#:day15)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;;; +----------------------------------------------------------------+ | |
;;;; | Advent of Code 2021 | | |
;;;; +----------------------------------------------------------------+ | |
(defpackage #:snippets/aoc2021/day14 | |
(:use #:cl) | |
(:export | |
#:day14)) | |
(in-package #:snippets/aoc2021/day14) |
NewerOlder