From 907bd54d19f6bf14a130a136df6f37cc5d256468 Mon Sep 17 00:00:00 2001 From: Joel Kronqvist Date: Thu, 14 Aug 2025 14:02:27 +0300 Subject: feat: parsing of new types (T, (int ...), (int bool)) etc. also fixed bug in into_type (it didn't handle lists recursively) --- src/sexp/step.rs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'src/sexp/step.rs') diff --git a/src/sexp/step.rs b/src/sexp/step.rs index bae47a5..d35c8af 100644 --- a/src/sexp/step.rs +++ b/src/sexp/step.rs @@ -368,7 +368,6 @@ impl SExp { let (scrutinee, patarms) = scons(op, l).check_case().unwrap(); if !scrutinee.is_value() { return Ok(SExp::back_to_case(scrutinee.step()?, patarms)); - // return scons(Case, scons(scrutinee.step()?)) } let scrutinee = match scrutinee { @@ -646,7 +645,7 @@ impl SExp { }, // Nil in list - SCons(op, l) if *op == Atom(Nil) => { + SCons(op, _) if *op == Atom(Nil) => { Ok(scons(Vector, Nil)) }, -- cgit v1.2.3