anchor.diff:              locals      = Map.empty
               stack       = []
           } |> ignore
  +
  +    let assembleTo' (state : State) (m : seq<Instruction>) =
  +        assembleBody m state |> ignore
   
       let assembleDelegateInternal (tdel : Type) (m : list<Instruction>) : Delegate =
           let invoke = tdel.GetMethod("Invoke")
  
positive.code:     | Switch of Label[]
      | Throw
      | EndFinally
      | Leave
  
  type MethodDefinition =
      {
  
negative.code: 
              static member GetLocal (l : Local) : Asm<LocalBuilder> =
                  fun s ->
                      match Map.tryFind l s.locals with
                          | Some l -> s,l
                          | None ->
                              let res = s.generator.DeclareLocal(l.Type)
                              let s = { s with locals = Map.add l res s.locals }
                              s, res
  
              static member GetLabel (l : Label) : Asm<System.Reflection.Emit.Label> =
  