anchor.diff:      | TypeTags.Clr -> TC.ToPrimitive(v.Clr, hint)
       | TypeTags.Object 
       | TypeTags.Function -> v.Object.DefaultValue(hint)
  +    | TypeTags.SuffixString -> BV.Box(v.Clr.ToString())
       | _ -> v
   
     static member ToPrimitive(expr:Dlr.Expr) : Dlr.Expr = 
  
positive.code:     | TypeTags.Function -> 
        v.Object
  
      | TypeTags.String -> 
        env.NewString(v.String)
  
  
negative.code:     match v.Tag with
      | TypeTags.Bool -> TC.ToString(v.Bool)
      | TypeTags.String -> v.String
      | TypeTags.SuffixString -> v.Clr.ToString()
      | TypeTags.Clr -> TC.ToString(v.Clr)
      | TypeTags.Undefined -> "undefined"
      | TypeTags.Object 
  