anchor.diff:              | BufferedArrayObjs buffered -> buffered.WritableArrayObjs |> Seq.cast<'c ArrayRef> |> Seq.toArray
           | (false, _) -> [||]
   
  +    member this.GetComponentArraysReadOnly<'c when 'c : struct and 'c :> 'c Component> () =
  +        let componentName = typeof<'c>.Name
  +        match arrayObjss.TryGetValue componentName with
  +        | (true, arrayObjs) ->
  +            match arrayObjs with
  +            | UnbufferedArrayObjs unbuffered -> unbuffered |> Seq.cast<'c ArrayRef> |> Seq.toArray
  +            | BufferedArrayObjs buffered -> buffered.ReadOnlyArrayObjs |> Seq.cast<'c ArrayRef> |> Seq.toArray
  +        | (false, _) -> [||]
  +
       member this.BufferComponentArrays<'c when 'c : struct and 'c :> 'c Component> () =
           let componentName = typeof<'c>.Name
           match arrayObjss.TryGetValue componentName with
  
positive.code:             lock this.ComponentArefReadOnly (fun () -> this.ComponentArefReadOnly.[this.ComponentIndex])
  
      static member inline (<!) (componentRef, value) =
          componentRef.ComponentArefWritable.Array.[componentRef.ComponentIndex] <- value
  
      static member inline make index arr arr2 : 'c ComponentRef =
          { ComponentIndex = index
            ComponentArefWritable = arr
            ComponentArefReadOnly = arr2 }
  
  /// An ECS event.
  
negative.code:             if Option.isNone systemOpt then failwith ("Could not find expected system '" + systemName + "'.")
              let system = Option.get systemOpt
              let simplex = system.IndexMultiplexed multiId entityId
              &simplex.Simplex
  
          member this.ReadMultiplexed<'c when 'c : struct and 'c :> 'c Component> multiId entityId =
              let systemName = typeof<'c>.Name
              let systemOpt = this.TryIndexSystem<SystemMultiplexed<'c, 'w>> systemName
              if Option.isNone systemOpt then failwith ("Could not find expected system '" + systemName + "'.")
              let system = Option.get systemOpt
              let simplex = system.ReadMultiplexed multiId entityId
              &simplex.Simplex
  
          member this.RegisterMultiplexed<'c when 'c : struct and 'c :> 'c Component> comp multiId entityId =
  