pidl/tests/parse_idl.pl

14 sub testok($$)
37 testok "test1", "interface test { void Test(); }; ";
38 testok "voidtest", "interface test { int Testx(void); }; ";
41 testok "argtest", "interface test { int Test(int a, long b, uint32 c); }; ";
42 testok "array1", "interface test { int Test(int a[]); };";
43 testok "array2", "interface test { int Test(int a[2]); };";
44 testok "array3", "interface test { int Test(int a[b]); };";
47 testok "ptr1", "interface test { int Test(int *a); };";
48 testok "ptr2", "interface test { int Test(int **a); };";
49 testok "ptr3", "interface test { int Test(int ***a); };";
52 testok "attr1", "[uuid(\"myuuid\"),attr] interface test { int Test(int ***a); };";
53 testok "attr2", "interface test { [public] int Test(); };";
54 testok "attr3", "[attr1] [attr2] interface test { [public] int Test(); };";
55 testok "multfn", "interface test { int test1(); int test2(); };";
56 testok "multif", "interface test { int test1(); }; interface test2 { int test2(); };";
57 testok "tdstruct1", "interface test { typedef struct { } foo; };";
58 testok "tdstruct2", "interface test { typedef struct { int a; } foo; };";
59 testok "tdstruct3", "interface test { typedef struct { int a; int b; } foo; };";
62 testok "struct1", "interface test { struct x { }; };";
63 testok "struct2", "interface test { struct x { int a; }; };";
64 testok "struct3", "interface test { struct x { int a; int b; }; };";
69 testok "tdunion1", "interface test { typedef union { } a; };";
70 testok "tdunion2", "interface test { typedef union { int a; } a; };";
71 testok "union1", "interface test { union a { }; };";
72 testok "union2", "interface test { union x { int a; }; };";
75 testok "typedef1", "interface test { typedef int a; };";
78 testok "tdenum1", "interface test { typedef enum { A=1, B=2, C} a; };";
79 testok "enum1", "interface test { enum a { A=1, B=2, C}; };";
82 testok "nested1", "interface test { struct x { struct { int a; } z; }; };";
83 testok "nested2", "interface test { struct x { struct y { int a; } z; }; };";
84 testok "bitmap1", "interface test { bitmap x { a=1 }; };";
85 testok "unsigned", "interface test { struct x { unsigned short y; }; };";
86 testok "struct-property", "interface test { [public] struct x { short y; }; };";
87 testok "signed", "interface test { struct x { signed short y; }; };";
88 testok "declarg", "interface test { void test(struct { int x; } a); };";
89 testok "structarg", "interface test { void test(struct a b); };";
92 testok "structqual", "interface test { struct x { struct y z; }; };";
93 testok "unionqual", "interface test { struct x { union y z; }; };";
94 testok "enumqual", "interface test { struct x { enum y z; }; };";
95 testok "bitmapqual", "interface test { struct x { bitmap y z; }; };";
96 testok "emptystructdecl", "interface test { struct x; };";
97 testok "emptyenumdecl", "interface test { enum x; };";
98 testok "emptytdstructdecl", "interface test { typedef struct x y; };";
99 testok "import", "import \"foo.idl\";";
100 testok "include", "include \"foo.h\";";
105 testok "importlib", "importlib \"foo.idl\";";
108 testok "import-multiple", "import \"foo.idl\", \"bar.idl\";";
109 testok "include-multiple", "include \"foo.idl\", \"bar.idl\";";
110 testok "empty-struct", "interface test { struct foo { }; }";
111 testok "typedef-double", "interface test { typedef struct foo { } foo; }";
112 testok "cpp-quote", "cpp_quote(\"bla\")";