9999years

//! Kat Spiers has yet again bullied me into writing code.
//! Today we worked on type-level arithmetic.

use std::ops::{Add, Sub, Mul};

#[derive(Debug, Clone, PartialEq)]
enum Kat {
    Kat(Box<Kat>),
    Hryn,
}

9999years

#lang r5rs
(#%require schemeunit)

(define ** expt)
(define (!= x y) (not (= x y)))
(define (^^ a b) (or (and a (not b))
                      (and b (not a))))
; can you believe they made && and || special forms???
(define (&& a b) (and a b))
(define (|| a b) (or a b))

9999years

#lang r5rs

(define-syntax push!
  (syntax-rules (push!)
    ((push! x s)
     (set! s (cons x s)))))

(define-syntax pop!
  (syntax-rules (pop!)
    ((pop! s)

9999years

I want a static site generator that

• Lets me write in Markdown, but with some syntax for injecting HTML I can't express in plain Markdown, like Hugo's shortcodes
• Has a good pipeline for writing CSS in SASS, Javascript in Typescript, and ideally minifying / importing those assets into the page in different ways (i.e. inline OR linking) with low friction
• Has a good templating language that I can configure on a per-page basis, customize (to add new functions / constructs), and import data to from YAML

9999years

#! /usr/bin/env python3

# Short program to read macOS plist files and output JSON; useful for manipulating / viewing the JSON with a tool like jq.

import fileinput
import json

import plistlib

def plist_to_json(plist):

9999years

// this compiles
fn validator<F, T>(f: F) -> Box<Fn(String) -> Result<(), String> + 'static>
    where F: Fn(String) -> Result<T,  String> + 'static {
    Box::new(move |s| f(s).map(|_| ()))
}

// this fails with:
// error[E0308]: mismatched types
//   --> src\main.rs:17:14
//    |

9999years

Begin { pushd; cd 'ruby/command-t/ext/command-t' }
Process {
	/tools/ruby26/bin/ruby ./extconf.rb
	/tools/msys64/usr/bin/make
}
End { popd }

9999years

#lang r5rs
(#%require schemeunit)

(define (any pred lst)
  (if (null? lst)
      #f
      (or (pred (car lst)) (any pred (cdr lst)))))

(define (list-contains? el lst)
  (any (lambda (el*) (equal? el el*)) lst))

9999years

import sys

# `pip install Markdown`
from markdown import markdown

FLOWER = '🌸'
START_PINK = '<span style="color: pink">'
END_PINK   = '</span>'

def girlmarkdown(text):

9999years

import sys

def esc(txt):
    left = txt
    right = txt
    chrs = r'\~^'
    for chr in chrs:
        right = right.replace(chr, '\\char"' + format(ord(chr), 'X'))
    left = left.replace('\\', '\\\\')
    chrs = r'$&%#{}_'