set platform $tcl_platform(platform)

      if {[info exists tcl_platform(machine)]} then {
        set machine $tcl_platform(machine)
      } else {
        set machine ""
      }

      if {[info exists tcl_platform(os)]} then {
        set os $tcl_platform(os)
      } else {
        set os ""
      }

      switch -exact -- $platform {
        unix {
          switch -exact -- $os {
            Darwin {
              switch -exact -- $machine {
                "Power Macintosh" {
                  return macosx-power
                }
                x86_64 {
                  return macosx-x64
                }
              }
            }
            Linux {
              switch -exact -- $machine {
                i386 {
                  return linux-x86
                }
                x86_64 {
                  return linux-x64
                }
                alpha -
                armv4l -
                armv6l -
                armv7l -
                ia64 -
                ppc {
                  return [appendArgs linux- $machine]
                }
              }
            }
          }
        }
        windows {
          switch -exact -- $machine {
            intel -
            ia32_on_win64 {
              return win32-x86
            }
            arm {
              return [appendArgs win32- $machine]



            }
            amd64 {
              return win64-x64
            }
            ia64 -
            arm64 {
              return [appendArgs win64- $machine]
            }
          }
        }
      }
    }

    return ""

      error "version Id must be hexadecimal"
    }
  }

  #
  # NOTE: This procedure verifies the platform specified by the caller.  The
  #       platform argument must be an empty string -OR- one of the literal
  #       strings "msil" or "neutral", or one of the values returned by the
  #       [getPlatform] procedure.  An empty string means that the associated
  #       entity does not require a specific platform.  The varName argument
  #       is the name of a variable in the context of the immediate caller
  #       that will receive a modified platform name, if applicable.  Upon
  #       failure, a script error will be raised.  The return value is
  #       undefined.
  #
  proc verifyPlatform { platform varName } {
    #
    # NOTE: The platform name must be matched exactly and case-sensitively.
    #
    switch -exact -- $platform {
      "" {

        }

        #
        # NOTE: Check the current platform and the neutral platform, in that
        #       order, to see if that platform is supported by the package
        #       being saught.  If so, return that platform.
        #
        foreach thisPlatform [list [getPlatform] msil neutral] {
          if {[lsearch -exact $platforms $thisPlatform] != -1} then {
            set newPlatform $thisPlatform
            return
          }
        }

        #
        # NOTE: If this point is reached, there are no supported platforms
        #       that are compatible with the current one for the specified
        #       package.
        #
        error "could not automatically detect platform"
      }
      msil -
      neutral -
      win32-arm -
      win32-x86 -
      win64-arm64 -
      win64-ia64 -
      win64-x64 {
        #

  #
  # NOTE: This procedure checks if there is a higher version available of the
  #       specified package on the package file server.  The language argument
  #       must be one of the literal strings "eagle", "tcl", or "client".  The
  #       version argument must be one of the literal strings "8.4", "8.5", or
  #       "8.6" when the language is "tcl" -OR- the literal string "1.0" when
  #       the language is either "eagle" or "client".  The platform argument
  #       must be an empty string -OR- one of the literal strings "msil" or
  #       "neutral", or one of the values returned by the [getPlatform]
  #       procedure.  An empty string means that the associated package does
  #       not require a specific platform.  The packageName argument is a
  #       directory name relative to the language and version-specific
  #       directory on the package file server and may be an empty string.
  #       The usePgp argument should be non-zero when an OpenPGP signature
  #       file needs to be downloaded and verified for the downloaded file.
  #
  # <public>
  proc checkForHigherVersion { language version platform packageName usePgp } {
    variable clientDirectory

  #       downloaded, this procedure assumes the corresponding data file was
  #       already downloaded (i.e. since OpenPGP needs both to perform the
  #       signature checks).  The language argument must be one of the
  #       literal strings "eagle", "tcl", or "client".  The version argument
  #       must be one of the literal strings "8.4", "8.5", or "8.6" when the
  #       language is "tcl" -OR- the literal string "1.0" when the language
  #       is either "eagle" or "client".  The platform argument must be an
  #       empty string -OR- one of the literal strings "msil" or "neutral", or
  #       one of the values returned by the [getPlatform] procedure.  An empty
  #       string means that the associated package does not require a specific
  #       platform.  The fileName argument is a file name relative to the
  #       language and version-specific directory on the package file server.
  #       The localFileName argument is the file name where the downloaded
  #       file should be written.  The usePgp argument should be non-zero when
  #       the OpenPGP signature file needs to be verified for the downloaded
  #       file.

  # NOTE: This procedure attempts to download a list of files, optionally
  #       persistening them for subsequent uses by the target language.
  #       The language argument must be one of the literal strings "eagle",
  #       "tcl", or "client".  The version argument must be one of the
  #       literal strings "8.4", "8.5", or "8.6" when the language is "tcl"
  #       -OR- the literal string "1.0" when the language is either "eagle"
  #       or "client".  The platform argument must be an empty string -OR-
  #       one of the literal strings "msil" or "neutral", or one of the values
  #       returned by the [getPlatform] procedure..  An empty string means
  #       that the associated package does not require a specific platform.
  #       The fileNames argument must be a well-formed list of file names to
  #       download, each one relative to the language and version-specific
  #       directory on the package file server.  The options argument must
  #       be a dictionary of name/value pairs.  The -persistent option should
  #       be non-zero if the downloaded files should be saved to permanent
  #       storage for subsequent use.  The -usePgp option should be non-zero

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v2
Comment: Eagle Package Repository

iQIcBAABCAAGBQJZVxrbAAoJEFAslq9JXcLZCP4QAJjq7pRySCfj2EWX/QY2yuyV
SVaHH4gN8V0BijiMTQGABqqkH3wRe/xu1jwmrf5oneo6foFKbUcG4rvL03UYXt4k
So7uvsz7uHgTfJYRzoRogudxCxf0W0uKUJiBRWH0qoK9IRsqPJDrKS64l6uBS9NV
LUyXuUhFJ9bUAFfB7vdwGYxfsI4GEqCp39tngR9Ld6I9pQvxBQzxNS5uXp7texGs
Tj57bvTw0ln29NKmO9Ind0/5++PK3zbDtMY1QfGCUx0LDwXSq/9GfIjk/kRtgyTx
iePynnjAE22hhm9n6pzBsF93RyB/2Kq3361PIltaiKykjLz6JsH7riIIZQc1Bjx3
1DUkg3Wvi+3y3KVa0Dy/GVHetYAEQgnqFY5lEDYMcnNhRII6fVPtTdBX6DPuYSZY
7NujpRYQWlRWXpneN1t/misDA4TT6Gz7QnpSxBx9/gexKNq/GnV3mog2PH0EEvXU
Nl8iJgTIN/uPorF3NOJwcy6eTgqA1AuZoidGLdGq26AmLP+9NUsnsMxu+ztcgHzd
ESsrspMxHcTEdIKAtYffJU0tDZ4r8D1g18QSDAiWh1X/Y8REB5FQT4ANQqfOHY7+
kbiltBbbuljQk30nuwnfKRoimt19fusUs/yDKu6lXAWaVxg03KrmG0iuuFqGj1oO
dcPxc8BGH6EYfRxry3GT
=EWC/
-----END PGP SIGNATURE-----

    THE ASSOCIATED SOFTWARE MAY NOT WORK PROPERLY IF THIS FILE IS ALTERED.
-->
<Certificate xmlns="https://eagle.to/2011/harpy"
             xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
             xmlns:xsd="http://www.w3.org/2001/XMLSchema">
  <Protocol>None</Protocol>
  <Vendor>Mistachkin Systems</Vendor>
  <Id>bbe901ce-bae8-4b6e-b6c3-5b302bf7960a</Id>
  <HashAlgorithm>SHA512</HashAlgorithm>
  <EntityType>Script</EntityType>
  <TimeStamp>2017-07-01T03:45:08.9665235Z</TimeStamp>
  <Duration>-1.00:00:00</Duration>
  <Key>0x9559f6017247e3e2</Key>
  <Signature>
    f3m2jozpHjOj2qHzTQvMd3dNE5uV25R39vWe+y13fZDVjN2+JA6SXp5nxm9e61xaaGuT3DfAdEb8
    bky2kQroA/GRjyTtGOea6JEZDH4oZdnZbVtKQVDZwPuTPQxWhIc8zDBmWZBfokzWMJ8LZgb0oOxX
    H7bi674LdKaOv0Dxd9YUZxA/IAgD52JZ1J4qbcPyluuV/bRGJ+gxEsBiOzGV5fKy6JuobG9aMiw2
    0UKF3GJj97KwPH42n0fOGy6C8QydKNCuHZa4TCLEvW3QMQMzrjYl1cYt91CFxF/jGIOWxr5j5I6m
    jV2mtahmm/MMl4WqvdvG+bVZgr4GjkALiINp+HIKV9VQtVdtD5BH3BdOUhHr0+YOuXO5bPuBmREI
    GoVNli09XMrv71SoDAWifrzp7qvP9/g3XxKVSHtmmdh/DB5bPKMbtYPT1TQdtr8E9VBtefNXzTzI
    ltB0lwix0eLbcs2yTOt0F0eR2IRPAqhNjHNJPTLm7FSl8LXzuN04pnYdBIzW7w78UlRADs3PwoUd
    9MMlI9jTNpwYGvTmnR8Lz3JHdFEgDcIzI+9AVtfatWIK1qLsUq9WOnYR/1TWCRUblBk/JtEq4J0c
    H9kgzmN/7UMKs9zFL5pSuhdEPH981BPhTmaNO0tLbDW/oOc9gOfCDUa2Q9JU9BDt5k3FkpfMasLM
    +BqhY8JmS8YmFIrRX1ZdXddQVglDVGpNJmGlUpMhbtiuSzuIlqU8AcZHzhJGPBD/9Y7YnHcJn6Ac
    Ctp67AjPX5FMy3YMMWbKlnA5JAzQSTLt7Z01/+aCV5SQqpGtAKh6VD1Vi4OC550VUBdiZw+/RPsB
    3LMM1Yua8gmEEjcxO/OSLpjoasBz/Ul7smn33NudPxcK2GWQOVBxojeFE9BpPInuH6slqoBoi3e+
    gFaPuD9fIaUFiN7HhvJig+75dAb1CmSjRbwEGEijCh+72YntE1IVODNAzYZ/b8ftKqSyWISB87rK
    +xeiuVzTnSGwn4TQ5q+VByfkDAolI4RIV2a6H6lHZESNOayGaMQ+AqHkNKbST0Yobat2qyfAaSFe
    shZOr/2wAGzYzE9smcjY52aztGrHGM9L+cOvkHV9P8iLh6dG0nKTBimCwXWEiAVmV3b2sFlP6Dil
    2zgk0W24fvMyjuhG4uz0Zauui57spaY8C4XBIcsGt3DlYq6n8vqzovbMmau9kIAULLHChF6UzXbt
    5D/k6u04Z+/ct6P4TZhqaZe1uMAQfADfjqBngWQDnAK7JNsRcXW8gsNnRrXNeG7Ie2AgdIg4U3kM
    9apiOiPHX4pU8PMrEAqIfvDDTczrXDy5YT1nwZbpi/F3EF0oBUUqEpTpW6g0N89JtvPM/oJaCF3k
    hvAUEjWbfvj4Gz+apyYMr/up6fEOdm/reiYRMT+EFvHpT1CQUAYHis68YTcy3DEInqswuHvZEPUe
    gtf0gxzBJnAsgxtF7tQIkDE78gN8PWTZXmx0gW1peb9NjAljNAfWD25mxk9LirzGPfsnvwJfaxTy
    ivvId8H6vgrEyzGXnYGYbSxgAzNR7nQBZbx8DyOHn7ZADlhy76HTkZ6170PwrQ8FidI3pQjxzr7X
    T6KJmMv5P5KXLERbSMsaNyOprK4G0sPeUAGo55+wiVRJ7xlv0vCKKw5sfhLbP/a/v+p3iJrXOwDQ
    VnNnik5/+6u1rC6G0puiips5qT2qwzXCir+fgPfSNDkn/zxsupBEYZ9W7e9QSpMVgbexpp+YYED0
    9DxFjvaldmiCkObzbF+knhpzlxQs3CeK5IWxwSjaFxCTPCBt2AwL1OHq9hbo52fCkxfsge1WE5ao
    ssLm2vavawH7QLPH6IppGaDC71x/qbj4UmRce2C9vBS5z2ZRh3EKWmnOuvYiFLy0svk+Q0XKMbdn
    3HZ/z6Fws437cXMRyPkFz0LHDsEv041zmTS2F8vkywRulVz5jcVssLHZbC4Pt5KAZ4dcAKWCfg/m
    2/HVsbJUUKTFEEvlNHldHulE0b49yasmgtqB4JXamLN9AELA+QarxeXozxOXu3L5B0IcYvhz4iwl
    LcBshOf/0tTW9/3FDuDFL0U+2N6qgV6C7R7O/6b/qfZotDidUyPoflHfFjOyTuv74WEs4DXgVfO9
    0ARG4avOfaS7Ld9B86KoN2dUtLL9G+43R+5vbYgCTMd6DuYSCZgJ4dh+aYomVu2SMdieOWVjk9oA
    +XmQKFoiP4Au1TaiPQxAHriUIm+bdogVJqx9WQoPw/sgvZkXtwkyCCHs3f15waBq24fOC0KewD4d
    oyQTa8o7JORFhvvet5p4cV0cablF1s7JzZCkB/crwHLJxoALBCNZDLF8gmFidk5MIMjDyx2Ny+5H
    a1WZ80kmaed7eW8tICgNwFvpqE23oXCVGVzx7MuLotovqRl78z0tA6S2rdpTxkKv8Psu1aP9RPpg
    K6MMKEL2W6WpCMGkrFCK11VJPNZMcH6P7jGdhZjw6fOo36gvOXS36J3geIDymlON3wkCDYz4RiH/
    n3KFcg3ReyIGf3EmpXhN8sRvgN3SiWwvQRTzsQO6XPlIGJS/5vtEwbsbYUWCXoqCC6piaiziMiQc
    9e2zhTW+RCuv0SX3MDC5ZxEGAo4GDyQs2NrIjQyT9/Rhmr+O/rCjXk+MzG3J963xrDsLCY2WOT35
    oCcBhtB5TrJ/Uk0595ouLwKW0UPAdtb971VLSGVw8wyAbBqyWeq9hL5eKUF6zCAPq/LnlE4=
  </Signature>
</Certificate>

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v2
Comment: Eagle Package Repository

iQIcBAABCAAGBQJZVxreAAoJEFAslq9JXcLZgmsP/jCdQ3/yzbpSuU4pKdf4SgT5
iAuRb5hWGkdw/pZfjmY54pXqGSwYBCpobTqBa4m6F4CPpKBCzVakramF/4FAFNc7
iEM8odXntWuH7kDjR1T4DoYSOHiDa420/Xhnm0XglxyBBINlrLJlw4ZBPcm74VQm
Uq+YOh8zLG1JzM8m86eBCyTeWV+5ofnrkclmqrJQArOAJhn4OMtIxPVHJuBB9x5a
YzD9kYBW/+qsZAkBWZxEX7ezB5F8krk0P1O4MVEr0UxPD5DD0RJDRUhR9HdLMaHw
Z5zqOIjAo89hm0zKc1Q7rigdMODl/H0NoZnhU0rn1PfZ2WqRwhq/M9uf96CSxFE1
j1EiLHM597Y5yG34mzshx5J2pg+83INMlRZQe9CCTsO9nWZd5sMO46in6hRB95Tz
KLp1tJQ8d4Zn1rglmQMdDjLfnQbUhEEYSx0NKLu2JqH01mGrGmiyG60pQa/UQhKZ
mqrEBEqMB301/lvvF7u75I255M/kQiiDLCiHZIqwFguF8rPVfI+ePELBSJnkGOev
fC0vfHdMAkTxArlGc347x8aE5VO8cBmmseyadKhNK3yNWCme29TrWXJC1y7z0EXA
WprzAa8M54LbquVneUDbI9mOEDzYqAh86r6e+EApROw37xEN0+HWN7lOvwOcg5MN
QCiuSgwzvpk4lKtkzaDl
=ZMhV
-----END PGP SIGNATURE-----