namespace KWorld

module Shim =
  let v = ref None

  let ignore x =
    v := Some x

namespace KWorld

open Stdlib.Asyncseq
open Stdlib.Syntax
open Shim

type interloper() =
  inherit UnityEditor.EditorApplication()

  static do ignore (
    editor_app.all |> Seq.Async.iter @@ fun x ->
    printfn "start\n%A\nend" x
    task { return () }
  )