File: interleave.td

package info (click to toggle)
llvm-toolchain-15 1%3A15.0.6-4
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 1,554,644 kB
  • sloc: cpp: 5,922,452; ansic: 1,012,136; asm: 674,362; python: 191,568; objc: 73,855; f90: 42,327; lisp: 31,913; pascal: 11,973; javascript: 10,144; sh: 9,421; perl: 7,447; ml: 5,527; awk: 3,523; makefile: 2,520; xml: 885; cs: 573; fortran: 567
file content (98 lines) | stat: -rw-r--r-- 2,722 bytes parent folder | download | duplicates (19)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
// RUN: llvm-tblgen %s | FileCheck %s
// RUN: not llvm-tblgen -DERROR1 %s 2>&1 | FileCheck --check-prefix=ERROR1 %s

defvar EmptyList = []<string>;
defvar OneList = ["hello"];
defvar StringList = ["foo", "bar", "zoo", "snork", "quux"];
defvar IntList = [0, 1, 2, 3, 4, 5, 6, 7];
defvar BitsList = [ {0, 1, 0}, {1, 1, 1}, {0, 0, 1} ];
defvar BitList = [0, 1, 1, 0, 1]<bit>;

class Ishify<list<string> words> {
  list<string> ret = !foreach(w, words, w # "ify");
}

// CHECK: def Rec1
// CHECK:   Test1 = "";
// CHECK:   Test2 = "hello";
// CHECK:   Test3 = "foobarzoosnorkquux";
// CHECK:   Test4 = "foo, bar, zoo, snork, quux";
// CHECK:   Test5 = "foo & bar & zoo & snork & quux & grits";

def Rec1 {
  string Test1 = !interleave(EmptyList, "/");
  string Test2 = !interleave(OneList, ":");
  string Test3 = !interleave(StringList, "");
  string Test4 = !interleave(StringList, ", ");
  string Test5 = !interleave(!listconcat(StringList, ["grits"]), " & ");
}

// CHECK: def Rec2
// CHECK:   Test1 = "01234567";
// CHECK:   Test2 = "0, 1, 2, 3, 4, 5, 6, 7";
// CHECK:   Test3 = "0 & 1 & 2 & 3 & 4 & 5 & 6 & 7 & 42";

def Rec2 {
  string Test1 = !interleave(IntList, "");
  string Test2 = !interleave(IntList, ", ");
  string Test3 = !interleave(!listconcat(IntList, [42]), " & ");
}

// CHECK: def Rec3
// CHECK:   Test1 = "271";
// CHECK:   Test2 = "2, 7, 1";
// CHECK:   Test3 = "2 & 7 & 1 & 0";

def Rec3 {
  string Test1 = !interleave(BitsList, "");
  string Test2 = !interleave(BitsList, ", ");
  string Test3 = !interleave(!listconcat(BitsList, [ {0, 0, 0} ]), " & ");
}

// CHECK: def Rec4
// CHECK:   Test1 = "01101";
// CHECK:   Test2 = "0, 1, 1, 0, 1";
// CHECK:   Test3 = "0 and 1 and 1 and 0 and 1 and 1";

def Rec4 {
  string Test1 = !interleave(BitList, "");
  string Test2 = !interleave(BitList, ", ");
  string Test3 = !interleave(!listconcat(BitList, [1]), " and ");
}

// CHECK: def Rec5
// CHECK:   Colors = ["red", "green", "yellow"];
// CHECK:   ColorList = "redify, greenify, yellowify";

def Rec5 {
  list<string> Colors = ["red", "green", "yellow"];
  string ColorList = !interleave(Ishify<Colors>.ret, ", ");
}

// CHECK: def Rec6
// CHECK:   code OperatorList = [{+, -, *, /, ?:, ;}];

def Rec6 {
  list<string> Operators = ["+", "-", "*", "/", "?:"];
  code OperatorList = !interleave(!listconcat(Operators, [[{;}]]), ", ");
}

// CHECK: def Rec7
// CHECK:   str = "foo/bar/zoo";

def Rec7 {
  string foo = "foo";
  string zoo = "oops, not zoo";
  string str = !interleave([foo, "bar", zoo], "/");
  let zoo = "zoo";
}

#ifdef ERROR1
def op;

// ERROR1: expected list of string, int, bits, or bit; got value of type

def Rec6 {
  string Bad = !interleave([(op), (op "hello")], " = ");
}
#endif