Race ports function

This function collapse ports into a single port and make them race (i.e. always return the last one updated)

race_ports(...)

Arguments

...

List of racing ports

Examples

if (FALSE) {
# Somewhere in the app...
MyModule <- R6::R6Class("MyModule", inherit = tidymodules::TidyModule)
MyModule$new("Mod1")
MyModule$new("Mod2")
MyModule$new("Mod3")

# Must be in the server code and after calling the modules!
callModules()
observe({
  race_ports(
    mod(1)$getOutput(1),
    mod(2)$getOutput(1)
  ) %>1% mod(3)
})
}