From aa0da8f503534b1e620284da719af5af6ed4a511 Mon Sep 17 00:00:00 2001 From: Wes Morgan Date: Wed, 21 Sep 2022 13:46:03 -0600 Subject: [PATCH] Map (on)to-chan!(!) core.async fns (#1371) * Map (on)to-chan!(!) core.async fns These are recent replacements for their deprecated predecessors onto-chan & to-chan. * Add note to changelog about #1370 fix --- CHANGELOG.md | 1 + src/babashka/impl/clojure/core/async.clj | 4 ++++ 2 files changed, 5 insertions(+) diff --git a/CHANGELOG.md b/CHANGELOG.md index 4eefbeb9..3a276717 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -7,6 +7,7 @@ A preview of the next release can be installed from ## Unreleased +- [#1370](https://github.com/babashka/babashka/issues/1370): Map to-chan!, to-chan!!, onto-chan!, & onto-chan!! core.async fns into babashka's SCI core.async namespace. - [#1358](https://github.com/babashka/babashka/issues/1358): Expose a subset of java.lang.ref to enable hooking into the destruction/GC of objects ([@retrogradeorbit](https://github.com/retrogradeorbit)) - [#1364](https://github.com/babashka/babashka/issues/1364): Be tolerant of unknown tags in `bb.edn` - Add and expose `babashka.classes/all-classes` to get a list of all available classes (as `java.lang.Class` objects) ([@eerohele](https://github.com/eerohele)) diff --git a/src/babashka/impl/clojure/core/async.clj b/src/babashka/impl/clojure/core/async.clj index 686fb34d..6ae94083 100644 --- a/src/babashka/impl/clojure/core/async.clj +++ b/src/babashka/impl/clojure/core/async.clj @@ -68,6 +68,8 @@ 'mult (copy-var async/mult core-async-namespace) 'offer! (copy-var async/offer! core-async-namespace) 'onto-chan (copy-var async/onto-chan core-async-namespace) + 'onto-chan! (copy-var async/onto-chan! core-async-namespace) + 'onto-chan!! (copy-var async/onto-chan!! core-async-namespace) 'partition (copy-var async/partition core-async-namespace) 'partition-by (copy-var async/partition-by core-async-namespace) 'pipe (copy-var async/pipe core-async-namespace) @@ -92,6 +94,8 @@ 'thread-call (copy-var thread-call core-async-namespace) 'timeout (copy-var async/timeout core-async-namespace) 'to-chan (copy-var async/to-chan core-async-namespace) + 'to-chan! (copy-var async/to-chan! core-async-namespace) + 'to-chan!! (copy-var async/to-chan!! core-async-namespace) 'toggle (copy-var async/toggle core-async-namespace) 'transduce (copy-var async/transduce core-async-namespace) 'unblocking-buffer? (copy-var async/unblocking-buffer? core-async-namespace)