OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [binutils-2.18.50/] [gas/] [testsuite/] [gas/] [ia64/] [opc-m.pl] - Blame information for rev 816

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 38 julius
print ".text\n\t.type _start,@", "function\n_start:\n\n";
2
 
3
@ldhint = ( "", ".nt1", ".nta" );
4
@ldspec = ( "", ".s", ".a", ".sa", ".c.clr", ".c.nc" );
5
@sthint = ( "", ".nta" );
6
 
7
$i = 0;
8
 
9
# Integer Load
10
 
11
foreach $s ( "1", "2", "4", "8" ) {
12
  foreach $e (@ldspec, ".bias", ".acq", ".c.clr.acq") {
13
    foreach $l (@ldhint) {
14
      print "\tld${s}${e}${l} r4 = [r5]\n";
15
      print "\tld${s}${e}${l} r4 = [r5], r6\n";
16
      print "\tld${s}${e}${l} r4 = [r5], ", $i - 256, "\n";
17
      $i = ($i + 13) % 512;
18
    }
19
    print "\n";
20
  }
21
}
22
 
23
# Integer Fill
24
 
25
for $l (@ldhint) {
26
  print "\tld8.fill${l} r4 = [r5]\n";
27
  print "\tld8.fill${l} r4 = [r5], r6\n";
28
  print "\tld8.fill${l} r4 = [r5], ", $i - 256, "\n";
29
  $i = ($i + 13) % 512;
30
}
31
print "\n";
32
 
33
# Integer Store
34
 
35
foreach $s ("1", "2", "4", "8", "1.rel", "2.rel", "4.rel", "8.rel", "8.spill") {
36
  for $l (@sthint) {
37
    print "\tst${s}${l} [r4] = r5\n";
38
    print "\tst${s}${l} [r4] = r5, ", $i - 256, "\n";
39
    $i = ($i + 13) % 512;
40
  }
41
  print "\n";
42
}
43
 
44
# Floating Point Load
45
 
46
foreach $s ( "fs", "fd", "f8", "fe" ) {
47
  foreach $e (@ldspec) {
48
    foreach $l (@ldhint) {
49
      print "\tld${s}${e}${l} f4 = [r5]\n";
50
      print "\tld${s}${e}${l} f4 = [r5], r6\n";
51
      print "\tld${s}${e}${l} f4 = [r5], ", $i - 256, "\n";
52
      $i = ($i + 13) % 512;
53
    }
54
    print "\n";
55
  }
56
}
57
 
58
# Floating Point Fill
59
 
60
for $l (@ldhint) {
61
  print "\tldf.fill${l} f4 = [r5]\n";
62
  print "\tldf.fill${l} f4 = [r5], r6\n";
63
  print "\tldf.fill${l} f4 = [r5], ", $i - 256, "\n";
64
  $i = ($i + 13) % 512;
65
}
66
print "\n";
67
 
68
# Floating Point Store
69
 
70
foreach $s ( "fs", "fd", "f8", "fe", "f.spill" ) {
71
  for $l (@sthint) {
72
    print "\tst${s}${l} [r4] = f5\n";
73
    print "\tst${s}${l} [r4] = f5, ", $i - 256, "\n";
74
    $i = ($i + 13) % 512;
75
  }
76
  print "\n";
77
}
78
 
79
# Floating Point Load Pair
80
 
81
foreach $s ( "fps", "fpd", "fp8" ) {
82
  foreach $e (@ldspec) {
83
    foreach $l (@ldhint) {
84
      print "\tld${s}${e}${l} f4, f5 = [r5]\n";
85
      print "\tld${s}${e}${l} f4, f5 = [r5], ", ($s eq "fps" ? 8 : 16), "\n";
86
    }
87
    print "\n";
88
  }
89
}
90
 
91
# Line Prefetch
92
 
93
@lfhint = ( "", ".nt1", ".nt2", ".nta" );
94
 
95
foreach $e ( "", ".excl" ) {
96
  foreach $f ( "", ".fault" ) {
97
    foreach $h (@lfhint) {
98
      print "\tlfetch${f}${e}${h} [r4]\n";
99
      print "\tlfetch${f}${e}${h} [r4], r5\n";
100
      print "\tlfetch${f}${e}${h} [r4], ", $i - 256, "\n";
101
      $i = ($i + 13) % 512;
102
    }
103
    print "\n";
104
  }
105
}
106
 
107
# Compare and Exchange
108
 
109
foreach $s ( "1", "2", "4", "8" ) {
110
  foreach $e ( ".acq", ".rel" ) {
111
    foreach $h (@ldhint) {
112
      print "\tcmpxchg${s}${e}${h} r4 = [r5], r6, ar.ccv\n";
113
    }
114
    print "\n";
115
  }
116
}
117
 
118
# Exchange
119
 
120
foreach $s ( "1", "2", "4", "8" ) {
121
  foreach $h (@ldhint) {
122
    print "\txchg${s}${h} r4 = [r5], r6\n";
123
  }
124
  print "\n";
125
}
126
 
127
# Fetch and Add
128
 
129
$i = 0;
130
@inc3 = ( -16, -8, -4, -1, 1, 4, 8, 16 );
131
foreach $s ( "4.acq", "8.acq", "4.rel", "8.rel" ) {
132
  foreach $h (@ldhint) {
133
    print "\tfetchadd${s}${h} r4 = [r5], ", $inc3[$i], "\n";
134
    $i = ($i + 1) % 8;
135
  }
136
  print "\n";
137
}
138
 
139
# Get/Set FR
140
 
141
foreach $e ( ".sig", ".exp", ".s", ".d" ) {
142
  print "\tsetf${e} f4 = r5\n";
143
}
144
print "\n";
145
 
146
foreach $e ( ".sig", ".exp", ".s", ".d" ) {
147
  print "\tgetf${e} r4 = f5\n";
148
}
149
print "\n";
150
 
151
# Speculation and Advanced Load Checkso
152
 
153
print <<END
154
        chk.s.m r4, _start
155
        chk.s f4, _start
156
        chk.a.nc r4, _start
157
        chk.a.clr r4, _start
158
        chk.a.nc f4, _start
159
        chk.a.clr f4, _start
160
 
161
        invala
162
        fwb
163
        mf
164
        mf.a
165
        srlz.d
166
        srlz.i
167
        sync.i
168
        nop.m 0
169
        nop.i 0
170
 
171
        { .mii; alloc r4 = ar.pfs, 2, 10, 16, 16 }
172
 
173
        { .mii; flushrs }
174
        { .mii; loadrs }
175
 
176
        invala.e r4
177
        invala.e f4
178
 
179
        fc r4
180
        ptc.e r4
181
 
182
        break.m 0
183
        break.m 0x1ffff
184
 
185
        nop.m 0
186
        break.m 0x1ffff
187
 
188
        probe.r r4 = r5, r6
189
        probe.w r4 = r5, r6
190
 
191
        probe.r r4 = r5, 0
192
        probe.w r4 = r5, 1
193
 
194
        probe.r.fault r3, 2
195
        probe.w.fault r3, 3
196
        probe.rw.fault r3, 0
197
 
198
        itc.d r8
199
        itc.i r9
200
 
201
        sum 0x1234
202
        rum 0x5aaaaa
203
        ssm 0xffffff
204
        rsm 0x400000
205
 
206
        ptc.l r4, r5
207
        ptc.g r4, r5
208
        ptc.ga r4, r5
209
        ptr.d r4, r5
210
        ptr.i r4, r5
211
 
212
        thash r4 = r5
213
        ttag r4 = r5
214
        tpa r4 = r5
215
        tak r4 = r5
216
 
217
END
218
;

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.