cfad47cfa3/t3compiler/tads3/test/data/propset-errors.t

4b825dc642cb6eb9a060e54bf8d69288fbee4904cfad47cfa334b206c65f22086bcc5d63e6f70944
1
#include <tads.h>
2
3
myObj: object
4
    p1 = 'hello'
5
6
    propertyset 'test1*' (x,,y)
7
    {
8
        p2() { return 'foo'; }
9
    }
10
    propertyset 'test2*' (x*y)
11
    {
12
        p3() { return 'bar'; }
13
    }
14
    propertyset 'test3*' (x,)
15
    {
16
        p4() { return 'blah'; }
17
    }
18
    propertyset 'test4*' (,x)
19
    {
20
        p5() { return 'blech'; }
21
    }
22
;
23
24
main(args)
25
{
26
    "myObj.p1 = <<myObj.p1>>\n";
27
    "myObj.p2DobjTake = <<myObj.p2DobjTake>>\n";
28
    "myObj.p3DobjTake = <<myObj.p3DobjTake>>\n";
29
    "myObj.p4 = <<myObj.p4>>\n";
30
31
    myObj.verDobjTake(123);
32
    myObj.verDobjDrop(987);
33
    myObj.verDobjPutIn(45, 67);
34
    myObj.verDobjPutOn(78, 89, 91);
35
36
    myObj.verIobjTake(1, 2);
37
    myObj.verIobjDrop(3, 4);
38
    myObj.verIobjPutIn(5, 6, 7);
39
    myObj.verIobjPutOn(8, 9, 10, 11);
40
41
    myObj.dobjTake(111);
42
    myObj.dobjDrop(222);
43
    myObj.dobjPutIn(333, 444);
44
    myObj.dobjPutOn(555, 666, 777);
45
}