From bd3067230dcbd18fb1f0db7abb52c4ea1c2e227b Mon Sep 17 00:00:00 2001 From: Joel Martin Date: Mon, 27 Oct 2014 22:39:31 -0500 Subject: rust: add metadata support. --- rust/src/reader.rs | 12 ++++++++++++ 1 file changed, 12 insertions(+) (limited to 'rust/src/reader.rs') 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) { -- cgit v1.2.3