From 6e8bd66c909049e39bcf27ff7330f401df453748 Mon Sep 17 00:00:00 2001
From: nukashimika <raygingjake@gmail.com>
Date: Thu, 11 Aug 2022 22:03:41 -0600
Subject: [PATCH] 0.1 Initit stub made

---
 .gitignore     |  2 ++
 src/index.lisp | 23 +++++++++++++++++++++++
 2 files changed, 25 insertions(+)
 create mode 100644 .gitignore
 create mode 100644 src/index.lisp

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..7a1b5cd
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,2 @@
+src/*.html
+src/*.css
diff --git a/src/index.lisp b/src/index.lisp
new file mode 100644
index 0000000..7eba477
--- /dev/null
+++ b/src/index.lisp
@@ -0,0 +1,23 @@
+(ql:quickload "spinneret")
+(ql:quickload "lass")
+
+
+
+(defun generate-html ()
+  (spinneret:with-html-string
+    (:html
+     (:head
+      (:link :rel "style.css")
+     (:body
+      (:div :class "body"
+	    (:h1 "welcome")
+	    (:p "hello, im cath and i exist")))))))
+
+    
+
+(defun write-html-to-file ()
+  (with-open-file (output "index.html"
+			  :direction :output
+			  :if-exists :overwrite
+			  :if-does-not-exist :create)
+    (format output (generate-html))))