forked from OSchip/llvm-project
32 lines
690 B
C
32 lines
690 B
C
// RUN: %clang_cc1 -emit-llvm -o - %s -fpascal-strings -fshort-wchar | FileCheck %s
|
|
// rdar: // 8020384
|
|
|
|
extern void abort (void);
|
|
|
|
typedef unsigned short UInt16;
|
|
|
|
typedef UInt16 UniChar;
|
|
|
|
int main(int argc, char* argv[])
|
|
{
|
|
|
|
char st[] = "\pfoo"; // pascal string
|
|
UniChar wt[] = L"\pbar"; // pascal Unicode string
|
|
UniChar wt1[] = L"\p";
|
|
UniChar wt2[] = L"\pgorf";
|
|
|
|
if (st[0] != 3)
|
|
abort ();
|
|
if (wt[0] != 3)
|
|
abort ();
|
|
if (wt1[0] != 0)
|
|
abort ();
|
|
if (wt2[0] != 4)
|
|
abort ();
|
|
|
|
return 0;
|
|
}
|
|
|
|
// CHECK: c"\03\00b\00a\00r\00\00\00"
|
|
// CHECK: c"\04\00g\00o\00r\00f\00\00\00"
|