anchor.diff:                          | _ -> ()
                       else
                           let view = this.LoadView(it)
  -                        let toInt s = if s = "" then 0 else s |> int
  -                        let toIntOne s = if s = "" then 1 else s |> int
  -                        let row = toInt(it.Attribute("Grid.Row"))
  -                        let column = toInt(it.Attribute("Grid.Column"))
  -                        let rowspan = toIntOne(it.Attribute("Grid.RowSpan"))
  -                        let colspan = toIntOne(it.Attribute("Grid.ColumnSpan"))
  +                        let toInt(s) = if s = "" then 0 else s |> int
  +                        let toIntOne(s) = if s = "" then 1 else s |> int
  +                        let row = toInt(it.GetAttr("Grid.Row"))
  +                        let column = toInt(it.GetAttr("Grid.Column"))
  +                        let rowspan = toIntOne(it.GetAttr("Grid.RowSpan"))
  +                        let colspan = toIntOne(it.GetAttr("Grid.ColumnSpan"))
                           item.Children.Add( view, column, column+colspan, row, row+rowspan )
               item :> View
   
  
positive.code:                 if it.NodeType = XmlNodeType.Element then
                      let view = this.LoadView(it)
                      let bounds = 
                          let v = it.Attribute("AbsoluteLayout.LayoutBounds")
                          if v <> "" then RectangleTypeConverter().ConvertFrom(v) else null
                      let flags = 
                          let v = it.Attribute("AbsoluteLayout.LayoutFlags")
                          if v <> "" then AbsoluteLayoutFlagsTypeConverter().ConvertFrom(v) else null
                      if bounds = null then
                          item.Children.Add( this.LoadView(it))
  
negative.code:             | "HorizontalOptions"|"VerticalOptions" -> typeof<LayoutOptions> 
              | _ -> null
  
          member this.SetValue(item:Object, propName:XName, s:string, tagName:string ) =
              let t = getType(propName, tagName)
              if t <> null then
                  let pi = item.GetType().GetRuntimeProperty(propName.LocalName)
                  if pi <> null then
                      let obj = 
                          match t.Name with
  