about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2024-04-03 22:47:00 -0500
committerCase Duckworth2024-04-03 22:47:00 -0500
commit0d106d409b8e7bfc3c6d9ea6bda18a1858ec5297 (patch)
treee5873df2e03fff40777c5288c4e5cbb226b6746b
parentChange pp -> dump (diff)
downloadlam-0d106d409b8e7bfc3c6d9ea6bda18a1858ec5297.tar.gz
lam-0d106d409b8e7bfc3c6d9ea6bda18a1858ec5297.zip
Add logos
-rw-r--r--Makefile2
-rw-r--r--README.md2
-rw-r--r--repl.lua8
3 files changed, 11 insertions, 1 deletions
diff --git a/Makefile b/Makefile index 42349fb..617a695 100644 --- a/Makefile +++ b/Makefile
@@ -13,7 +13,7 @@ luarepl:
13 13
14.PHONY: repl 14.PHONY: repl
15repl: 15repl:
16 $(LUA) -e 'require("repl").repl("lam> ")' 16 $(LUA) -e 'require("repl").repl("> ")'
17 17
18.PHONY: test 18.PHONY: test
19test: 19test:
diff --git a/README.md b/README.md index 1dcd392..152b0c7 100644 --- a/README.md +++ b/README.md
@@ -1,5 +1,7 @@
1# lam -- Lisp Acdw Made 1# lam -- Lisp Acdw Made
2 2
3![lam logo by m455](/lam/tree/logo.png)
4
3hi, i'm acdw. 5hi, i'm acdw.
4this is my lisp. 6this is my lisp.
5 7
diff --git a/repl.lua b/repl.lua index a3fdf95..016df17 100644 --- a/repl.lua +++ b/repl.lua
@@ -16,6 +16,14 @@ local function schemeprint (x)
16 end 16 end
17end 17end
18 18
19local lam = [[
20 @,,,@
21<|^ ^|> l a m
22 | /) 0015
23 |I /))) acdw
24 -------------
25]]
26
19function m.repl (prompt, infile, out) 27function m.repl (prompt, infile, out)
20 -- PROMPT should be a string, INFILE is a filename, and OUT is either a 28 -- PROMPT should be a string, INFILE is a filename, and OUT is either a
21 -- filename, nil (in which case it will be stdout), or false (which 29 -- filename, nil (in which case it will be stdout), or false (which