bindEvent and bindCache not working in shinylive

The provided code includes the usage of bindEvent and bindCache functions in a shinyApp, but it seems that they are not functioning as expected in shinylive.

Code snippet:

shinyApp(
    ui = fluidPage(
      sliderInput("x", "x", 1, 10, 5),
      sliderInput("y", "y", 1, 10, 5),
      actionButton("go", "Go"),
      div("x * y: "),
      verbatimTextOutput("txt")
    ),
    server = function(input, output) {
      r <- reactive({
        message("Doing expensive computation...")
        Sys.sleep(2)
        input$x * input$y
      }) %>%
        bindCache(input$x, input$y) %>%
        bindEvent(input$go,once = TRUE)
      output$txt <- renderText(r())
    }
  )

Start by running the supplied shinyApp example in shinylive and compare its bindEvent and bindCache behavior with regular Shiny. Trace the reactive expression and output rendering involved in the example; done means the example behaves as expected when the action button and cached inputs are used.