From 997d5cf2c6d657ebfca92fcba0f4d306b45eb307 Mon Sep 17 00:00:00 2001 From: Calvin Rose Date: Sat, 8 Dec 2018 17:56:31 -0500 Subject: [PATCH] Strip whitespace --- src/core/core.janet | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/core/core.janet b/src/core/core.janet index 2116c087..b2b3a1a0 100644 --- a/src/core/core.janet +++ b/src/core/core.janet @@ -956,7 +956,7 @@ value, one key will be ignored." (match-1 pattern.0 expr (fn [] ~(if (and ,;(tuple/slice pattern 1)) ,(onmatch) ,sentinel)) seen) - (array? pattern) + (array? pattern) (do (def len (length pattern)) (var i -1) @@ -975,7 +975,7 @@ value, one key will be ignored." (var key nil) (with-idemp $dict expr - ~(if (dictionary? ,$dict) + ~(if (dictionary? ,$dict) ,((fn aux [] (:= key (next pattern key)) (if (= key nil)