anchor.diff:  open System.Text
   open System.Xml.Linq
   open Ionic.Zip
  +
  +exception Handled
   
   let tfDelete file =
       if File.Exists file then File.Delete file
  
positive.code:             eprintfn "%s : error 0000 : %s" proc lines.[0]
              for line in Seq.skip 1 lines do eprintfn "%s" line
          
          if lines.Length > 1 then failwith ""
  
      p.WaitForExit()
  
  
negative.code:         else
              serverLocationDispose()
              0
      with e ->
          eprintfn "ws_mobile : error 0000 : %s: %s @ %s" (e.GetType().FullName) e.Message e.StackTrace
          -1