X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=wolf;a=blobdiff_plain;f=resources%2Fgood.lisp;h=adb5e3797718e50a07ec79a6c1d168429c14583f;hp=3328e2e18f8c220b2b7be045062f07d3904c44c3;hb=52971da;hpb=3225bfce49dc471d98e50bd7e1ba268f5adce257 diff --git a/resources/good.lisp b/resources/good.lisp index 3328e2e..adb5e37 100644 --- a/resources/good.lisp +++ b/resources/good.lisp @@ -1,8 +1,14 @@ (in-package #:nothing) +(defun small-guy (a b) (+ a b)) +(defun small-guy-2 (a b) (+ a b)) + (defun hello-world (a b c) (progn - (with-open-file (str "increasinglylongfilenamesfailme.dat" :direction :input :if-does-not-exist :create) - (when - (read-line str) - (format t "This file had some things in int, yay!~%"))))) + (let + ((x y) + (z 9)) + (with-open-file (str "increasinglylongfilenamesfailme.dat" :direction :input :if-does-not-exist :create) + (when + (read-line str) + (format t "This file had some things in int, yay!~%")))))