# \donttest{
hooks <- create_mission_hooks(
on_step_done = function(step, result) {
message("Completed: ", step$description)
},
on_mission_stall = function(mission, step) {
message("STALL detected at step: ", step$id)
}
)
# }
Run the code above in your browser using DataLab