1 files changed, 4 insertions, 0 deletions
diff --git a/util.lisp b/util.lisp
new file mode 100644
index 0000000..ed4c3a0
--- /dev/null
+++ b/util.lisp
@@ -0,0 +1,4 @@
+(%defmacro %defun args
+  (list '%fset
+        (list 'quote (car (cdr (car args))))
+        (cons '%lambda (cdr (cdr (car args))))))