!636

!standard functions

!1000346 // "case" as a variable name

!class _javax 19

main {

  static Class solver;

  psvm {

    solver = hotwire("#704"); // embed solver!

    set(solver, "testJava", false);

    new Learner lNumFiles;

    File dir = makeTempDirectory();

    for (int i = 0; i < 5; i++) {

      create(dir, "file" + (i+1));

      String in = ls(dir.getPath());

      Integer out = i+1;

      lNumFiles.learn(in, out);

    }

    lNumFiles.done();

    String home = System.getProperty("user.home");

    System.out.println("Files in home directory (" + home + "): " + lNumFiles.processIn(ls(home)));

  }

  static File makeTempDirectory() {

    return _javax.TempDirMaker_make();

  }

  static class Learner {

    new StringBuilder buf;

    int count;

    Object case;

    void learn(String in, Object out) {

      buf.append("in: " + quote(in) + "\n");

      buf.append("out: " + quote(String.valueOf(out)) + "\n");

      if (++count == 2) buf.append("--\n");

    }

    void done() {

      case = call(solver, "parse", buf.toString());

      call(solver, "calculate", case);

    }

    Object processIn(String in) {

      return call(case, "processIn", in);

    }

  }

  static void create(File dir, String name) ctex {

    saveTextFile(new File(dir, name).getPath(), "");

  }

  static String run(String cmd) ctex {

    return _javax.backtick(cmd);

  }

  static String ls(String dir) {

    return run("ls " + dir);

  }

}