Reading a file in Common Lisp

2024-06-02 19:00:21 +02:00 · 2024-06-02 19:00:21 +02:00 · b2dc08f0f4
parent d6ee3239c8
commit b2dc08f0f4
1 changed files with 7 additions and 0 deletions
--- a/2015/days/01/lisp.lisp
+++ b/2015/days/01/lisp.lisp
@ -0,0 +1,7 @@
+;; Day 1: Not Quite Lisp
+
+(with-open-file (in "./data/input")
+  (do ((char (read-char in nil)
+             (read-char in nil)))
+      ((null char))
+    (print char)))