fix: dynamic counting for modulo arg counts

src/evaluator/env.rs

@@ -107,9 +107,7 @@ pub fn core_environment() -> Rc<Environment> {
         (
             "hashmap",
             Expression::NativeFunc(|args| {
-                if args.len() % 2 != 0 {
+                arg_count!(modulo: 2, args.len());
-                    Err(Error::MismatchedArgCount(2, args.len()))?
-                }
 
                 let mut index = -1;
                 let (keys, values): (Vec<_>, Vec<_>) = args.into_iter().partition(|_| {

src/evaluator/macros.rs

@@ -5,6 +5,13 @@ macro_rules! arg_count {
             Err(Error::MismatchedArgCount($expected, $given))?
         }
     };
+
+    (modulo: $modulo:expr, $given:expr) => {
+        Err(Error::MismatchedArgCount(
+            ($given / $modulo) * $modulo + $modulo,
+            $given,
+        ))?
+    };
 }
 
 pub(crate) use arg_count;