code.consxy.com Git - wolf/blob - resources/hangingcloseparens2.lisp

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