Skip to content

Instantly share code, notes, and snippets.

@aarvid
aarvid / gist:6753155
Created September 29, 2013 14:53 — forked from death/gist:6740474
(defpackage #:subsystem.hack
(:use #:cl)
(:export #:patch-subsystem)
(:import-from #:nibbles
#:read-ub16/le #:read-ub32/le #:write-ub16/le))
(in-package #:subsystem.hack)
(defun subsystem-position (stream)
(file-position stream 0)