static void readLocally(S progID, S varNames) { readLocally2(mc(), progID, varNames); } static void readLocally(S varNames) { readLocally2(mc(), programID(), varNames); } static void readLocally2(O obj, S varNames) { readLocally2(obj, programID(), varNames); } static int readLocally_stringLength; static new ThreadLocal readLocally2_allDynamic; static new ThreadLocal readLocally2_classFinder; // read a string variable from standard storage // does not overwrite variable contents if there is no file static void readLocally2(O obj, S progID, S varNames) ctex { bool allDynamic = isTrue(getAndClearThreadLocal(readLocally2_allDynamic)); for (S variableName : javaTokC(varNames)) { File textFile = new File(programDir(progID), variableName + ".text"); S value = loadTextFile(textFile); if (value != null) set(main.class, variableName, value); else { File structureFile = new File(programDir(progID), variableName + ".structure"); value = loadTextFile(structureFile); if (value == null) { File structureGZFile = new File(programDir(progID), variableName + ".structure.gz"); if (!structureGZFile.isFile()) ret; //value = loadGZTextFile(structureGZFile); temp InputStream fis = new FileInputStream(structureGZFile); GZIPInputStream gis = newGZIPInputStream(fis); InputStreamReader reader = new InputStreamReader(gis, "UTF-8"); BufferedReader bufferedReader = new BufferedReader(reader); //O o = unstructure_reader(bufferedReader); O o = unstructure_tok(javaTokC_noMLS_onReader(bufferedReader), allDynamic, readLocally2_classFinder!); readLocally_set(obj, variableName, o); ret; } readLocally_stringLength = l(value); if (nempty(value)) readLocally_set(obj, variableName, unstructure(value, allDynamic, readLocally2_classFinder!)); } } } static void readLocally_set(O c, S varName, O value) { O oldValue = get(c, varName); if (oldValue instanceof List && !(oldValue instanceof ArrayList) && value != null) { // Assume it's a synchroList. value = synchroList((L) value); } set(c, varName, value); }