diff --git a/hosts/ocaml/bin/sx_server.ml b/hosts/ocaml/bin/sx_server.ml index 1bdade7..a53415a 100644 --- a/hosts/ocaml/bin/sx_server.ml +++ b/hosts/ocaml/bin/sx_server.ml @@ -329,6 +329,8 @@ let setup_browser_stubs env = bind "dom-get-data" (fun _args -> Nil); bind "event-detail" (fun _args -> Nil); bind "promise-then" (fun _args -> Nil); + bind "promise-delayed" (fun args -> + match args with _ :: [v] -> v | _ -> Nil); bind "schedule-idle" (fun _args -> Nil); bind "dom-query" (fun _args -> Nil); bind "dom-query-all" (fun _args -> List []);