structure AppUpdate =
struct
  open AppType

  fun update (app, msg, time) =
    case #mode app of NORMAL_MODE str => NormalMode.update (app, str, msg, time)
end