cfad47cfa3/t3compiler/tads3/test/data/html.t

4b825dc642cb6eb9a060e54bf8d69288fbee4904cfad47cfa334b206c65f22086bcc5d63e6f70944
1
/*
2
 *   HTML output tests
3
 */
4
5
#include "t3.h"
6
#include "tads.h"
7
8
_say_embed(str) { tadsSay(str); }
9
10
class RuntimeError: object
11
    construct(errno, ...) { errno_ = errno; }
12
    display = "Runtime Error: <<errno_>>"
13
    errno_ = 0
14
;
15
16
_main(args)
17
{
18
    try
19
    {
20
        t3SetSay(_say_embed);
21
        main();
22
    }
23
    catch (RuntimeError rte)
24
    {
25
        "\n<<rte.display>>\n";
26
    }
27
}
28
29
function main()
30
{
31
    "HTML mode...\n";
32
33
    "Translations: <b>&lt;&amp;&gt;</b>.\n";
34
35
    "\bDone!\n";
36
}