anchor.diff:      let graph = Graph.Empty
       
       let asmNodeIndex = graph.AddOrLookupNode(AssemblyNode (asmName, false))
  -    for req in getRequires assembly.CustomAttributes do
  +    for req in getRequires isTSasm assembly.CustomAttributes do
           graph.AddEdge(asmNodeIndex, ResourceNode req)
   
       let interfaces = Dictionary()
  
positive.code:                     let rest = ts.[7] :?> Mono.Cecil.GenericInstanceType
                      Array.append ts.[.. 6] (collect rest.GenericArguments) 
                  else ts
              let tts = collect tR.GenericArguments |> Seq.map (getType tgen) |> List.ofSeq
              TupleType (tts, isStruct)
          if name = "System.Void" || name = "Microsoft.FSharp.Core.Unit" then
              VoidType
          elif name = "Microsoft.FSharp.Core.FSharpFunc`2" then
              let tR = tR :?> Mono.Cecil.GenericInstanceType
              match tR.GenericArguments |> Seq.map (getType tgen) |> List.ofSeq with
              | [a; r] -> FSharpFuncType(a, r)    
              | _ -> failwith "FSharpFunc type must have two type arguments"
          elif name.StartsWith "System.Tuple" then
  
negative.code:                             let mdef =
                                  Hashed {
                                      MethodName = meth.Name
                                      Parameters = meth.Parameters |> Seq.map (fun p -> getType isTSasm tgen p.ParameterType) |> List.ofSeq
                                      ReturnType = getType isTSasm tgen meth.ReturnType
                                      Generics   = meth.GenericParameters |> Seq.length
                                  }
                              let name =
  