anchor.diff:  open System.Collections.Generic
   open Aardvark.Base
   open Aardvark.Rendering
  +open System.Threading
   
   [<AutoOpen>]
   module Programs =
  
positive.code:         let stats = EventSourceAggregate<FrameStatistics>(FrameStatistics.Zero, (+), (-))
          let jumpDistance = EventSourceAggregate<int64>(0L, (+),(-))
  
          let deps = DependencySet(add, remove)
          let sorter = newSorter()
          let sorted = sorter.SortedList
          do add sorted
  
          let prolog = CompleteRenderJobFragment(deps, memory, manager, RenderJob.Empty)
          do prolog.Append(Assembler.functionProlog 6) |> ignore
             jumpDistance.Add prolog.JumpDistance
          let epilog = CompleteRenderJobFragment(deps, memory, manager, RenderJob.Empty)
          do epilog.Append(Assembler.functionEpilog 6) |> ignore
                 
          let mutable run : unit -> unit = id 
  
negative.code:             
          member x.Add (r : RenderJob) =
              let sorted = sorter.ToSortedRenderJob order r
              let f = CompleteRenderJobFragment(idCache, deps, memory, manager, sorted)
              fragments.Add(r, f)
              sorter.Add r
              stats.Add f.Statistics
  