!7

static File packageModules(Standalone_OSWithSplashScreens s, O... _) {
  File outJar = javaxArtifactsDir(replace(s.programName, " ", "-") + ".jar");
  ProgramPackager p = new (outJar, #1025015);
  optPar Cl<S> excludeSnippets;
  optPar Cl<S> extraSnippets;
  p.extraSnippets = concatLists(extraSnippets, map beforeSlash_orAll(concatLists(oddEntries(s.mainModules), oddEntries(s.helperModules))));
  print("Have extra snippets: " + p.extraSnippets);
  p.excludeSnippets = excludeSnippets != null ? asSet(excludeSnippets)
    : programPackager_standardExcludedSnippets();
  p.copyAdditionalFiles = voidfunc(ZipOutputStream jar) {
    addTextFileToZip(jar, "start.struct", struct(s));
  };
  p.includeBinaries = boolPar includeBinaries(_);
  p.includeCompiler = boolPar includeCompiler(_);
  p.includeSources = boolPar includeSources(_);
  p.go();
  ret outJar;
}

Began life as a copy of #1024623