mirror of
https://github.com/penpot/penpot.git
synced 2025-07-27 11:07:19 +02:00
36 lines
807 B
Clojure
36 lines
807 B
Clojure
;; This Source Code Form is subject to the terms of the Mozilla Public
|
|
;; License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
;;
|
|
;; Copyright (c) KALEIDOS INC
|
|
|
|
(ns app.util.array
|
|
"A collection of helpers for work with javascript arrays."
|
|
(:refer-clojure :exclude [conj! conj]))
|
|
|
|
(defn conj
|
|
"A conj like function for js arrays."
|
|
[a v]
|
|
(js* "[...~{}, ~{}]" a v))
|
|
|
|
(defn conj!
|
|
"A conj! like function for js arrays."
|
|
([a v]
|
|
(.push ^js a v)
|
|
a)
|
|
([a v1 v2]
|
|
(.push ^js a v1 v2)
|
|
a)
|
|
([a v1 v2 v3]
|
|
(.push ^js a v1 v2 v3)
|
|
a)
|
|
([a v1 v2 v3 v4]
|
|
(.push ^js a v1 v2 v3 v4)
|
|
a)
|
|
([a v1 v2 v3 v4 v5]
|
|
(.push ^js a v1 v2 v3 v4 v5)
|
|
a)
|
|
([a v1 v2 v3 v4 v5 v6]
|
|
(.push ^js a v1 v2 v3 v4 v5 v6)
|
|
a))
|
|
|