tools/old/processIoCodeFor.io

   1 processIoCodeFor := method(path,
   2     d := Directory clone setPath(path)
   3
   4     processed := d folderNamedCreateIfAbsent("_ioCodeProcessed")
   5
   6     d folderNamed("_ioCode") filesWithExtension(".io") foreach(file,
   7         processed fileNamed(file name) openForUpdating truncateToSize(0) write("__noShuffling__;\n") write(file contents asMessage asString) close
   8     )
   9 )