| | 1 | Files to build: 5 |
| | 2 | symbol_export _main.t -> _main.t3s |
| | 3 | symbol_export resfile.t -> resfile.t3s |
| | 4 | compile _main.t -> _main.t3o |
| | 5 | compile resfile.t -> resfile.t3o |
| | 6 | link -> resfile.t3 |
| | 7 | |
| | 8 | (T3VM) Memory blocks still in use: |
| | 9 | |
| | 10 | Total blocks in use: 0 |
| | 11 | + test\data\resfile.dat (testres.txt) |
| | 12 | |
| | 13 | (T3VM) Memory blocks still in use: |
| | 14 | |
| | 15 | Total blocks in use: 0 |
| | 16 | 1:This is a data file for the 'resfile.t' test. |
| | 17 | 2: |
| | 18 | 3:IMPORTANT NOTE - this file does NOT have the same name as the |
| | 19 | 4:resource that the file loads, because we explicitly set a |
| | 20 | 5:different resource name when we run the resource bundler in |
| | 21 | 6:the test script. That's the whole point of the test, really - |
| | 22 | 7:we want to make sure that we properly load the data from the |
| | 23 | 8:resource embedded in the image file, not from an external OS |
| | 24 | 9:file. |
| | 25 | 10: |
| | 26 | 11:This is just some random data for the test. There's no real |
| | 27 | 12:significance to the data; we just want to make sure that the |
| | 28 | 13:program can read the data and display it. |
| | 29 | 14: |
| | 30 | 15:We'll copy in the text of the resource program itself, to give |
| | 31 | 16:some volume to the data (to ensure we exercise buffer filling |
| | 32 | 17:and so on in the file reader layers). |
| | 33 | 18: |
| | 34 | 19: #charset "us-ascii" |
| | 35 | 20: |
| | 36 | 21: #include <tads.h> |
| | 37 | 22: #include <file.h> |
| | 38 | 23: |
| | 39 | 24: main(args) |
| | 40 | 25: { |
| | 41 | 26: local f; |
| | 42 | 27: |
| | 43 | 28: /* read a resource file */ |
| | 44 | 29: f = File.openTextResource('testres.txt', 'iso-8859-1'); |
| | 45 | 30: |
| | 46 | 31: /* read from the file until done */ |
| | 47 | 32: for (local linenum = 1 ; ; ++linenum) |
| | 48 | 33: { |
| | 49 | 34: local txt; |
| | 50 | 35: |
| | 51 | 36: /* read another line - stop at eof */ |
| | 52 | 37: if ((txt = f.readFile()) == nil) |
| | 53 | 38: break; |
| | 54 | 39: |
| | 55 | 40: /* show it */ |
| | 56 | 41: "<<linenum>>:<<txt>>"; |
| | 57 | 42: } |
| | 58 | 43: |
| | 59 | 44: "\<\<EOF>>\b"; |
| | 60 | 45: } |
| | 61 | 46: |
| | 62 | 47:That's about it for this file. |
| | 63 | 48: |
| | 64 | 49:[end] |
| | 65 | <<EOF>> |
| | 66 | |
| | 67 | |
| | 68 | (T3VM) Memory blocks still in use: |
| | 69 | |
| | 70 | Total blocks in use: 0 |