Stop accept loops when exiting server run task.

Author: ioquatix

lib/async/http/server.rb

@@ -67,6 +67,9 @@ def run
 
 					# Wait for all children to finish:
 					task.children.each(&:wait)
+				ensure
+					# Stop all children (accept loops) on exit:
+					task.children.each(&:stop)
 				end
 			end
 		end