arrdem

#!/usr/bin/env -S pex proquint --
"""Compute random proquints as hostnames, throw 'em in zones."""

import sys
from random import randint

from proquint import uint2quint_str

# eight bits of provider addressing
ZONES = {"sfo2", "wbu1"}

arrdem

(ns spec.extras.valid
  (:require [clojure.spec.alpha :as s]))

(defn valid!
  "`#'s/valid?` but throws an `ex-info` with `#'s/explain-data` of the
  failure when `val` doesn't conform to `spec`.
  Intended for always-on postconditions because `#'s/assert` is off by
  default."
  [spec val]
  (if (s/valid? spec val)

arrdem

# Maintainer: Reid 'arrdem' McKenzie <[email protected]>
pkgname=clojure-tools
pkgver=1.9.0.397
pkgrel=2
pkgdesc="clojure-tools (clj, clojure)"
arch=('i686' 'x86_64')
url="https://clojure.org/guides/getting_started"
license=('EPL')
depends=('java-runtime-headless>=8')
source=("$pkgname-$pkgver.tar.gz")

arrdem

(ns doc-test
  (:require [clojure.test :as t]
            [clojure.java.shell :refer [sh]]
            [clojure.string :as str]
            [clojure.java.io :as io])
  (:import [java.io StringReader]))

(def aspell-pattern
  #"& (?<word>\w+) (?<offset>\d+) (?<count>\d+): (?<alternatives>.*?)$")

arrdem

struct MyVec<T>(T);

impl fmt::Display for MyVec<&Vec<i32>> {
    fn fmt(&self, f: &mut fmt::Formatter) -> fmt::Result {
        write!(f, "[");

        for (i, el) in *(self.0).iter().enumerate() {
            if i != 0 {
                write!(f, ", ");
            }

arrdem

;; 20-markdown.el

(require 'markdown-mode)

;; One space per line implementation

(defun arrdem:markdown-nobreak-p ()
  "Return nil if it is acceptable to break the current line at the point.
   Supports Markdown links, liquid tags."
  ;; inside in square brackets (e.g., link anchor text)

arrdem

# -*- mode: bash; indent-tabs-mode: nil; sh-basic-offset: 2; fill-column: 100; -*-

# About
# ==============================
# A bootleg dotfiles installer.
#
# Usage
# ==============================
#
# $FORCE - if non-empty then install.sh will happily clobber existing files/dirs

arrdem

#!/bin/bash

function install_package() {
    if [ -e "$1/build.sh" ]; then
        ( cd "$1";
          bash "build.sh")
    fi
    stow --ignore="build.sh" --ignore="README.md" -t ~ "$f"
}

arrdem

War Room Army

Cygnar - Sloan and six hunters

Theme: No Theme Selected
73 / 75 Army


Captain Kara Sloan - WJ: +28
-    Reinholdt, Gobber Speculator - PC: 4

arrdem

;; I write
(ns foo)

(defn adds-one [x]
  (+ x 1))

(def another-adds-one
  (partial + 1))

;; SYMBOL TABLE (name -> UUID)