kinda working?

2026-08-02 07:41:09 +00:00
parent 0b7b2baa3e
commit 4ebe212090
6 changed files with 109 additions and 22 deletions
--- a/create.scm
+++ b/create.scm
@@ -0,0 +1,12 @@
+(display "Name?")
+(let ([name (get-line (current-input-port))])
+  (display "Question?")
+  (let ([question (get-line (current-input-port))])
+    (display "Answer?")
+    (let ([answer (get-line (current-input-port))])
+      (display answer)
+      ;append to file
+      ;
+    )
+  )
+)