[docs] Add LICENSE.txt to the root of the mono-repo
[llvm-project.git] / clang / test / SemaCXX / borland-extensions.cpp
bloba869f4ee60e90d83238da37a8486ad57a60793e5
1 // RUN: %clang_cc1 %s -fsyntax-only -fborland-extensions -triple x86_64-linux-gnu -verify
2 // RUN: %clang_cc1 %s -fsyntax-only -fborland-extensions -triple i686-linux-gnu -Werror
4 // Borland extensions
6 // 1. test -fborland-extensions
7 int dummy_function() { return 0; }
9 // 2. test __pascal
10 // expected-warning@+1 {{'_pascal' calling convention is not supported for this target}}
11 int _pascal f2();
13 // expected-warning@+1 {{'__pascal' calling convention is not supported for this target}}
14 float __pascal gi2(int, int);
15 // expected-warning@+1 {{'__pascal' calling convention is not supported for this target}}
16 template<typename T> T g2(T (__pascal * const )(int, int)) { return 0; }
18 struct M {
19 // expected-warning@+1 {{'__pascal' calling convention is not supported for this target}}
20 int __pascal addP();
21 // expected-warning@+1 {{'__pascal' calling convention is not supported for this target}}
22 float __pascal subtractP();
24 // expected-warning@+1 {{'__pascal' calling convention is not supported for this target}}
25 template<typename T> int h2(T (__pascal M::* const )()) { return 0; }
26 void m2() {
27 int i; float f;
28 i = f2();
29 f = gi2(2, i);
30 f = g2(gi2);
31 i = h2<int>(&M::addP);
32 f = h2(&M::subtractP);
35 // 3. test other calling conventions
36 int _cdecl fa3();
37 // expected-warning@+1 {{'_fastcall' calling convention is not supported for this target}}
38 int _fastcall fc3();
39 // expected-warning@+1 {{'_stdcall' calling convention is not supported for this target}}
40 int _stdcall fd3();
42 // 4. test __uuidof()
43 typedef struct _GUID {
44 unsigned long Data1;
45 unsigned short Data2;
46 unsigned short Data3;
47 unsigned char Data4[ 8 ];
48 } GUID;
50 struct __declspec(uuid("{12345678-1234-1234-1234-123456789abc}")) Foo;
51 struct Data {
52 GUID const* Guid;
55 void t4() {
56 unsigned long data;
58 const GUID guid_inl = __uuidof(Foo);
59 Data ata1 = { &guid_inl};
60 data = ata1.Guid->Data1;