File: range-lists.td

package info (click to toggle)
llvm-toolchain-14 1%3A14.0.6-12
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 1,496,180 kB
  • sloc: cpp: 5,593,972; ansic: 986,872; asm: 585,869; python: 184,223; objc: 72,530; lisp: 31,119; f90: 27,793; javascript: 9,780; pascal: 9,762; sh: 9,482; perl: 7,468; ml: 5,432; awk: 3,523; makefile: 2,538; xml: 953; cs: 573; fortran: 567
file content (81 lines) | stat: -rw-r--r-- 2,357 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
// RUN: llvm-tblgen %s | FileCheck %s
// XFAIL: vg_leak

// This file has tests for range lists and range pieces. Some use the
// deprecated '-' range punctuation just to be sure it still works.

// These are tests for bits ranges.

def bit_range_hyphen {
  bits<16> field1;
  let field1{15, 14, 13, 12} = {1, 0, 1, 0};
  let field1{11-8} = {1, 0, 1, 1};
  let field1{+7-4} = {1, 1, 0, 0};
  let field1{+3-+0} = {1, 1, 0, 1};
  bit hyphen_field1_ok = !eq(field1, 0xABCD);
}

def bit_range_dotdotdot {
  bits<16> field1;
  let field1{15, 14, 13, 12} = {1, 0, 1, 0};
  let field1{11...8} = {1, 0, 1, 1};
  let field1{+7...4} = {1, 1, 0, 0};
  let field1{+3...+0} = {1, 1, 0, 1};
  bit dotdotdot_field1_ok = !eq(field1, 0xABCD);
}

if !eq(bit_range_hyphen.field1, bit_range_dotdotdot.field1) then
  def bit_range_ok {}
else
  def bit_range_not_ok {}

// These are tests for lists.

def list_range_hyphen {
  list<string> field1 = ["foo", "bar", "baz", "snork", "quux", "quuux",
                         "bazola", "ztesch", "bletch", "flarp"];
  list<string> subfielda = field1[0, 1, 2, 3];
  list<string> subfieldb = field1[4-5];
  list<string> subfieldc = field1[+6-7];
  list<string> subfieldd = field1[+8-+9];
  bit hyphen_subfields_ok = !and(!eq(subfieldb[0], "quux"),
                                 !eq(subfieldd[1], "flarp"));
}

def list_range_dotdotdot {
  list<string> field1 = ["foo", "bar", "baz", "snork", "quux", "quuux",
                         "bazola", "ztesch", "bletch", "flarp"];
  list<string> subfielda = field1[0, 1, 2, 3];
  list<string> subfieldb = field1[4...5];
  list<string> subfieldc = field1[+6...7];
  list<string> subfieldd = field1[+8...+9];
  bit dotdotdot_subfields_ok = !and(!eq(subfieldb[0], "quux"),
                                    !eq(subfieldd[1], "flarp"));
}

if !eq(!head(list_range_hyphen.subfieldd),
       !head(list_range_dotdotdot.subfieldd)) then
  def list_range_ok {}
else
  def list_range_not_ok {}

// This is a test of foreach.

foreach i = {0-3} in 
  foreach j = {4...5} in
    def eachrec#i#j {
      int fi = i;
      int fj = j;
    }

//CHECK: bit dotdotdot_field1_ok = 1
//CHECK: bit hyphen_field1_ok = 1
//CHECK: def bit_range_ok {

//CHECK: def eachrec04 {
//CHECK: def eachrec35 {

//CHECK: bit dotdotdot_subfields_ok = 1
//CHECK: bit hyphen_subfields_ok = 1
//CHECK: def list_range_ok {