diff options
author | Akshay <[email protected]> | 2021-04-02 08:06:21 +0100 |
---|---|---|
committer | Akshay <[email protected]> | 2021-04-02 08:06:21 +0100 |
commit | 11eb57ceb22636fafbb1f1c1a49dda3956e6f7e4 (patch) | |
tree | af4694c8dbb9d69f5c20d4b05d76964cc9062289 /src/lisp/prelude.rs | |
parent | 540378b050c481b9c3a41bd8f18a400ca7d3f61f (diff) |
fmt
Diffstat (limited to 'src/lisp/prelude.rs')
-rw-r--r-- | src/lisp/prelude.rs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/lisp/prelude.rs b/src/lisp/prelude.rs index add405c..336dbaf 100644 --- a/src/lisp/prelude.rs +++ b/src/lisp/prelude.rs | |||
@@ -153,7 +153,9 @@ pub fn new_env() -> Result<Environment, LispError> { | |||
153 | (LispExpr::Unit, LispExpr::Unit) => Ok(true), | 153 | (LispExpr::Unit, LispExpr::Unit) => Ok(true), |
154 | (LispExpr::Number(s), LispExpr::Number(o)) => Ok(s == o), | 154 | (LispExpr::Number(s), LispExpr::Number(o)) => Ok(s == o), |
155 | (LispExpr::List(s), LispExpr::List(o)) => Ok(s.iter().zip(o).all(|(a, b)| a == b)), | 155 | (LispExpr::List(s), LispExpr::List(o)) => Ok(s.iter().zip(o).all(|(a, b)| a == b)), |
156 | (LispExpr::DottedList(s), LispExpr::DottedList(o)) => Ok(s.iter().zip(o).all(|(a, b)| a == b)), | 156 | (LispExpr::DottedList(s), LispExpr::DottedList(o)) => { |
157 | Ok(s.iter().zip(o).all(|(a, b)| a == b)) | ||
158 | } | ||
157 | (LispExpr::List(s), LispExpr::Unit) => Ok(s.len() == 0), | 159 | (LispExpr::List(s), LispExpr::Unit) => Ok(s.len() == 0), |
158 | (LispExpr::Unit, LispExpr::List(s)) => Ok(s.len() == 0), | 160 | (LispExpr::Unit, LispExpr::List(s)) => Ok(s.len() == 0), |
159 | (LispExpr::DottedList(_), LispExpr::Unit) => Ok(false), | 161 | (LispExpr::DottedList(_), LispExpr::Unit) => Ok(false), |
@@ -319,7 +321,7 @@ pub fn new_env() -> Result<Environment, LispError> { | |||
319 | ls.remove(0); | 321 | ls.remove(0); |
320 | return Ok(LispExpr::List(ls)); | 322 | return Ok(LispExpr::List(ls)); |
321 | } | 323 | } |
322 | } else if type_match!(args, 0 => LispExpr::DottedList(_)){ | 324 | } else if type_match!(args, 0 => LispExpr::DottedList(_)) { |
323 | // cdr of an improper list is an improper list or an atom | 325 | // cdr of an improper list is an improper list or an atom |
324 | let ls = args[0].unwrap_dotted_list(); | 326 | let ls = args[0].unwrap_dotted_list(); |
325 | if ls.len() == 2 { | 327 | if ls.len() == 2 { |