Subversion Repositories SvarDOS

Rev

Rev 1061 | Rev 1114 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1061 Rev 1064
Line 304... Line 304...
304
    printf("biggest lang block is %u bytes -> allocating a %u bytes buffer\n", biggest_langsz, allocsz);
304
    printf("biggest lang block is %u bytes -> allocating a %u bytes buffer\n", biggest_langsz, allocsz);
305
    fprintf(fd, "/* THIS FILE HAS BEEN GENERATED BY TLUMACZ (PART OF THE SVARLANG LIBRARY) */\r\n");
305
    fprintf(fd, "/* THIS FILE HAS BEEN GENERATED BY TLUMACZ (PART OF THE SVARLANG LIBRARY) */\r\n");
306
    fprintf(fd, "const unsigned short svarlang_memsz = %uu;\r\n", allocsz);
306
    fprintf(fd, "const unsigned short svarlang_memsz = %uu;\r\n", allocsz);
307
    fprintf(fd, "char svarlang_mem[%u] = {\r\n", allocsz);
307
    fprintf(fd, "char svarlang_mem[%u] = {\r\n", allocsz);
308
    for (i = 0; i < refblocksz; i++) {
308
    for (i = 0; i < refblocksz; i++) {
309
      fprintf(fd, "%u", buff[i]);
309
      fprintf(fd, "%u", refblock[i]);
310
      if (i + 1 < refblocksz) fprintf(fd, ",");
310
      if (i + 1 < refblocksz) fprintf(fd, ",");
311
      if ((i & 15) == 15) fprintf(fd, "\r\n");
311
      if ((i & 15) == 15) fprintf(fd, "\r\n");
312
    }
312
    }
313
    fprintf(fd, "};\r\n");
313
    fprintf(fd, "};\r\n");
314
    fclose(fd);
314
    fclose(fd);