aboutsummaryrefslogtreecommitdiff
path: root/rust/src/reader.rs
diff options
context:
space:
mode:
Diffstat (limited to 'rust/src/reader.rs')
-rw-r--r--rust/src/reader.rs12
1 files changed, 12 insertions, 0 deletions
diff --git a/rust/src/reader.rs b/rust/src/reader.rs
index e3ec55e..af496ff 100644
--- a/rust/src/reader.rs
+++ b/rust/src/reader.rs
@@ -166,6 +166,18 @@ fn read_form(rdr : &mut Reader) -> MalRet {
Err(e) => Err(e),
}
},
+ "^" => {
+ let _ = rdr.next();
+ match read_form(rdr) {
+ Ok(meta) => {
+ match read_form(rdr) {
+ Ok(f) => Ok(list(vec![symbol("with-meta"), f, meta])),
+ Err(e) => Err(e),
+ }
+ },
+ Err(e) => Err(e),
+ }
+ },
"@" => {
let _ = rdr.next();
match read_form(rdr) {