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
;; 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) |
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
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, ", "); | |
} |
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
(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>.*?)$") |
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
# Maintainer: Reid 'arrdem' McKenzie <me@arrdem.com> | |
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") |
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
(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) |
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
#!/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"} |
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
#!/usr/bin/env python3 | |
"""Evil monitoring. | |
Ping hosts, syslogging at INFO if they're up and happy, otherwise using Telnet scripting to force | |
reset them and syslogging at CRIT with what the uptime was prior to forced reboot. | |
Hosts are debounced, so that they have a chance to return before monitoring resumes. | |
No effort is made to detect network conditions or poweroffs. |
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
package me.arrdem.ox; | |
import io.lacuna.bifurcan.IList; | |
import io.lacuna.bifurcan.Lists; | |
import kotlin.jvm.functions.Function0; | |
import org.jetbrains.annotations.NotNull; | |
import java.math.BigInteger; | |
public final class Nat implements Comparable<Nat> { |
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
--- | |
filters: | |
- name: Assigned, Reported, Commented and not resolved | |
jql: | | |
(assignee = currentUser() OR reporter = currentUser() OR comment ~ currentUser()) AND status != Resolved ORDER BY updated DESC | |
- name: My open issues | |
jql: | | |
assignee = currentUser() AND resolution = Unresolved order by updated DESC |
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
--- | |
openapi: 3.0.0 | |
info: | |
title: A simple message queue over HTTP | |
tags: | |
- name: message | |
description: | | |
Operations pertaining to messages. |