#       future use, it should be an empty list.
  #
  proc createRepositoryScript {
          serverId versionId language version platform fileNames options } {
    ::PackageRepository::verifyServerId $serverId
    ::PackageDownloader::verifyVersionId $versionId
    ::PackageDownloader::verifyLanguageAndVersion $language $version isClient

    if {$isClient} then {
      error "cannot create repository script for client"
    }

    #
    # HACK: Automatic detection of the platform must be disabled here, since
    #       the generated repository script may want it performed late-bound,
    #       i.e. within the generated script block itself.
    #
    if {[string length $platform] > 0} then {
      ::PackageDownloader::verifyPlatform $platform platform
    }

    set prologue ""

    if {[string length $serverId] > 0} then {
      append prologue "  ::PackageDownloader::useServerId " $serverId \n
    }

    variable checkoutDirectory
    variable fossilCommitCommand
    variable fossilCommitPattern
    variable fossilFileNameOnly

    ::PackageDownloader::verifyPackageName $package
    ::PackageDownloader::verifyPackagePatchLevel $patchLevel

    ::PackageDownloader::verifyLanguageAndVersion \
        [string tolower $language] $version isClient

    if {$isClient} then {
      error "cannot commit package files for client"
    }

    fossilMustBeInstalled
    verifyCheckoutDirectory