projects
/
wolf
/ blob
5b86285c05e7b605d4de4704d7b8698c59b50ba0
[wolf]
/
unspacedforms.lisp
1
(in-package #:nothing)
2
3
(defun small-guy (a b)
4
(+ a b))
5
(defun small-guy-2 (a b)
6
(+ a b))
7
8
(defun hello-world (a b c)
9
(progn
10
(with-open-file (str "increasinglylongfilenamesfailme.dat" :direction :input :if-does-not-exist :create)
11
(when
12
(read-line str)
13
(format t "This file had some things in int, yay!~%")))))