antler5

(define-module (antlers utils with-refs)
               #:use-module (ice-9 match)
               #:use-module (srfi srfi-1)
               #:use-module (srfi srfi-9)
               #:export (with-refs))

;;; Commentary:
;;
;; The first draft looked like this, which, to be honest, I kind of like for it's simplicity.
;; Ditched it because of the repetitive match-lambda-lists and hash-set/-ref

antler5

openpgp4fpr:f431e01ac195cb144484e7dc79abd1551412b973

antler5

/* -*- mode: c -*- */

/*
 * Copyright (c) 2020 The ZMK Contributors
 * Copyright (c) 2020 antlers <[email protected]>
 *
 * SPDX-License-Identifier: MIT
 * 
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the “Software”), to deal

antler5

Keybase proof

I hereby claim:

• I am antler5 on github.
• I am antlers (https://keybase.io/antlers) on keybase.
• I have a public key whose fingerprint is F431 E01A C195 CB14 4484 E7DC 79AB D155 1412 B973

To claim this, I am signing this object:

antler5

;;; early-init.el -*- lexical-binding: t; -*-
;; Substantial credit to mnewt's dotemacs repo

;; Never load outdated bytecode
(setq load-prefer-newer t)


;; Garbage Collection Pt. 1
(setq gc-cons-threshold most-positive-fixnum)

antler5

;;; Copyright © 2023 antlers <[email protected]>
;;;
;;; This program is free software: you can redistribute it and/or modify
;;; it under the terms of the GNU General Public License as published by
;;; the Free Software Foundation, either version 3 of the License, or
;;; (at your option) any later version.
;;;
;;; This program is distributed in the hope that it will be useful,
;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

antler5

#!/usr/bin/env -S guile -L . -e '(@ (git-explode) main)'

git-explode

Commits unstaged changes from the current worktree into the repo one hunk at a
time. I made this in order to automatically bisect linux kernel configurations,
and it may be most useful with similer deltas, ie. those consisting of several
dozen or hundred single-line changes which allow _each_ individual hunk of a
diff to produce a potentially valid state.

antler5

;; SPDX-FileCopyrightText: 2024 antlers <[email protected]>
;;
;; SPDX-License-Identifier: GPL-3.0-or-later
;;
;; As with my other keyboard Gists, here's a snapshot of my Taipo config as
;; I transition from copying upstream to tweaking for myself (ie. it's as
;; close to upstream as it'll ever be).
;;
;; The Scheme code used to generate these bindings can be found in my
;; kanata-config repo at commit 'cdad9bcb3' (once published).

antler5

$ guix shell guile-next guile-hoot guile-goblins --pure 
hint: Consider passing the `--check' option once to make sure your shell does not clobber environment variables.

substitute: updating substitutes from 'https://ci.guix.gnu.org'... 100.0%
1.1 MB will be downloaded
 guile-goblins-0.15.0  1.1MiB                                                                                                                                     664KiB/s 00:02 ▕██████████████████▏ 100.0%
The following derivation will be built:
  /gnu/store/r0kdcs4l20cbnv3z0qy1ba95hr95yqwc-profile.drv

building CA certificate bundle...

antler5