v0.1.22

squint-cljs · Sep 12, 2023 · 13dd4a8 · 13dd4a8
1 parent f2c7617
commit 13dd4a8
Show file tree

Hide file tree

Showing 5 changed files with 20 additions and 3 deletions.
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -2,8 +2,9 @@
 
 [Squint](https://github.com/squint-cljs/squint): ClojureScript syntax to JavaScript compiler
 
-## Unreleased
+## 0.1.22
 
+- Fix [#325](https://github.com/squint-cljs/squint/issues/325): fix varargs destructuring
 - Fix [#326](https://github.com/squint-cljs/squint/issues/326): bun compatibility
 
 ## 0.1.21

diff --git a/package.json b/package.json
@@ -2,7 +2,7 @@
   "name": "squint-cljs",
   "type": "module",
   "sideEffects": false,
-  "version": "0.1.21",
+  "version": "0.1.22",
   "files": [
     "core.js",
     "src/squint/core.js",

diff --git a/resources/squint/core.edn b/resources/squint/core.edn
@@ -83,6 +83,7 @@
   merge
   min
   neg_QMARK_
+  next
   nil_QMARK_
   not
   not_any_QMARK_

diff --git a/src/squint/core.js b/src/squint/core.js
@@ -1322,3 +1322,15 @@ export function juxt(...fs) {
     return ret;
   };
 }
+
+export function next(x) {
+  if (x instanceof Array) {
+    let ret = x.slice(1);
+    if (ret.length > 0) {
+      return ret;
+    } else {
+      return null;
+    }
+  }
+  throw new Error('next not implement for non-arrays yet');
+}
diff --git a/test/squint/compiler_test.cljs b/test/squint/compiler_test.cljs
@@ -77,7 +77,10 @@
 (deftest destructure-test
   (let [s (jss! "(let [^js {:keys [a b c]} #js {:a 1 :b 2 :c 3}]
                    (+ a b c))")]
-    (is (= 6 (js/eval s)))))
+    (is (= 6 (js/eval s))))
+  (is (eq #js [1 #js [2 3]]
+          (jsv! "(let [[x & xs] [1 2 3]]
+                   [x xs])"))))
 
 (deftest fn-test
   (let [s (jss! '(let [f (fn [x] x)]
-Original file line number
+Diff line change
@@ Expand Up / @@ -83,6 +83,7 @@ @@
       merge
       min
       neg_QMARK_
+      next
       nil_QMARK_
       not
       not_any_QMARK_
@@ Expand Down @@