-- if (fseek(F, 0, SEEK_END) == 0) {
-- flen = ftell(F);
-- s = (char *)xmalloc(flen+4);
-- fseek(F, 0, SEEK_SET);
-- i = 1 + fread(s+1, 1, flen, F);
+- if (fseek(from_file, 0, SEEK_END) == 0) {
+- flen = ftell(from_file);
+- s = xmalloc(flen + 4);
+- fseek(from_file, 0, SEEK_SET);
+- i = 1 + fread(s + 1, 1, flen, from_file);