dduan

#!/bin/bash

temp_file=$(mktemp)

echo 'FROM swift@sha256:c4d53af406c5dc48bd43c0d313f3ed80924eee4bf78907ce4ad6eb8f5513f376'                                       >> temp_file
echo 'RUN git clone https://github.com/dduan/DrString.git; cd DrString; make build; cp .build/release/drstring /bin/drstring'   >> temp_file
echo 'RUN rm -rf /data'                                                                                                         >> temp_file
echo 'ADD . /data'                                                                                                              >> temp_file
echo 'WORKDIR /data'                                                                                                            >> temp_file
echo 'ENTRYPOINT ["drstring"]'                                                                                                  >> temp_file

dduan

import Combine

@available(OSX 10.15, iOS 13.0, tvOS 13.0, watchOS 6.0, *)
extension Publisher {
    func removeDuplicates<Property>(by keyPath: KeyPath<Output, Property>)
        -> Publishers.RemoveDuplicates<Self> where Property: Equatable
    {
        return self.removeDuplicates {
            $0[keyPath: keyPath] == $1[keyPath: keyPath]
        }

dduan

/// Usage: myString.firstIndex(of: otherString)
extension BidirectionalCollection where Element: Equatable {
    func firstIndex(of other: Self) -> Index? {
        guard
            let start = other.first.flatMap(self.firstIndex(of:)),
            self[start...].count >= other.count,
            case let end = self.index(start, offsetBy: other.count),
            zip(self[start ..< end], other).allSatisfy(==)
        else
        {

dduan

import Dispatch

class Runner {
    var observers = [String: () -> Void]()
    let queue = DispatchQueue(label: "foo-queue")

    func run() {
        let observers = self.observers
        for _ in 0..<20000 {
            let c: () -> Void = { [weak self] in

dduan

#!/usr/bin/env python
"""
Generate commit for each staged file, such that each commit is a `--fixup` to
the commit said file was last changed.

NOTE: this command will unstage all files. It also does not disninguish staged
      and unstaged potion of the same file.

USAGE: stage files you want to commit, run this command. Interactive rebase with
       autosquash: `git rebase -i --autosquash BASE`

dduan

indirect enum SExpression {
    struct Token {
        var index: Int
        var content: String
    }

    enum Atom {
        case string(Token)
        case symbol(Token)
    }

dduan

enum State {
    enum String {
        case normal
        case escape
        case unicode(Int)
    }
}

final class Context {
    let contents: [UnicodeScalar]

dduan

#!/usr/bin/env bash

# Run any command and suppress its output to stdin and stderr, unless it returns an error code.

OUTPUT=$(${@:1} 2>&1)
if [ $? -eq 0 ]; then
    exit
fi

OLDLFS=$LFS

dduan

compile:
	wat2wasm main.wat -o main.wasm

serve:
	python -m SimpleHTTPServer

dduan

struct Decl {
    struct Option {
        enum Segment {
            case one(String, [String])
            indirect case map(Segment, Segment)
        }
        typealias Field = (name: String?, type: Segment)
        let name: String
        let fields: [Field]
    }