async 2.2.0 → 2.3.0

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: e757a8f806a7c54fc04c17385029c6f6804ca6db4d78ae9a090933b37ce7ba3c
-  data.tar.gz: 7baa64c5e0ce26f31a9ca6e487a139781879e98c4feaf55353484eed906e9e02
+  metadata.gz: d60db4d677d9cb4ed92f654f19ca17a4dab336002ba44290a80545b1f25e9154
+  data.tar.gz: 9e84c874ef477cd0de6a86022c87a3fe92ae9276ddd3c4f4ccfd9d6600be0672
 SHA512:
-  metadata.gz: 5d063676cf2926c9bb56daec3bef63b47f87f44ba49420d1206efc57a5432beeb21f6aead24c6508f105a55e485f38e6c9f161e3757633a2848840b1804c20f1
-  data.tar.gz: f90fb391a58f0ad5de8dfcac70fe3c24b4a4dc3172157b4ff8467455fda81dd0321f82a34a4dda6bb630a18ae945b70cf33416a19497c8b377d5de428b8c9459
+  metadata.gz: 7dd4367c1abb5cc79bf635a34b5819522e7f8363c385f69c995fe23d6fd4d7f6fc6a07784c789afbad0ff1ff6726d6d11899dd9b0a87ae582e9f78711c0ab346
+  data.tar.gz: 0cbef57bb4896a06b11a95f318ad8a0d87435b70f591abc73bb8c7bf76773a341aba47399ef59a813f3d87f32f57112d070081db8598d4d58967f13ac26b4c61

data/lib/async/barrier.md

@@ -31,6 +31,6 @@ end
 ### Output
 
 ~~~
-0.0s     info: Sorted [ec=0x104] [pid=50291]
-						 | [0, 0, 0, 0, 1, 2, 2, 3, 6, 6]
+0.0s     info: Sorted
+             | [0, 0, 0, 0, 1, 2, 2, 3, 6, 6]
 ~~~

data/lib/async/barrier.rb

@@ -3,35 +3,47 @@
 # Released under the MIT License.
 # Copyright, 2019-2022, by Samuel Williams.
 
+require_relative 'list'
 require_relative 'task'
 
 module Async
-	# A synchronization primitive, which allows one task to wait for a number of other tasks to complete. It can be used in conjunction with {Semaphore}.
+	# A general purpose synchronisation primitive, which allows one task to wait for a number of other tasks to complete. It can be used in conjunction with {Semaphore}.
+	#
 	# @public Since `stable-v1`.
 	class Barrier
 		# Initialize the barrier.
 		# @parameter parent [Task | Semaphore | Nil] The parent for holding any children tasks.
 		# @public Since `stable-v1`.
 		def initialize(parent: nil)
-			@tasks = []
+			@tasks = List.new
 			
 			@parent = parent
 		end
 		
-		# All tasks which have been invoked into the barrier.
-		attr :tasks
+		class TaskNode < List::Node
+			def initialize(task)
+				@task = task
+			end
+			
+			attr :task
+		end
 		
-		# The number of tasks currently held by the barrier.
+		private_constant :TaskNode
+		
+		# Number of tasks being held by the barrier.
 		def size
 			@tasks.size
 		end
 		
+		# All tasks which have been invoked into the barrier.
+		attr :tasks
+		
 		# Execute a child task and add it to the barrier.
 		# @asynchronous Executes the given block concurrently.
 		def async(*arguments, parent: (@parent or Task.current), **options, &block)
 			task = parent.async(*arguments, **options, &block)
 			
-			@tasks << task
+			@tasks.append(TaskNode.new(task))
 			
 			return task
 		end
@@ -42,21 +54,15 @@ module Async
 			@tasks.empty?
 		end
 		
-		# Wait for all tasks.
+		# Wait for all tasks to complete by invoking {Task#wait} on each waiting task, which may raise an error. As long as the task has completed, it will be removed from the barrier.
 		# @asynchronous Will wait for tasks to finish executing.
 		def wait
-			# TODO: This would be better with linked list.
-			while @tasks.any?
-				task = @tasks.first
-				
+			@tasks.each do |waiting|
+				task = waiting.task
 				begin
 					task.wait
 				ensure
-					# We don't know for sure that the exception was due to the task completion.
-					unless task.running?
-						# Remove the task from the waiting list if it's finished:
-						@tasks.shift if @tasks.first == task
-					end
+					@tasks.remove?(waiting) unless task.alive?
 				end
 			end
 		end
@@ -64,9 +70,9 @@ module Async
 		# Stop all tasks held by the barrier.
 		# @asynchronous May wait for tasks to finish executing.
 		def stop
-			# We have to be careful to avoid enumerating tasks while adding/removing to it:
-			tasks = @tasks.dup
-			tasks.each(&:stop)
+			@tasks.each do |waiting|
+				waiting.task.stop
+			end
 		end
 	end
 end

data/lib/async/condition.md

@@ -25,7 +25,7 @@ end
 ### Output
 
 ~~~
-0.0s     info: Waiting for condition... [ec=0x3c] [pid=47943]
-1.0s     info: Signalling condition... [ec=0x64] [pid=47943]
-1.0s     info: Condition was signalled: Hello World [ec=0x3c] [pid=47943]
+0.0s     info: Waiting for condition...
+1.0s     info: Signalling condition...
+1.0s     info: Condition was signalled: Hello World
 ~~~

data/lib/async/condition.rb

@@ -5,41 +5,38 @@
 # Copyright, 2017, by Kent Gruber.
 
 require 'fiber'
-require_relative 'node'
+require_relative 'list'
 
 module Async
 	# A synchronization primitive, which allows fibers to wait until a particular condition is (edge) triggered.
 	# @public Since `stable-v1`.
 	class Condition
 		def initialize
-			@waiting = []
+			@waiting = List.new
 		end
 		
-		Queue = Struct.new(:fiber) do
-			def transfer(*arguments)
-				fiber&.transfer(*arguments)
+		class FiberNode < List::Node
+			def initialize(fiber)
+				@fiber = fiber
 			end
 			
-			def alive?
-				fiber&.alive?
+			def transfer(*arguments)
+				@fiber.transfer(*arguments)
 			end
 			
-			def nullify
-				self.fiber = nil
+			def alive?
+				@fiber.alive?
 			end
 		end
 		
-		private_constant :Queue
+		private_constant :FiberNode
 		
 		# Queue up the current fiber and wait on yielding the task.
 		# @returns [Object]
 		def wait
-			queue = Queue.new(Fiber.current)
-			@waiting << queue
-			
-			Fiber.scheduler.transfer
-		ensure
-			queue.nullify
+			@waiting.stack(FiberNode.new(Fiber.current)) do
+				Fiber.scheduler.transfer
+			end
 		end
 		
 		# Is any fiber waiting on this notification?
@@ -51,8 +48,9 @@ module Async
 		# Signal to a given task that it should resume operations.
 		# @parameter value [Object | Nil] The value to return to the waiting fibers.
 		def signal(value = nil)
-			waiting = @waiting
-			@waiting = []
+			return if @waiting.empty?
+			
+			waiting = self.exchange
 			
 			waiting.each do |fiber|
 				Fiber.scheduler.resume(fiber, value) if fiber.alive?
@@ -60,5 +58,13 @@ module Async
 			
 			return nil
 		end
+		
+		protected
+		
+		def exchange
+			waiting = @waiting
+			@waiting = List.new
+			return waiting
+		end
 	end
 end

data/lib/async/list.rb

@@ -0,0 +1,181 @@
+# frozen_string_literal: true
+
+# Released under the MIT License.
+# Copyright, 2022, by Samuel Williams.
+
+module Async
+	# A general doublely linked list. This is used internally by {Async::Barrier} and {Async::Condition} to manage child tasks.
+	class List
+		# Initialize a new, empty, list.
+		def initialize
+			@head = self
+			@tail = self
+			@size = 0
+		end
+		
+		# Print a short summary of the list.
+		def to_s
+			"#<#{self.class.name} size=#{@size}>"
+		end
+		
+		alias inspect to_s
+		
+		# Points at the end of the list.
+		attr_accessor :head
+		
+		# Points at the start of the list.
+		attr_accessor :tail
+		
+		attr :size
+		
+		# A callback that is invoked when an item is added to the list.
+		def added(node)
+			@size += 1
+			return node
+		end
+		
+		# Append a node to the end of the list.
+		def append(node)
+			if node.head
+				raise ArgumentError, "Node is already in a list!"
+			end
+			
+			node.tail = self
+			@head.tail = node
+			node.head = @head
+			@head = node
+			
+			return added(node)
+		end
+		
+		def prepend(node)
+			if node.head
+				raise ArgumentError, "Node is already in a list!"
+			end
+			
+			node.head = self
+			@tail.head = node
+			node.tail = @tail
+			@tail = node
+			
+			return added(node)
+		end
+		
+		# Add the node, yield, and the remove the node.
+		# @yields {|node| ...} Yields the node.
+		# @returns [Object] Returns the result of the block.
+		def stack(node, &block)
+			append(node)
+			return yield(node)
+		ensure
+			remove!(node)
+		end
+		
+		# A callback that is invoked when an item is removed from the list.
+		def removed(node)
+			@size -= 1
+			return node
+		end
+		
+		# Remove the node if it is in a list.
+		#
+		# You should be careful to only remove nodes that are part of this list.
+		#
+		# @returns [Node] Returns the node if it was removed, otherwise nil.
+		def remove?(node)
+			if node.head
+				return remove!(node)
+			end
+			
+			return nil
+		end
+		
+		# Remove the node. If it was already removed, this will raise an error.
+		#
+		# You should be careful to only remove nodes that are part of this list.
+		#
+		# @raises [ArgumentError] If the node is not part of this list.
+		# @returns [Node] Returns the node if it was removed, otherwise nil.
+		def remove(node)
+			# One downside of this interface is we don't actually check if the node is part of the list defined by `self`. This means that there is a potential for a node to be removed from a different list using this method, which in can throw off book-keeping when lists track size, etc.
+			unless node.head
+				raise ArgumentError, "Node is not in a list!"
+			end
+			
+			remove!(node)
+		end
+		
+		private def remove!(node)
+			node.head.tail = node.tail
+			node.tail.head = node.head
+			
+			# This marks the node as being removed, and causes remove to fail if called a 2nd time.
+			node.head = nil
+			# node.tail = nil
+			
+			return removed(node)
+		end
+		
+		# @returns [Boolean] Returns true if the list is empty.
+		def empty?
+			@tail.equal?(self)
+		end
+		
+		# Iterate over each node in the linked list. It is generally safe to remove the current node, any previous node or any future node during iteration.
+		#
+		# @yields {|node| ...} Yields each node in the list.
+		# @returns [List] Returns self.
+		def each
+			return to_enum unless block_given?
+			
+			current = self
+			
+			while true
+				node = current.tail
+				# binding.irb if node.nil? && !node.equal?(self)
+				break if node.equal?(self)
+				
+				yield node
+				
+				# If the node has deleted itself or any subsequent node, it will no longer be the next node, so don't use it for continued traversal:
+				if current.tail.equal?(node)
+					current = node
+				end
+			end
+			
+			return self
+		end
+		
+		# Determine whether the given node is included in the list. 
+		#
+		# @parameter needle [Node] The node to search for.
+		# @returns [Boolean] Returns true if the node is in the list.
+		def include?(needle)
+			self.each do |item|
+				return true if needle.equal?(item)
+			end
+			
+			return false
+		end
+		
+		# @returns [Node] Returns the first node in the list, if it is not empty.
+		def first
+			unless @tail.equal?(self)
+				@tail
+			end
+		end
+		
+		# @returns [Node] Returns the last node in the list, if it is not empty.
+		def last
+			unless @head.equal?(self)
+				@head
+			end
+		end
+	end
+	
+	# A linked list Node.
+	class List::Node
+		attr_accessor :head
+		attr_accessor :tail
+	end
+end

data/lib/async/node.rb

@@ -5,138 +5,48 @@
 # Copyright, 2017, by Kent Gruber.
 # Copyright, 2022, by Shannon Skipper.
 
+require_relative 'list'
+
 module Async
-	# A double linked list used for managing tasks.
-	class List
-		def initialize
-			# The list behaves like a list node, so @tail points to the next item (the first one) and head points to the previous item (the last one). This may be slightly confusing but it makes the interface more natural.
-			@head = nil
-			@tail = nil
-			@size = 0
-		end
-		
-		attr :size
-		
-		attr_accessor :head
-		attr_accessor :tail
-		
-		# Inserts an item at the end of the list.
-		def insert(item)
-			unless @tail
-				@tail = item
-				@head = item
-				
-				# Consistency:
-				item.head = nil
-				item.tail = nil
-			else
-				@head.tail = item
-				item.head = @head
-				
-				# Consistency:
-				item.tail = nil
-				
-				@head = item
-			end
-			
-			@size += 1
-			
-			return self
-		end
-		
-		def delete(item)
-			if @tail.equal?(item)
-				@tail = @tail.tail
-			else
-				item.head.tail = item.tail
-			end
-			
-			if @head.equal?(item)
-				@head = @head.head
-			else
-				item.tail.head = item.head
-			end
-			
-			item.head = nil
-			item.tail = nil
-			
-			@size -= 1
-			
-			return self
-		end
-		
-		def each(&block)
-			return to_enum unless block_given?
-			
-			current = self
-			while node = current.tail
-				yield node
-				
-				# If the node has deleted itself or any subsequent node, it will no longer be the next node, so don't use it for continued traversal:
-				if current.tail.equal?(node)
-					current = node
-				end
-			end
-		end
-		
-		def include?(needle)
-			self.each do |item|
-				return true if needle.equal?(item)
-			end
-			
-			return false
-		end
-		
-		def first
-			@tail
-		end
-		
-		def last
-			@head
-		end
-		
-		def empty?
-			@tail.nil?
-		end
-		
-		def nil?
-			@tail.nil?
-		end
-	end
-	
-	private_constant :List
-	
 	# A list of children tasks.
 	class Children < List
 		def initialize
 			super
-			
 			@transient_count = 0
 		end
 		
-		# Does this node have (direct) transient children?
+		# Some children may be marked as transient. Transient children do not prevent the parent from finishing.
+		# @returns [Boolean] Whether the node has transient children.
 		def transients?
 			@transient_count > 0
 		end
 		
-		def insert(item)
-			if item.transient?
+		# Whether all children are considered finished. Ignores transient children.
+		def finished?
+			@size == @transient_count
+		end
+		
+		# Whether the children is empty, preserved for compatibility.
+		def nil?
+			empty?
+		end
+		
+		private
+		
+		def added(node)
+			if node.transient?
 				@transient_count += 1
 			end
 			
-			super
+			return super
 		end
 		
-		def delete(item)
-			if item.transient?
+		def removed(node)
+			if node.transient?
 				@transient_count -= 1
 			end
 			
-			super
-		end
-		
-		def finished?
-			@size == @transient_count
+			return super
 		end
 	end
 	
@@ -181,12 +91,18 @@ module Async
 		# A useful identifier for the current node.
 		attr :annotation
 		
-		# Whether there are children?
+		# Whether this node has any children.
+		# @returns [Boolean]
 		def children?
-			@children != nil && !@children.empty?
+			@children && !@children.empty?
 		end
 		
-		# Is this node transient?
+		# Represents whether a node is transient. Transient nodes are not considered
+		# when determining if a node is finished. This is useful for tasks which are
+		# internal to an object rather than explicit user concurrency. For example,
+		# a child task which is pruning a connection pool is transient, because it
+		# is not directly related to the parent task, and should not prevent the
+		# parent task from finishing.
 		def transient?
 			@transient
 		end
@@ -225,13 +141,14 @@ module Async
 		alias inspect to_s
 		
 		# Change the parent of this node.
-		# @parameter parent [Node | Nil] the parent to attach to, or nil to detach.
+		#
+		# @parameter parent [Node | Nil] The parent to attach to, or nil to detach.
 		# @returns [Node] Itself.
 		def parent=(parent)
 			return if @parent.equal?(parent)
 			
 			if @parent
-				@parent.delete_child(self)
+				@parent.remove_child(self)
 				@parent = nil
 			end
 			
@@ -242,23 +159,23 @@ module Async
 			return self
 		end
 		
-		protected def set_parent parent
+		protected def set_parent(parent)
 			@parent = parent
 		end
 		
-		protected def add_child child
+		protected def add_child(child)
 			@children ||= Children.new
-			@children.insert(child)
+			@children.append(child)
 			child.set_parent(self)
 		end
 		
-		protected def delete_child(child)
-			@children.delete(child)
+		protected def remove_child(child)
+			@children.remove(child)
 			child.set_parent(nil)
 		end
 		
-		# Whether the node can be consumed safely. By default, checks if the
-		# children set is empty.
+		# Whether the node can be consumed (deleted) safely. By default, checks if the children set is empty.
+		#
 		# @returns [Boolean]
 		def finished?
 			@children.nil? || @children.finished?
@@ -268,15 +185,15 @@ module Async
 		# the parent.
 		def consume
 			if parent = @parent and finished?
-				parent.delete_child(self)
+				parent.remove_child(self)
 				
 				if @children
 					@children.each do |child|
 						if child.finished?
-							delete_child(child)
+							remove_child(child)
 						else
 							# In theory we don't need to do this... because we are throwing away the list. However, if you don't correctly update the list when moving the child to the parent, it foobars the enumeration, and subsequent nodes will be skipped, or in the worst case you might start enumerating the parents nodes.
-							delete_child(child)
+							remove_child(child)
 							parent.add_child(child)
 						end
 					end
@@ -288,18 +205,25 @@ module Async
 			end
 		end
 		
-		# Traverse the tree.
+		# Traverse the task tree.
+		#
+		# @returns [Enumerator] An enumerator which will traverse the tree if no block is given.
 		# @yields {|node, level| ...} The node and the level relative to the given root.
-		def traverse(level = 0, &block)
+		def traverse(&block)
+			return enum_for(:traverse) unless block_given?
+			
+			self.traverse_recurse(&block)
+		end
+		
+		protected def traverse_recurse(level = 0, &block)
 			yield self, level
 			
 			@children&.each do |child|
-				child.traverse(level + 1, &block)
+				child.traverse_recurse(level + 1, &block)
 			end
 		end
 		
-		# Immediately terminate all children tasks, including transient tasks.
-		# Internally invokes `stop(false)` on all children.
+		# Immediately terminate all children tasks, including transient tasks. Internally invokes `stop(false)` on all children. This should be considered a last ditch effort and is used when closing the scheduler.
 		def terminate
 			# Attempt to stop the current task immediately, and all children:
 			stop(false)
@@ -310,8 +234,8 @@ module Async
 			end
 		end
 		
-		# Attempt to stop the current node immediately, including all non-transient children.
-		# Invokes {#stop_children} to stop all children.
+		# Attempt to stop the current node immediately, including all non-transient children. Invokes {#stop_children} to stop all children.
+		#
 		# @parameter later [Boolean] Whether to defer stopping until some point in the future.
 		def stop(later = false)
 			# The implementation of this method may defer calling `stop_children`.

data/lib/async/notification.rb

@@ -13,9 +13,7 @@ module Async
 		def signal(value = nil, task: Task.current)
 			return if @waiting.empty?
 			
-			Fiber.scheduler.push Signal.new(@waiting, value)
-			
-			@waiting = []
+			Fiber.scheduler.push Signal.new(self.exchange, value)
 			
 			return nil
 		end

data/lib/async/reactor.rb

@@ -21,6 +21,10 @@ module Async
 			Fiber.set_scheduler(self)
 		end
 		
+		def scheduler_close
+			self.close
+		end
+		
 		public :sleep
 	end
 end

data/lib/async/scheduler.rb

@@ -34,6 +34,12 @@ module Async
 			@timers = ::Timers::Group.new
 		end
 		
+		def scheduler_close
+			self.run
+		ensure
+			self.close
+		end
+		
 		# @public Since `stable-v1`.
 		def close
 			# This is a critical step. Because tasks could be stored as instance variables, and since the reactor is (probably) going out of scope, we need to ensure they are stopped. Otherwise, the tasks will belong to a reactor that will never run again and are not stopped.
@@ -160,7 +166,7 @@ module Async
 			timer&.cancel
 		end
 
-		if IO::Event::Support.buffer?
+		if ::IO::Event::Support.buffer?
 			def io_read(io, buffer, length, offset = 0)
 				@selector.io_read(Fiber.current, io, buffer, length, offset)
 			end

data/lib/async/semaphore.rb

@@ -3,6 +3,8 @@
 # Released under the MIT License.
 # Copyright, 2018-2022, by Samuel Williams.
 
+require_relative 'list'
+
 module Async
 	# A synchronization primitive, which limits access to a given resource.
 	# @public Since `stable-v1`.
@@ -12,7 +14,7 @@ module Async
 		def initialize(limit = 1, parent: nil)
 			@count = 0
 			@limit = limit
-			@waiting = []
+			@waiting = List.new
 			
 			@parent = parent
 		end
@@ -73,26 +75,34 @@ module Async
 		def release
 			@count -= 1
 			
-			while (@limit - @count) > 0 and fiber = @waiting.shift
-				if fiber.alive?
-					Fiber.scheduler.resume(fiber)
-				end
+			while (@limit - @count) > 0 and node = @waiting.first
+				node.resume
 			end
 		end
 		
 		private
 		
+		class FiberNode < List::Node
+			def initialize(fiber)
+				@fiber = fiber
+			end
+			
+			def resume
+				if @fiber.alive?
+					Fiber.scheduler.resume(@fiber)
+				end
+			end
+		end
+		
+		private_constant :FiberNode
+		
 		# Wait until the semaphore becomes available.
 		def wait
-			fiber = Fiber.current
+			return unless blocking?
 			
-			if blocking?
-				@waiting << fiber
+			@waiting.stack(FiberNode.new(Fiber.current)) do
 				Fiber.scheduler.transfer while blocking?
 			end
-		rescue Exception
-			@waiting.delete(fiber)
-			raise
 		end
 	end
 end

data/lib/async/task.rb

@@ -111,7 +111,10 @@ module Async
 			end
 		end
 		
+		# Run an asynchronous task as a child of the current task.
 		def async(*arguments, **options, &block)
+			raise "Cannot create child task within a task that has finished execution!" if self.finished?
+			
 			task = Task.new(self, **options, &block)
 			
 			task.run(*arguments)
@@ -119,26 +122,28 @@ module Async
 			return task
 		end
 		
-		# Retrieve the current result of the task. Will cause the caller to wait until result is available.
-		# @raises[RuntimeError] If the task's fiber is the current fiber.
+		# Retrieve the current result of the task. Will cause the caller to wait until result is available. If the result was an exception, raise that exception.
+		#
+		# Conceptually speaking, waiting on a task should return a result, and if it throws an exception, this is certainly an exceptional case that should represent a failure in your program, not an expected outcome. In other words, you should not design your programs to expect exceptions from `#wait` as a normal flow control, and prefer to catch known exceptions within the task itself and return a result that captures the intention of the failure, e.g. a `TimeoutError` might simply return `nil` or `false` to indicate that the operation did not generate a valid result (as a timeout was an expected outcome of the internal operation in this case).
+		#
+		# @raises [RuntimeError] If the task's fiber is the current fiber.
 		# @returns [Object] The final expression/result of the task's block.
 		def wait
-			raise "Cannot wait on own fiber" if Fiber.current.equal?(@fiber)
+			raise "Cannot wait on own fiber!" if Fiber.current.equal?(@fiber)
 			
 			if running?
 				@finished ||= Condition.new
 				@finished.wait
 			end
 			
-			case @result
-			when Exception
+			if @result.is_a?(Exception)
 				raise @result
 			else
 				return @result
 			end
 		end
 		
-		# Access the result of the task without waiting. May be nil if the task is not completed.
+		# Access the result of the task without waiting. May be nil if the task is not completed. Does not raise exceptions.
 		attr :result
 		
 		# Stop the task and all of its children.
@@ -268,7 +273,7 @@ module Async
 			
 			# If this task was being used as a future, signal completion here:
 			if @finished
-				@finished.signal(@result)
+				@finished.signal(self)
 			end
 		end
 		

data/lib/async/version.rb

@@ -4,5 +4,5 @@
 # Copyright, 2017-2022, by Samuel Williams.
 
 module Async
-	VERSION = "2.2.0"
+	VERSION = "2.3.0"
 end

data/lib/async/waiter.md

@@ -0,0 +1,50 @@
+A synchronization primitive, which allows you to wait for tasks to complete in order of completion. This is useful for implementing a task pool, where you want to wait for the first task to complete, and then cancel the rest.
+
+If you try to wait for more things than you have added, you will deadlock.
+
+## Example
+
+~~~ ruby
+require 'async'
+require 'async/semaphore'
+require 'async/barrier'
+require 'async/waiter'
+
+Sync do
+	barrier = Async::Barrier.new
+	waiter = Async::Waiter.new(parent: barrier)
+	semaphore = Async::Semaphore.new(2, parent: waiter)
+	
+	# Sleep sort the numbers:
+	generator = Async do
+		while true
+			semaphore.async do |task|
+				number = rand(1..10)
+				sleep(number)
+			end
+		end
+	end
+	
+	numbers = []
+	
+	4.times do
+		# Wait for all the numbers to be sorted:
+		numbers << waiter.wait
+	end
+	
+	# Don't generate any more numbers:
+	generator.stop
+	
+	# Stop all tasks which we don't care about:
+	barrier.stop
+	
+	Console.logger.info("Smallest", numbers)
+end
+~~~
+
+### Output
+
+~~~
+0.0s     info: Smallest
+             | [3, 3, 1, 2]
+~~~

data/lib/async/waiter.rb

@@ -0,0 +1,51 @@
+# frozen_string_literal: true
+
+# Released under the MIT License.
+# Copyright, 2022, by Samuel Williams.
+
+module Async
+	# A composable synchronization primitive, which allows one task to wait for a number of other tasks to complete. It can be used in conjunction with {Semaphore} and/or {Barrier}.
+	class Waiter
+		def initialize(parent: nil, finished: Async::Condition.new)
+			@finished = finished
+			@done = []
+			
+			@parent = parent
+		end
+		
+		# Execute a child task and add it to the waiter.
+		# @asynchronous Executes the given block concurrently.
+		def async(parent: (@parent or Task.current), &block)
+			parent.async do |task|
+				yield(task)
+			ensure
+				@done << task
+				@finished.signal
+			end
+		end
+		
+		# Wait for the first `count` tasks to complete.
+		# @parameter count [Integer | Nil] The number of tasks to wait for.
+		# @returns [Array(Async::Task)] If an integer is given, the tasks which have completed.
+		# @returns [Async::Task] Otherwise, the first task to complete.
+		def first(count = nil)
+			minimum = count || 1
+			
+			while @done.size < minimum
+				@finished.wait
+			end
+			
+			return @done.shift(*count)
+		end
+		
+		# Wait for the first `count` tasks to complete.
+		# @parameter count [Integer | Nil] The number of tasks to wait for.
+		def wait(count = nil)
+			if count
+				first(count).map(&:wait)
+			else
+				first.wait
+			end
+		end
+	end
+end

data/lib/kernel/async.rb

@@ -25,6 +25,7 @@ module Kernel
 		if current = ::Async::Task.current?
 			return current.async(...)
 		else
+			# This calls Fiber.set_scheduler(self):
 			reactor = ::Async::Reactor.new
 			
 			begin

data/lib/kernel/sync.rb

@@ -19,6 +19,7 @@ module Kernel
 		if task = ::Async::Task.current?
 			yield task
 		else
+			# This calls Fiber.set_scheduler(self):
 			reactor = Async::Reactor.new
 			
 			begin

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: async
 version: !ruby/object:Gem::Version
-  version: 2.2.0
+  version: 2.3.0
 platform: ruby
 authors:
 - Samuel Williams
@@ -54,7 +54,7 @@ cert_chain:
   Q2K9NVun/S785AP05vKkXZEFYxqG6EW012U4oLcFl5MySFajYXRYbuUpH6AY+HP8
   voD0MPg1DssDLKwXyt1eKD/+Fq0bFWhwVM/1XiAXL7lyYUyOq24KHgQ2Csg=
   -----END CERTIFICATE-----
-date: 2022-10-13 00:00:00.000000000 Z
+date: 2022-12-04 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: console
@@ -76,14 +76,14 @@ dependencies:
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: 1.1.0
+        version: '1.1'
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: 1.1.0
+        version: '1.1'
 - !ruby/object:Gem::Dependency
   name: timers
   requirement: !ruby/object:Gem::Requirement
@@ -174,28 +174,42 @@ dependencies:
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '0.10'
+        version: 0.18.3
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '0.10'
+        version: 0.18.3
 - !ruby/object:Gem::Dependency
-  name: rspec
+  name: sus
   requirement: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '3.6'
+        version: '0.15'
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '3.6'
+        version: '0.15'
+- !ruby/object:Gem::Dependency
+  name: sus-fixtures-async
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
 description:
 email:
 executables: []
@@ -208,6 +222,7 @@ files:
 - lib/async/clock.rb
 - lib/async/condition.md
 - lib/async/condition.rb
+- lib/async/list.rb
 - lib/async/node.rb
 - lib/async/notification.rb
 - lib/async/queue.rb
@@ -218,6 +233,8 @@ files:
 - lib/async/task.rb
 - lib/async/variable.rb
 - lib/async/version.rb
+- lib/async/waiter.md
+- lib/async/waiter.rb
 - lib/async/wrapper.rb
 - lib/kernel/async.rb
 - lib/kernel/sync.rb