anchor.diff:      ProviderURL : string 
       SupportURL : string option}
   
  +/// Convert the parameter structure into command line arguments of MAGE
   let MageSerializeParams (action: MageCall) (mp : MageParams) =
     let processorStr =
       match mp.Processor with
       | MSIL -> "msil"
       | X86 -> "x86"
  +    | IA64 -> "ia64"
  +    | AMD64 -> "amd64"
     
     let processor = "-p " + processorStr
     let name = if isNullOrEmpty mp.Name then "" else "-n \"" + mp.Name + "\""
  
positive.code: ﻿[<AutoOpen>]
  module Fake.MageHelper
  
  open System.IO
  
  type MageProcessor = MSIL | X86
  type MageCall = NewApp | UpdateApp | Sign | Deploy | UpdateDeploy | SignDeploy
  type MageTrustLevels = Internet | LocalIntranet | FullTrust
  type MageParams =
    { ToolsPath : string
      ProjectFiles : seq<string>
      Name : string
      IconPath : string 
  
negative.code:       info.Arguments <- args) System.TimeSpan.MaxValue
    if result <> 0 then failwithf "Error during mage call "
  
  /// Encapsulates the MAGE call to create a new application's manifest
  let MageCreateApp (mp : MageParams) =
    mageCall NewApp mp
  
  /// Encapsulates the MAGE call to update an existing application's manifest
  let MageUpdateApp (mp : MageParams) =
    mageCall UpdateApp mp
  
  /// Encapsulates the MAGE call to sign an application's manifest
  let MageSignManifest (mp : MageParams) =
    mageCall Sign mp
  
  /// Encapsulates the MAGE call to deploy an application
  let MageDeployApp (mp : MageParams) =
    mageCall Deploy mp
  
  /// Encapsulates the MAGE call to update the deployment of an application
  let MageUpdateDeploy (mp : MageParams) =
    mageCall UpdateDeploy mp
  
  /// Encapsulates the MAGE call to sign the deployment of an application
  let MageSignDeploy (mp : MageParams) =
    mageCall SignDeploy mp
  
  /// Executes a full run of MAGE commands: first, it creates a new manifest file. Then it signs the manifest, deploys the application and finally signs the deployment.
  let MageRun (mp : MageParams) =
    traceStartTask "Mage-Tool" mp.ApplicationFile
    MageCreateApp mp
  