etc404/lisp-interpreter
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Quote macro expansion

Browse Source
This commit is contained in:
etc404
2026-04-26 20:57:29 -06:00
parent 00d1ff11d7
commit 405f5f545a
1 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
reader.py
+5 -4
View File
@@ -1,11 +1,8 @@
import re import re
from typing import Any
import lisp import lisp
import atom
class Reader: class Reader:
tokens: list[str|Any] tokens: list[str]
def __init__(self): def __init__(self):
self.tokens = [] self.tokens = []
@@ -43,6 +40,10 @@ class Reader:
token = self.peek() token = self.peek()
self.consume() self.consume()
return atomlist return atomlist
elif self.peek() == "'":
# Expand the quote macro!
self.consume()
return ["quote", self.read_expression()]
else: else:
return self.read_atom() return self.read_atom()