* config/tc-w65.c (md_section_align): Fix typo.
[deliverable/binutils-gdb.git] / sim / fr30 / sem.c
CommitLineData
7a3085c1
AC
1// OBSOLETE /* Simulator instruction semantics for fr30bf.
2// OBSOLETE
3// OBSOLETE THIS FILE IS MACHINE GENERATED WITH CGEN.
4// OBSOLETE
5// OBSOLETE Copyright 1996, 1997, 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
6// OBSOLETE
7// OBSOLETE This file is part of the GNU simulators.
8// OBSOLETE
9// OBSOLETE This program is free software; you can redistribute it and/or modify
10// OBSOLETE it under the terms of the GNU General Public License as published by
11// OBSOLETE the Free Software Foundation; either version 2, or (at your option)
12// OBSOLETE any later version.
13// OBSOLETE
14// OBSOLETE This program is distributed in the hope that it will be useful,
15// OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of
16// OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17// OBSOLETE GNU General Public License for more details.
18// OBSOLETE
19// OBSOLETE You should have received a copy of the GNU General Public License along
20// OBSOLETE with this program; if not, write to the Free Software Foundation, Inc.,
21// OBSOLETE 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
22// OBSOLETE
23// OBSOLETE */
24// OBSOLETE
25// OBSOLETE #define WANT_CPU fr30bf
26// OBSOLETE #define WANT_CPU_FR30BF
27// OBSOLETE
28// OBSOLETE #include "sim-main.h"
29// OBSOLETE #include "cgen-mem.h"
30// OBSOLETE #include "cgen-ops.h"
31// OBSOLETE
32// OBSOLETE #undef GET_ATTR
33// OBSOLETE #if defined (__STDC__) || defined (ALMOST_STDC) || defined (HAVE_STRINGIZE)
34// OBSOLETE #define GET_ATTR(cpu, num, attr) CGEN_ATTR_VALUE (NULL, abuf->idesc->attrs, CGEN_INSN_##attr)
35// OBSOLETE #else
36// OBSOLETE #define GET_ATTR(cpu, num, attr) CGEN_ATTR_VALUE (NULL, abuf->idesc->attrs, CGEN_INSN_/**/attr)
37// OBSOLETE #endif
38// OBSOLETE
39// OBSOLETE /* This is used so that we can compile two copies of the semantic code,
40// OBSOLETE one with full feature support and one without that runs fast(er).
41// OBSOLETE FAST_P, when desired, is defined on the command line, -DFAST_P=1. */
42// OBSOLETE #if FAST_P
43// OBSOLETE #define SEM_FN_NAME(cpu,fn) XCONCAT3 (cpu,_semf_,fn)
44// OBSOLETE #undef TRACE_RESULT
45// OBSOLETE #define TRACE_RESULT(cpu, abuf, name, type, val)
46// OBSOLETE #else
47// OBSOLETE #define SEM_FN_NAME(cpu,fn) XCONCAT3 (cpu,_sem_,fn)
48// OBSOLETE #endif
49// OBSOLETE
50// OBSOLETE /* x-invalid: --invalid-- */
51// OBSOLETE
52// OBSOLETE static SEM_PC
53// OBSOLETE SEM_FN_NAME (fr30bf,x_invalid) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
54// OBSOLETE {
55// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
56// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
57// OBSOLETE int UNUSED written = 0;
58// OBSOLETE IADDR UNUSED pc = abuf->addr;
59// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 0);
60// OBSOLETE
61// OBSOLETE {
62// OBSOLETE /* Update the recorded pc in the cpu state struct.
63// OBSOLETE Only necessary for WITH_SCACHE case, but to avoid the
64// OBSOLETE conditional compilation .... */
65// OBSOLETE SET_H_PC (pc);
66// OBSOLETE /* Virtual insns have zero size. Overwrite vpc with address of next insn
67// OBSOLETE using the default-insn-bitsize spec. When executing insns in parallel
68// OBSOLETE we may want to queue the fault and continue execution. */
69// OBSOLETE vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
70// OBSOLETE vpc = sim_engine_invalid_insn (current_cpu, pc, vpc);
71// OBSOLETE }
72// OBSOLETE
73// OBSOLETE return vpc;
74// OBSOLETE #undef FLD
75// OBSOLETE }
76// OBSOLETE
77// OBSOLETE /* x-after: --after-- */
78// OBSOLETE
79// OBSOLETE static SEM_PC
80// OBSOLETE SEM_FN_NAME (fr30bf,x_after) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
81// OBSOLETE {
82// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
83// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
84// OBSOLETE int UNUSED written = 0;
85// OBSOLETE IADDR UNUSED pc = abuf->addr;
86// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 0);
87// OBSOLETE
88// OBSOLETE {
89// OBSOLETE #if WITH_SCACHE_PBB_FR30BF
90// OBSOLETE fr30bf_pbb_after (current_cpu, sem_arg);
91// OBSOLETE #endif
92// OBSOLETE }
93// OBSOLETE
94// OBSOLETE return vpc;
95// OBSOLETE #undef FLD
96// OBSOLETE }
97// OBSOLETE
98// OBSOLETE /* x-before: --before-- */
99// OBSOLETE
100// OBSOLETE static SEM_PC
101// OBSOLETE SEM_FN_NAME (fr30bf,x_before) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
102// OBSOLETE {
103// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
104// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
105// OBSOLETE int UNUSED written = 0;
106// OBSOLETE IADDR UNUSED pc = abuf->addr;
107// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 0);
108// OBSOLETE
109// OBSOLETE {
110// OBSOLETE #if WITH_SCACHE_PBB_FR30BF
111// OBSOLETE fr30bf_pbb_before (current_cpu, sem_arg);
112// OBSOLETE #endif
113// OBSOLETE }
114// OBSOLETE
115// OBSOLETE return vpc;
116// OBSOLETE #undef FLD
117// OBSOLETE }
118// OBSOLETE
119// OBSOLETE /* x-cti-chain: --cti-chain-- */
120// OBSOLETE
121// OBSOLETE static SEM_PC
122// OBSOLETE SEM_FN_NAME (fr30bf,x_cti_chain) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
123// OBSOLETE {
124// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
125// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
126// OBSOLETE int UNUSED written = 0;
127// OBSOLETE IADDR UNUSED pc = abuf->addr;
128// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 0);
129// OBSOLETE
130// OBSOLETE {
131// OBSOLETE #if WITH_SCACHE_PBB_FR30BF
132// OBSOLETE #ifdef DEFINE_SWITCH
133// OBSOLETE vpc = fr30bf_pbb_cti_chain (current_cpu, sem_arg,
134// OBSOLETE pbb_br_type, pbb_br_npc);
135// OBSOLETE BREAK (sem);
136// OBSOLETE #else
137// OBSOLETE /* FIXME: Allow provision of explicit ifmt spec in insn spec. */
138// OBSOLETE vpc = fr30bf_pbb_cti_chain (current_cpu, sem_arg,
139// OBSOLETE CPU_PBB_BR_TYPE (current_cpu),
140// OBSOLETE CPU_PBB_BR_NPC (current_cpu));
141// OBSOLETE #endif
142// OBSOLETE #endif
143// OBSOLETE }
144// OBSOLETE
145// OBSOLETE return vpc;
146// OBSOLETE #undef FLD
147// OBSOLETE }
148// OBSOLETE
149// OBSOLETE /* x-chain: --chain-- */
150// OBSOLETE
151// OBSOLETE static SEM_PC
152// OBSOLETE SEM_FN_NAME (fr30bf,x_chain) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
153// OBSOLETE {
154// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
155// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
156// OBSOLETE int UNUSED written = 0;
157// OBSOLETE IADDR UNUSED pc = abuf->addr;
158// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 0);
159// OBSOLETE
160// OBSOLETE {
161// OBSOLETE #if WITH_SCACHE_PBB_FR30BF
162// OBSOLETE vpc = fr30bf_pbb_chain (current_cpu, sem_arg);
163// OBSOLETE #ifdef DEFINE_SWITCH
164// OBSOLETE BREAK (sem);
165// OBSOLETE #endif
166// OBSOLETE #endif
167// OBSOLETE }
168// OBSOLETE
169// OBSOLETE return vpc;
170// OBSOLETE #undef FLD
171// OBSOLETE }
172// OBSOLETE
173// OBSOLETE /* x-begin: --begin-- */
174// OBSOLETE
175// OBSOLETE static SEM_PC
176// OBSOLETE SEM_FN_NAME (fr30bf,x_begin) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
177// OBSOLETE {
178// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
179// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
180// OBSOLETE int UNUSED written = 0;
181// OBSOLETE IADDR UNUSED pc = abuf->addr;
182// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 0);
183// OBSOLETE
184// OBSOLETE {
185// OBSOLETE #if WITH_SCACHE_PBB_FR30BF
186// OBSOLETE #if defined DEFINE_SWITCH || defined FAST_P
187// OBSOLETE /* In the switch case FAST_P is a constant, allowing several optimizations
188// OBSOLETE in any called inline functions. */
189// OBSOLETE vpc = fr30bf_pbb_begin (current_cpu, FAST_P);
190// OBSOLETE #else
191// OBSOLETE #if 0 /* cgen engine can't handle dynamic fast/full switching yet. */
192// OBSOLETE vpc = fr30bf_pbb_begin (current_cpu, STATE_RUN_FAST_P (CPU_STATE (current_cpu)));
193// OBSOLETE #else
194// OBSOLETE vpc = fr30bf_pbb_begin (current_cpu, 0);
195// OBSOLETE #endif
196// OBSOLETE #endif
197// OBSOLETE #endif
198// OBSOLETE }
199// OBSOLETE
200// OBSOLETE return vpc;
201// OBSOLETE #undef FLD
202// OBSOLETE }
203// OBSOLETE
204// OBSOLETE /* add: add $Rj,$Ri */
205// OBSOLETE
206// OBSOLETE static SEM_PC
207// OBSOLETE SEM_FN_NAME (fr30bf,add) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
208// OBSOLETE {
209// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
210// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
211// OBSOLETE int UNUSED written = 0;
212// OBSOLETE IADDR UNUSED pc = abuf->addr;
213// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
214// OBSOLETE
215// OBSOLETE {
216// OBSOLETE {
217// OBSOLETE BI opval = ADDOFSI (* FLD (i_Ri), * FLD (i_Rj), 0);
218// OBSOLETE CPU (h_vbit) = opval;
219// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
220// OBSOLETE }
221// OBSOLETE {
222// OBSOLETE BI opval = ADDCFSI (* FLD (i_Ri), * FLD (i_Rj), 0);
223// OBSOLETE CPU (h_cbit) = opval;
224// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
225// OBSOLETE }
226// OBSOLETE {
227// OBSOLETE SI opval = ADDSI (* FLD (i_Ri), * FLD (i_Rj));
228// OBSOLETE * FLD (i_Ri) = opval;
229// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
230// OBSOLETE }
231// OBSOLETE {
232// OBSOLETE {
233// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
234// OBSOLETE CPU (h_zbit) = opval;
235// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
236// OBSOLETE }
237// OBSOLETE {
238// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
239// OBSOLETE CPU (h_nbit) = opval;
240// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
241// OBSOLETE }
242// OBSOLETE }
243// OBSOLETE }
244// OBSOLETE
245// OBSOLETE return vpc;
246// OBSOLETE #undef FLD
247// OBSOLETE }
248// OBSOLETE
249// OBSOLETE /* addi: add $u4,$Ri */
250// OBSOLETE
251// OBSOLETE static SEM_PC
252// OBSOLETE SEM_FN_NAME (fr30bf,addi) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
253// OBSOLETE {
254// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
255// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
256// OBSOLETE int UNUSED written = 0;
257// OBSOLETE IADDR UNUSED pc = abuf->addr;
258// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
259// OBSOLETE
260// OBSOLETE {
261// OBSOLETE {
262// OBSOLETE BI opval = ADDOFSI (* FLD (i_Ri), FLD (f_u4), 0);
263// OBSOLETE CPU (h_vbit) = opval;
264// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
265// OBSOLETE }
266// OBSOLETE {
267// OBSOLETE BI opval = ADDCFSI (* FLD (i_Ri), FLD (f_u4), 0);
268// OBSOLETE CPU (h_cbit) = opval;
269// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
270// OBSOLETE }
271// OBSOLETE {
272// OBSOLETE SI opval = ADDSI (* FLD (i_Ri), FLD (f_u4));
273// OBSOLETE * FLD (i_Ri) = opval;
274// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
275// OBSOLETE }
276// OBSOLETE {
277// OBSOLETE {
278// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
279// OBSOLETE CPU (h_zbit) = opval;
280// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
281// OBSOLETE }
282// OBSOLETE {
283// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
284// OBSOLETE CPU (h_nbit) = opval;
285// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
286// OBSOLETE }
287// OBSOLETE }
288// OBSOLETE }
289// OBSOLETE
290// OBSOLETE return vpc;
291// OBSOLETE #undef FLD
292// OBSOLETE }
293// OBSOLETE
294// OBSOLETE /* add2: add2 $m4,$Ri */
295// OBSOLETE
296// OBSOLETE static SEM_PC
297// OBSOLETE SEM_FN_NAME (fr30bf,add2) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
298// OBSOLETE {
299// OBSOLETE #define FLD(f) abuf->fields.sfmt_add2.f
300// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
301// OBSOLETE int UNUSED written = 0;
302// OBSOLETE IADDR UNUSED pc = abuf->addr;
303// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
304// OBSOLETE
305// OBSOLETE {
306// OBSOLETE {
307// OBSOLETE BI opval = ADDOFSI (* FLD (i_Ri), FLD (f_m4), 0);
308// OBSOLETE CPU (h_vbit) = opval;
309// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
310// OBSOLETE }
311// OBSOLETE {
312// OBSOLETE BI opval = ADDCFSI (* FLD (i_Ri), FLD (f_m4), 0);
313// OBSOLETE CPU (h_cbit) = opval;
314// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
315// OBSOLETE }
316// OBSOLETE {
317// OBSOLETE SI opval = ADDSI (* FLD (i_Ri), FLD (f_m4));
318// OBSOLETE * FLD (i_Ri) = opval;
319// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
320// OBSOLETE }
321// OBSOLETE {
322// OBSOLETE {
323// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
324// OBSOLETE CPU (h_zbit) = opval;
325// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
326// OBSOLETE }
327// OBSOLETE {
328// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
329// OBSOLETE CPU (h_nbit) = opval;
330// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
331// OBSOLETE }
332// OBSOLETE }
333// OBSOLETE }
334// OBSOLETE
335// OBSOLETE return vpc;
336// OBSOLETE #undef FLD
337// OBSOLETE }
338// OBSOLETE
339// OBSOLETE /* addc: addc $Rj,$Ri */
340// OBSOLETE
341// OBSOLETE static SEM_PC
342// OBSOLETE SEM_FN_NAME (fr30bf,addc) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
343// OBSOLETE {
344// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
345// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
346// OBSOLETE int UNUSED written = 0;
347// OBSOLETE IADDR UNUSED pc = abuf->addr;
348// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
349// OBSOLETE
350// OBSOLETE {
351// OBSOLETE SI tmp_tmp;
352// OBSOLETE tmp_tmp = ADDCSI (* FLD (i_Ri), * FLD (i_Rj), CPU (h_cbit));
353// OBSOLETE {
354// OBSOLETE BI opval = ADDOFSI (* FLD (i_Ri), * FLD (i_Rj), CPU (h_cbit));
355// OBSOLETE CPU (h_vbit) = opval;
356// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
357// OBSOLETE }
358// OBSOLETE {
359// OBSOLETE BI opval = ADDCFSI (* FLD (i_Ri), * FLD (i_Rj), CPU (h_cbit));
360// OBSOLETE CPU (h_cbit) = opval;
361// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
362// OBSOLETE }
363// OBSOLETE {
364// OBSOLETE SI opval = tmp_tmp;
365// OBSOLETE * FLD (i_Ri) = opval;
366// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
367// OBSOLETE }
368// OBSOLETE {
369// OBSOLETE {
370// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
371// OBSOLETE CPU (h_zbit) = opval;
372// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
373// OBSOLETE }
374// OBSOLETE {
375// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
376// OBSOLETE CPU (h_nbit) = opval;
377// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
378// OBSOLETE }
379// OBSOLETE }
380// OBSOLETE }
381// OBSOLETE
382// OBSOLETE return vpc;
383// OBSOLETE #undef FLD
384// OBSOLETE }
385// OBSOLETE
386// OBSOLETE /* addn: addn $Rj,$Ri */
387// OBSOLETE
388// OBSOLETE static SEM_PC
389// OBSOLETE SEM_FN_NAME (fr30bf,addn) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
390// OBSOLETE {
391// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
392// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
393// OBSOLETE int UNUSED written = 0;
394// OBSOLETE IADDR UNUSED pc = abuf->addr;
395// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
396// OBSOLETE
397// OBSOLETE {
398// OBSOLETE SI opval = ADDSI (* FLD (i_Ri), * FLD (i_Rj));
399// OBSOLETE * FLD (i_Ri) = opval;
400// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
401// OBSOLETE }
402// OBSOLETE
403// OBSOLETE return vpc;
404// OBSOLETE #undef FLD
405// OBSOLETE }
406// OBSOLETE
407// OBSOLETE /* addni: addn $u4,$Ri */
408// OBSOLETE
409// OBSOLETE static SEM_PC
410// OBSOLETE SEM_FN_NAME (fr30bf,addni) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
411// OBSOLETE {
412// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
413// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
414// OBSOLETE int UNUSED written = 0;
415// OBSOLETE IADDR UNUSED pc = abuf->addr;
416// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
417// OBSOLETE
418// OBSOLETE {
419// OBSOLETE SI opval = ADDSI (* FLD (i_Ri), FLD (f_u4));
420// OBSOLETE * FLD (i_Ri) = opval;
421// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
422// OBSOLETE }
423// OBSOLETE
424// OBSOLETE return vpc;
425// OBSOLETE #undef FLD
426// OBSOLETE }
427// OBSOLETE
428// OBSOLETE /* addn2: addn2 $m4,$Ri */
429// OBSOLETE
430// OBSOLETE static SEM_PC
431// OBSOLETE SEM_FN_NAME (fr30bf,addn2) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
432// OBSOLETE {
433// OBSOLETE #define FLD(f) abuf->fields.sfmt_add2.f
434// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
435// OBSOLETE int UNUSED written = 0;
436// OBSOLETE IADDR UNUSED pc = abuf->addr;
437// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
438// OBSOLETE
439// OBSOLETE {
440// OBSOLETE SI opval = ADDSI (* FLD (i_Ri), FLD (f_m4));
441// OBSOLETE * FLD (i_Ri) = opval;
442// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
443// OBSOLETE }
444// OBSOLETE
445// OBSOLETE return vpc;
446// OBSOLETE #undef FLD
447// OBSOLETE }
448// OBSOLETE
449// OBSOLETE /* sub: sub $Rj,$Ri */
450// OBSOLETE
451// OBSOLETE static SEM_PC
452// OBSOLETE SEM_FN_NAME (fr30bf,sub) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
453// OBSOLETE {
454// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
455// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
456// OBSOLETE int UNUSED written = 0;
457// OBSOLETE IADDR UNUSED pc = abuf->addr;
458// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
459// OBSOLETE
460// OBSOLETE {
461// OBSOLETE {
462// OBSOLETE BI opval = SUBOFSI (* FLD (i_Ri), * FLD (i_Rj), 0);
463// OBSOLETE CPU (h_vbit) = opval;
464// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
465// OBSOLETE }
466// OBSOLETE {
467// OBSOLETE BI opval = SUBCFSI (* FLD (i_Ri), * FLD (i_Rj), 0);
468// OBSOLETE CPU (h_cbit) = opval;
469// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
470// OBSOLETE }
471// OBSOLETE {
472// OBSOLETE SI opval = SUBSI (* FLD (i_Ri), * FLD (i_Rj));
473// OBSOLETE * FLD (i_Ri) = opval;
474// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
475// OBSOLETE }
476// OBSOLETE {
477// OBSOLETE {
478// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
479// OBSOLETE CPU (h_zbit) = opval;
480// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
481// OBSOLETE }
482// OBSOLETE {
483// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
484// OBSOLETE CPU (h_nbit) = opval;
485// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
486// OBSOLETE }
487// OBSOLETE }
488// OBSOLETE }
489// OBSOLETE
490// OBSOLETE return vpc;
491// OBSOLETE #undef FLD
492// OBSOLETE }
493// OBSOLETE
494// OBSOLETE /* subc: subc $Rj,$Ri */
495// OBSOLETE
496// OBSOLETE static SEM_PC
497// OBSOLETE SEM_FN_NAME (fr30bf,subc) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
498// OBSOLETE {
499// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
500// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
501// OBSOLETE int UNUSED written = 0;
502// OBSOLETE IADDR UNUSED pc = abuf->addr;
503// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
504// OBSOLETE
505// OBSOLETE {
506// OBSOLETE SI tmp_tmp;
507// OBSOLETE tmp_tmp = SUBCSI (* FLD (i_Ri), * FLD (i_Rj), CPU (h_cbit));
508// OBSOLETE {
509// OBSOLETE BI opval = SUBOFSI (* FLD (i_Ri), * FLD (i_Rj), CPU (h_cbit));
510// OBSOLETE CPU (h_vbit) = opval;
511// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
512// OBSOLETE }
513// OBSOLETE {
514// OBSOLETE BI opval = SUBCFSI (* FLD (i_Ri), * FLD (i_Rj), CPU (h_cbit));
515// OBSOLETE CPU (h_cbit) = opval;
516// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
517// OBSOLETE }
518// OBSOLETE {
519// OBSOLETE SI opval = tmp_tmp;
520// OBSOLETE * FLD (i_Ri) = opval;
521// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
522// OBSOLETE }
523// OBSOLETE {
524// OBSOLETE {
525// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
526// OBSOLETE CPU (h_zbit) = opval;
527// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
528// OBSOLETE }
529// OBSOLETE {
530// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
531// OBSOLETE CPU (h_nbit) = opval;
532// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
533// OBSOLETE }
534// OBSOLETE }
535// OBSOLETE }
536// OBSOLETE
537// OBSOLETE return vpc;
538// OBSOLETE #undef FLD
539// OBSOLETE }
540// OBSOLETE
541// OBSOLETE /* subn: subn $Rj,$Ri */
542// OBSOLETE
543// OBSOLETE static SEM_PC
544// OBSOLETE SEM_FN_NAME (fr30bf,subn) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
545// OBSOLETE {
546// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
547// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
548// OBSOLETE int UNUSED written = 0;
549// OBSOLETE IADDR UNUSED pc = abuf->addr;
550// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
551// OBSOLETE
552// OBSOLETE {
553// OBSOLETE SI opval = SUBSI (* FLD (i_Ri), * FLD (i_Rj));
554// OBSOLETE * FLD (i_Ri) = opval;
555// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
556// OBSOLETE }
557// OBSOLETE
558// OBSOLETE return vpc;
559// OBSOLETE #undef FLD
560// OBSOLETE }
561// OBSOLETE
562// OBSOLETE /* cmp: cmp $Rj,$Ri */
563// OBSOLETE
564// OBSOLETE static SEM_PC
565// OBSOLETE SEM_FN_NAME (fr30bf,cmp) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
566// OBSOLETE {
567// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
568// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
569// OBSOLETE int UNUSED written = 0;
570// OBSOLETE IADDR UNUSED pc = abuf->addr;
571// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
572// OBSOLETE
573// OBSOLETE {
574// OBSOLETE SI tmp_tmp1;
575// OBSOLETE {
576// OBSOLETE BI opval = SUBOFSI (* FLD (i_Ri), * FLD (i_Rj), 0);
577// OBSOLETE CPU (h_vbit) = opval;
578// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
579// OBSOLETE }
580// OBSOLETE {
581// OBSOLETE BI opval = SUBCFSI (* FLD (i_Ri), * FLD (i_Rj), 0);
582// OBSOLETE CPU (h_cbit) = opval;
583// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
584// OBSOLETE }
585// OBSOLETE tmp_tmp1 = SUBSI (* FLD (i_Ri), * FLD (i_Rj));
586// OBSOLETE {
587// OBSOLETE {
588// OBSOLETE BI opval = EQSI (tmp_tmp1, 0);
589// OBSOLETE CPU (h_zbit) = opval;
590// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
591// OBSOLETE }
592// OBSOLETE {
593// OBSOLETE BI opval = LTSI (tmp_tmp1, 0);
594// OBSOLETE CPU (h_nbit) = opval;
595// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
596// OBSOLETE }
597// OBSOLETE }
598// OBSOLETE }
599// OBSOLETE
600// OBSOLETE return vpc;
601// OBSOLETE #undef FLD
602// OBSOLETE }
603// OBSOLETE
604// OBSOLETE /* cmpi: cmp $u4,$Ri */
605// OBSOLETE
606// OBSOLETE static SEM_PC
607// OBSOLETE SEM_FN_NAME (fr30bf,cmpi) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
608// OBSOLETE {
609// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
610// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
611// OBSOLETE int UNUSED written = 0;
612// OBSOLETE IADDR UNUSED pc = abuf->addr;
613// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
614// OBSOLETE
615// OBSOLETE {
616// OBSOLETE SI tmp_tmp1;
617// OBSOLETE {
618// OBSOLETE BI opval = SUBOFSI (* FLD (i_Ri), FLD (f_u4), 0);
619// OBSOLETE CPU (h_vbit) = opval;
620// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
621// OBSOLETE }
622// OBSOLETE {
623// OBSOLETE BI opval = SUBCFSI (* FLD (i_Ri), FLD (f_u4), 0);
624// OBSOLETE CPU (h_cbit) = opval;
625// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
626// OBSOLETE }
627// OBSOLETE tmp_tmp1 = SUBSI (* FLD (i_Ri), FLD (f_u4));
628// OBSOLETE {
629// OBSOLETE {
630// OBSOLETE BI opval = EQSI (tmp_tmp1, 0);
631// OBSOLETE CPU (h_zbit) = opval;
632// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
633// OBSOLETE }
634// OBSOLETE {
635// OBSOLETE BI opval = LTSI (tmp_tmp1, 0);
636// OBSOLETE CPU (h_nbit) = opval;
637// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
638// OBSOLETE }
639// OBSOLETE }
640// OBSOLETE }
641// OBSOLETE
642// OBSOLETE return vpc;
643// OBSOLETE #undef FLD
644// OBSOLETE }
645// OBSOLETE
646// OBSOLETE /* cmp2: cmp2 $m4,$Ri */
647// OBSOLETE
648// OBSOLETE static SEM_PC
649// OBSOLETE SEM_FN_NAME (fr30bf,cmp2) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
650// OBSOLETE {
651// OBSOLETE #define FLD(f) abuf->fields.sfmt_add2.f
652// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
653// OBSOLETE int UNUSED written = 0;
654// OBSOLETE IADDR UNUSED pc = abuf->addr;
655// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
656// OBSOLETE
657// OBSOLETE {
658// OBSOLETE SI tmp_tmp1;
659// OBSOLETE {
660// OBSOLETE BI opval = SUBOFSI (* FLD (i_Ri), FLD (f_m4), 0);
661// OBSOLETE CPU (h_vbit) = opval;
662// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
663// OBSOLETE }
664// OBSOLETE {
665// OBSOLETE BI opval = SUBCFSI (* FLD (i_Ri), FLD (f_m4), 0);
666// OBSOLETE CPU (h_cbit) = opval;
667// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
668// OBSOLETE }
669// OBSOLETE tmp_tmp1 = SUBSI (* FLD (i_Ri), FLD (f_m4));
670// OBSOLETE {
671// OBSOLETE {
672// OBSOLETE BI opval = EQSI (tmp_tmp1, 0);
673// OBSOLETE CPU (h_zbit) = opval;
674// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
675// OBSOLETE }
676// OBSOLETE {
677// OBSOLETE BI opval = LTSI (tmp_tmp1, 0);
678// OBSOLETE CPU (h_nbit) = opval;
679// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
680// OBSOLETE }
681// OBSOLETE }
682// OBSOLETE }
683// OBSOLETE
684// OBSOLETE return vpc;
685// OBSOLETE #undef FLD
686// OBSOLETE }
687// OBSOLETE
688// OBSOLETE /* and: and $Rj,$Ri */
689// OBSOLETE
690// OBSOLETE static SEM_PC
691// OBSOLETE SEM_FN_NAME (fr30bf,and) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
692// OBSOLETE {
693// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
694// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
695// OBSOLETE int UNUSED written = 0;
696// OBSOLETE IADDR UNUSED pc = abuf->addr;
697// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
698// OBSOLETE
699// OBSOLETE {
700// OBSOLETE {
701// OBSOLETE SI opval = ANDSI (* FLD (i_Ri), * FLD (i_Rj));
702// OBSOLETE * FLD (i_Ri) = opval;
703// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
704// OBSOLETE }
705// OBSOLETE {
706// OBSOLETE {
707// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
708// OBSOLETE CPU (h_zbit) = opval;
709// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
710// OBSOLETE }
711// OBSOLETE {
712// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
713// OBSOLETE CPU (h_nbit) = opval;
714// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
715// OBSOLETE }
716// OBSOLETE }
717// OBSOLETE }
718// OBSOLETE
719// OBSOLETE return vpc;
720// OBSOLETE #undef FLD
721// OBSOLETE }
722// OBSOLETE
723// OBSOLETE /* or: or $Rj,$Ri */
724// OBSOLETE
725// OBSOLETE static SEM_PC
726// OBSOLETE SEM_FN_NAME (fr30bf,or) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
727// OBSOLETE {
728// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
729// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
730// OBSOLETE int UNUSED written = 0;
731// OBSOLETE IADDR UNUSED pc = abuf->addr;
732// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
733// OBSOLETE
734// OBSOLETE {
735// OBSOLETE {
736// OBSOLETE SI opval = ORSI (* FLD (i_Ri), * FLD (i_Rj));
737// OBSOLETE * FLD (i_Ri) = opval;
738// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
739// OBSOLETE }
740// OBSOLETE {
741// OBSOLETE {
742// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
743// OBSOLETE CPU (h_zbit) = opval;
744// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
745// OBSOLETE }
746// OBSOLETE {
747// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
748// OBSOLETE CPU (h_nbit) = opval;
749// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
750// OBSOLETE }
751// OBSOLETE }
752// OBSOLETE }
753// OBSOLETE
754// OBSOLETE return vpc;
755// OBSOLETE #undef FLD
756// OBSOLETE }
757// OBSOLETE
758// OBSOLETE /* eor: eor $Rj,$Ri */
759// OBSOLETE
760// OBSOLETE static SEM_PC
761// OBSOLETE SEM_FN_NAME (fr30bf,eor) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
762// OBSOLETE {
763// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
764// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
765// OBSOLETE int UNUSED written = 0;
766// OBSOLETE IADDR UNUSED pc = abuf->addr;
767// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
768// OBSOLETE
769// OBSOLETE {
770// OBSOLETE {
771// OBSOLETE SI opval = XORSI (* FLD (i_Ri), * FLD (i_Rj));
772// OBSOLETE * FLD (i_Ri) = opval;
773// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
774// OBSOLETE }
775// OBSOLETE {
776// OBSOLETE {
777// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
778// OBSOLETE CPU (h_zbit) = opval;
779// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
780// OBSOLETE }
781// OBSOLETE {
782// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
783// OBSOLETE CPU (h_nbit) = opval;
784// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
785// OBSOLETE }
786// OBSOLETE }
787// OBSOLETE }
788// OBSOLETE
789// OBSOLETE return vpc;
790// OBSOLETE #undef FLD
791// OBSOLETE }
792// OBSOLETE
793// OBSOLETE /* andm: and $Rj,@$Ri */
794// OBSOLETE
795// OBSOLETE static SEM_PC
796// OBSOLETE SEM_FN_NAME (fr30bf,andm) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
797// OBSOLETE {
798// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
799// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
800// OBSOLETE int UNUSED written = 0;
801// OBSOLETE IADDR UNUSED pc = abuf->addr;
802// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
803// OBSOLETE
804// OBSOLETE {
805// OBSOLETE SI tmp_tmp;
806// OBSOLETE tmp_tmp = ANDSI (GETMEMSI (current_cpu, pc, * FLD (i_Ri)), * FLD (i_Rj));
807// OBSOLETE {
808// OBSOLETE {
809// OBSOLETE BI opval = EQSI (tmp_tmp, 0);
810// OBSOLETE CPU (h_zbit) = opval;
811// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
812// OBSOLETE }
813// OBSOLETE {
814// OBSOLETE BI opval = LTSI (tmp_tmp, 0);
815// OBSOLETE CPU (h_nbit) = opval;
816// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
817// OBSOLETE }
818// OBSOLETE }
819// OBSOLETE {
820// OBSOLETE SI opval = tmp_tmp;
821// OBSOLETE SETMEMSI (current_cpu, pc, * FLD (i_Ri), opval);
822// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
823// OBSOLETE }
824// OBSOLETE }
825// OBSOLETE
826// OBSOLETE return vpc;
827// OBSOLETE #undef FLD
828// OBSOLETE }
829// OBSOLETE
830// OBSOLETE /* andh: andh $Rj,@$Ri */
831// OBSOLETE
832// OBSOLETE static SEM_PC
833// OBSOLETE SEM_FN_NAME (fr30bf,andh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
834// OBSOLETE {
835// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
836// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
837// OBSOLETE int UNUSED written = 0;
838// OBSOLETE IADDR UNUSED pc = abuf->addr;
839// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
840// OBSOLETE
841// OBSOLETE {
842// OBSOLETE HI tmp_tmp;
843// OBSOLETE tmp_tmp = ANDHI (GETMEMHI (current_cpu, pc, * FLD (i_Ri)), * FLD (i_Rj));
844// OBSOLETE {
845// OBSOLETE {
846// OBSOLETE BI opval = EQHI (tmp_tmp, 0);
847// OBSOLETE CPU (h_zbit) = opval;
848// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
849// OBSOLETE }
850// OBSOLETE {
851// OBSOLETE BI opval = LTHI (tmp_tmp, 0);
852// OBSOLETE CPU (h_nbit) = opval;
853// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
854// OBSOLETE }
855// OBSOLETE }
856// OBSOLETE {
857// OBSOLETE HI opval = tmp_tmp;
858// OBSOLETE SETMEMHI (current_cpu, pc, * FLD (i_Ri), opval);
859// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
860// OBSOLETE }
861// OBSOLETE }
862// OBSOLETE
863// OBSOLETE return vpc;
864// OBSOLETE #undef FLD
865// OBSOLETE }
866// OBSOLETE
867// OBSOLETE /* andb: andb $Rj,@$Ri */
868// OBSOLETE
869// OBSOLETE static SEM_PC
870// OBSOLETE SEM_FN_NAME (fr30bf,andb) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
871// OBSOLETE {
872// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
873// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
874// OBSOLETE int UNUSED written = 0;
875// OBSOLETE IADDR UNUSED pc = abuf->addr;
876// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
877// OBSOLETE
878// OBSOLETE {
879// OBSOLETE QI tmp_tmp;
880// OBSOLETE tmp_tmp = ANDQI (GETMEMQI (current_cpu, pc, * FLD (i_Ri)), * FLD (i_Rj));
881// OBSOLETE {
882// OBSOLETE {
883// OBSOLETE BI opval = EQQI (tmp_tmp, 0);
884// OBSOLETE CPU (h_zbit) = opval;
885// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
886// OBSOLETE }
887// OBSOLETE {
888// OBSOLETE BI opval = LTQI (tmp_tmp, 0);
889// OBSOLETE CPU (h_nbit) = opval;
890// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
891// OBSOLETE }
892// OBSOLETE }
893// OBSOLETE {
894// OBSOLETE QI opval = tmp_tmp;
895// OBSOLETE SETMEMQI (current_cpu, pc, * FLD (i_Ri), opval);
896// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
897// OBSOLETE }
898// OBSOLETE }
899// OBSOLETE
900// OBSOLETE return vpc;
901// OBSOLETE #undef FLD
902// OBSOLETE }
903// OBSOLETE
904// OBSOLETE /* orm: or $Rj,@$Ri */
905// OBSOLETE
906// OBSOLETE static SEM_PC
907// OBSOLETE SEM_FN_NAME (fr30bf,orm) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
908// OBSOLETE {
909// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
910// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
911// OBSOLETE int UNUSED written = 0;
912// OBSOLETE IADDR UNUSED pc = abuf->addr;
913// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
914// OBSOLETE
915// OBSOLETE {
916// OBSOLETE SI tmp_tmp;
917// OBSOLETE tmp_tmp = ORSI (GETMEMSI (current_cpu, pc, * FLD (i_Ri)), * FLD (i_Rj));
918// OBSOLETE {
919// OBSOLETE {
920// OBSOLETE BI opval = EQSI (tmp_tmp, 0);
921// OBSOLETE CPU (h_zbit) = opval;
922// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
923// OBSOLETE }
924// OBSOLETE {
925// OBSOLETE BI opval = LTSI (tmp_tmp, 0);
926// OBSOLETE CPU (h_nbit) = opval;
927// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
928// OBSOLETE }
929// OBSOLETE }
930// OBSOLETE {
931// OBSOLETE SI opval = tmp_tmp;
932// OBSOLETE SETMEMSI (current_cpu, pc, * FLD (i_Ri), opval);
933// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
934// OBSOLETE }
935// OBSOLETE }
936// OBSOLETE
937// OBSOLETE return vpc;
938// OBSOLETE #undef FLD
939// OBSOLETE }
940// OBSOLETE
941// OBSOLETE /* orh: orh $Rj,@$Ri */
942// OBSOLETE
943// OBSOLETE static SEM_PC
944// OBSOLETE SEM_FN_NAME (fr30bf,orh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
945// OBSOLETE {
946// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
947// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
948// OBSOLETE int UNUSED written = 0;
949// OBSOLETE IADDR UNUSED pc = abuf->addr;
950// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
951// OBSOLETE
952// OBSOLETE {
953// OBSOLETE HI tmp_tmp;
954// OBSOLETE tmp_tmp = ORHI (GETMEMHI (current_cpu, pc, * FLD (i_Ri)), * FLD (i_Rj));
955// OBSOLETE {
956// OBSOLETE {
957// OBSOLETE BI opval = EQHI (tmp_tmp, 0);
958// OBSOLETE CPU (h_zbit) = opval;
959// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
960// OBSOLETE }
961// OBSOLETE {
962// OBSOLETE BI opval = LTHI (tmp_tmp, 0);
963// OBSOLETE CPU (h_nbit) = opval;
964// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
965// OBSOLETE }
966// OBSOLETE }
967// OBSOLETE {
968// OBSOLETE HI opval = tmp_tmp;
969// OBSOLETE SETMEMHI (current_cpu, pc, * FLD (i_Ri), opval);
970// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
971// OBSOLETE }
972// OBSOLETE }
973// OBSOLETE
974// OBSOLETE return vpc;
975// OBSOLETE #undef FLD
976// OBSOLETE }
977// OBSOLETE
978// OBSOLETE /* orb: orb $Rj,@$Ri */
979// OBSOLETE
980// OBSOLETE static SEM_PC
981// OBSOLETE SEM_FN_NAME (fr30bf,orb) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
982// OBSOLETE {
983// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
984// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
985// OBSOLETE int UNUSED written = 0;
986// OBSOLETE IADDR UNUSED pc = abuf->addr;
987// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
988// OBSOLETE
989// OBSOLETE {
990// OBSOLETE QI tmp_tmp;
991// OBSOLETE tmp_tmp = ORQI (GETMEMQI (current_cpu, pc, * FLD (i_Ri)), * FLD (i_Rj));
992// OBSOLETE {
993// OBSOLETE {
994// OBSOLETE BI opval = EQQI (tmp_tmp, 0);
995// OBSOLETE CPU (h_zbit) = opval;
996// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
997// OBSOLETE }
998// OBSOLETE {
999// OBSOLETE BI opval = LTQI (tmp_tmp, 0);
1000// OBSOLETE CPU (h_nbit) = opval;
1001// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1002// OBSOLETE }
1003// OBSOLETE }
1004// OBSOLETE {
1005// OBSOLETE QI opval = tmp_tmp;
1006// OBSOLETE SETMEMQI (current_cpu, pc, * FLD (i_Ri), opval);
1007// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
1008// OBSOLETE }
1009// OBSOLETE }
1010// OBSOLETE
1011// OBSOLETE return vpc;
1012// OBSOLETE #undef FLD
1013// OBSOLETE }
1014// OBSOLETE
1015// OBSOLETE /* eorm: eor $Rj,@$Ri */
1016// OBSOLETE
1017// OBSOLETE static SEM_PC
1018// OBSOLETE SEM_FN_NAME (fr30bf,eorm) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1019// OBSOLETE {
1020// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
1021// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1022// OBSOLETE int UNUSED written = 0;
1023// OBSOLETE IADDR UNUSED pc = abuf->addr;
1024// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1025// OBSOLETE
1026// OBSOLETE {
1027// OBSOLETE SI tmp_tmp;
1028// OBSOLETE tmp_tmp = XORSI (GETMEMSI (current_cpu, pc, * FLD (i_Ri)), * FLD (i_Rj));
1029// OBSOLETE {
1030// OBSOLETE {
1031// OBSOLETE BI opval = EQSI (tmp_tmp, 0);
1032// OBSOLETE CPU (h_zbit) = opval;
1033// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1034// OBSOLETE }
1035// OBSOLETE {
1036// OBSOLETE BI opval = LTSI (tmp_tmp, 0);
1037// OBSOLETE CPU (h_nbit) = opval;
1038// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1039// OBSOLETE }
1040// OBSOLETE }
1041// OBSOLETE {
1042// OBSOLETE SI opval = tmp_tmp;
1043// OBSOLETE SETMEMSI (current_cpu, pc, * FLD (i_Ri), opval);
1044// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
1045// OBSOLETE }
1046// OBSOLETE }
1047// OBSOLETE
1048// OBSOLETE return vpc;
1049// OBSOLETE #undef FLD
1050// OBSOLETE }
1051// OBSOLETE
1052// OBSOLETE /* eorh: eorh $Rj,@$Ri */
1053// OBSOLETE
1054// OBSOLETE static SEM_PC
1055// OBSOLETE SEM_FN_NAME (fr30bf,eorh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1056// OBSOLETE {
1057// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
1058// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1059// OBSOLETE int UNUSED written = 0;
1060// OBSOLETE IADDR UNUSED pc = abuf->addr;
1061// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1062// OBSOLETE
1063// OBSOLETE {
1064// OBSOLETE HI tmp_tmp;
1065// OBSOLETE tmp_tmp = XORHI (GETMEMHI (current_cpu, pc, * FLD (i_Ri)), * FLD (i_Rj));
1066// OBSOLETE {
1067// OBSOLETE {
1068// OBSOLETE BI opval = EQHI (tmp_tmp, 0);
1069// OBSOLETE CPU (h_zbit) = opval;
1070// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1071// OBSOLETE }
1072// OBSOLETE {
1073// OBSOLETE BI opval = LTHI (tmp_tmp, 0);
1074// OBSOLETE CPU (h_nbit) = opval;
1075// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1076// OBSOLETE }
1077// OBSOLETE }
1078// OBSOLETE {
1079// OBSOLETE HI opval = tmp_tmp;
1080// OBSOLETE SETMEMHI (current_cpu, pc, * FLD (i_Ri), opval);
1081// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
1082// OBSOLETE }
1083// OBSOLETE }
1084// OBSOLETE
1085// OBSOLETE return vpc;
1086// OBSOLETE #undef FLD
1087// OBSOLETE }
1088// OBSOLETE
1089// OBSOLETE /* eorb: eorb $Rj,@$Ri */
1090// OBSOLETE
1091// OBSOLETE static SEM_PC
1092// OBSOLETE SEM_FN_NAME (fr30bf,eorb) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1093// OBSOLETE {
1094// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
1095// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1096// OBSOLETE int UNUSED written = 0;
1097// OBSOLETE IADDR UNUSED pc = abuf->addr;
1098// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1099// OBSOLETE
1100// OBSOLETE {
1101// OBSOLETE QI tmp_tmp;
1102// OBSOLETE tmp_tmp = XORQI (GETMEMQI (current_cpu, pc, * FLD (i_Ri)), * FLD (i_Rj));
1103// OBSOLETE {
1104// OBSOLETE {
1105// OBSOLETE BI opval = EQQI (tmp_tmp, 0);
1106// OBSOLETE CPU (h_zbit) = opval;
1107// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1108// OBSOLETE }
1109// OBSOLETE {
1110// OBSOLETE BI opval = LTQI (tmp_tmp, 0);
1111// OBSOLETE CPU (h_nbit) = opval;
1112// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1113// OBSOLETE }
1114// OBSOLETE }
1115// OBSOLETE {
1116// OBSOLETE QI opval = tmp_tmp;
1117// OBSOLETE SETMEMQI (current_cpu, pc, * FLD (i_Ri), opval);
1118// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
1119// OBSOLETE }
1120// OBSOLETE }
1121// OBSOLETE
1122// OBSOLETE return vpc;
1123// OBSOLETE #undef FLD
1124// OBSOLETE }
1125// OBSOLETE
1126// OBSOLETE /* bandl: bandl $u4,@$Ri */
1127// OBSOLETE
1128// OBSOLETE static SEM_PC
1129// OBSOLETE SEM_FN_NAME (fr30bf,bandl) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1130// OBSOLETE {
1131// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1132// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1133// OBSOLETE int UNUSED written = 0;
1134// OBSOLETE IADDR UNUSED pc = abuf->addr;
1135// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1136// OBSOLETE
1137// OBSOLETE {
1138// OBSOLETE QI opval = ANDQI (ORQI (FLD (f_u4), 240), GETMEMQI (current_cpu, pc, * FLD (i_Ri)));
1139// OBSOLETE SETMEMQI (current_cpu, pc, * FLD (i_Ri), opval);
1140// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
1141// OBSOLETE }
1142// OBSOLETE
1143// OBSOLETE return vpc;
1144// OBSOLETE #undef FLD
1145// OBSOLETE }
1146// OBSOLETE
1147// OBSOLETE /* borl: borl $u4,@$Ri */
1148// OBSOLETE
1149// OBSOLETE static SEM_PC
1150// OBSOLETE SEM_FN_NAME (fr30bf,borl) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1151// OBSOLETE {
1152// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1153// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1154// OBSOLETE int UNUSED written = 0;
1155// OBSOLETE IADDR UNUSED pc = abuf->addr;
1156// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1157// OBSOLETE
1158// OBSOLETE {
1159// OBSOLETE QI opval = ORQI (FLD (f_u4), GETMEMQI (current_cpu, pc, * FLD (i_Ri)));
1160// OBSOLETE SETMEMQI (current_cpu, pc, * FLD (i_Ri), opval);
1161// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
1162// OBSOLETE }
1163// OBSOLETE
1164// OBSOLETE return vpc;
1165// OBSOLETE #undef FLD
1166// OBSOLETE }
1167// OBSOLETE
1168// OBSOLETE /* beorl: beorl $u4,@$Ri */
1169// OBSOLETE
1170// OBSOLETE static SEM_PC
1171// OBSOLETE SEM_FN_NAME (fr30bf,beorl) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1172// OBSOLETE {
1173// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1174// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1175// OBSOLETE int UNUSED written = 0;
1176// OBSOLETE IADDR UNUSED pc = abuf->addr;
1177// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1178// OBSOLETE
1179// OBSOLETE {
1180// OBSOLETE QI opval = XORQI (FLD (f_u4), GETMEMQI (current_cpu, pc, * FLD (i_Ri)));
1181// OBSOLETE SETMEMQI (current_cpu, pc, * FLD (i_Ri), opval);
1182// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
1183// OBSOLETE }
1184// OBSOLETE
1185// OBSOLETE return vpc;
1186// OBSOLETE #undef FLD
1187// OBSOLETE }
1188// OBSOLETE
1189// OBSOLETE /* bandh: bandh $u4,@$Ri */
1190// OBSOLETE
1191// OBSOLETE static SEM_PC
1192// OBSOLETE SEM_FN_NAME (fr30bf,bandh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1193// OBSOLETE {
1194// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1195// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1196// OBSOLETE int UNUSED written = 0;
1197// OBSOLETE IADDR UNUSED pc = abuf->addr;
1198// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1199// OBSOLETE
1200// OBSOLETE {
1201// OBSOLETE QI opval = ANDQI (ORQI (SLLQI (FLD (f_u4), 4), 15), GETMEMQI (current_cpu, pc, * FLD (i_Ri)));
1202// OBSOLETE SETMEMQI (current_cpu, pc, * FLD (i_Ri), opval);
1203// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
1204// OBSOLETE }
1205// OBSOLETE
1206// OBSOLETE return vpc;
1207// OBSOLETE #undef FLD
1208// OBSOLETE }
1209// OBSOLETE
1210// OBSOLETE /* borh: borh $u4,@$Ri */
1211// OBSOLETE
1212// OBSOLETE static SEM_PC
1213// OBSOLETE SEM_FN_NAME (fr30bf,borh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1214// OBSOLETE {
1215// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1216// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1217// OBSOLETE int UNUSED written = 0;
1218// OBSOLETE IADDR UNUSED pc = abuf->addr;
1219// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1220// OBSOLETE
1221// OBSOLETE {
1222// OBSOLETE QI opval = ORQI (SLLQI (FLD (f_u4), 4), GETMEMQI (current_cpu, pc, * FLD (i_Ri)));
1223// OBSOLETE SETMEMQI (current_cpu, pc, * FLD (i_Ri), opval);
1224// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
1225// OBSOLETE }
1226// OBSOLETE
1227// OBSOLETE return vpc;
1228// OBSOLETE #undef FLD
1229// OBSOLETE }
1230// OBSOLETE
1231// OBSOLETE /* beorh: beorh $u4,@$Ri */
1232// OBSOLETE
1233// OBSOLETE static SEM_PC
1234// OBSOLETE SEM_FN_NAME (fr30bf,beorh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1235// OBSOLETE {
1236// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1237// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1238// OBSOLETE int UNUSED written = 0;
1239// OBSOLETE IADDR UNUSED pc = abuf->addr;
1240// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1241// OBSOLETE
1242// OBSOLETE {
1243// OBSOLETE QI opval = XORQI (SLLQI (FLD (f_u4), 4), GETMEMQI (current_cpu, pc, * FLD (i_Ri)));
1244// OBSOLETE SETMEMQI (current_cpu, pc, * FLD (i_Ri), opval);
1245// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
1246// OBSOLETE }
1247// OBSOLETE
1248// OBSOLETE return vpc;
1249// OBSOLETE #undef FLD
1250// OBSOLETE }
1251// OBSOLETE
1252// OBSOLETE /* btstl: btstl $u4,@$Ri */
1253// OBSOLETE
1254// OBSOLETE static SEM_PC
1255// OBSOLETE SEM_FN_NAME (fr30bf,btstl) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1256// OBSOLETE {
1257// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1258// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1259// OBSOLETE int UNUSED written = 0;
1260// OBSOLETE IADDR UNUSED pc = abuf->addr;
1261// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1262// OBSOLETE
1263// OBSOLETE {
1264// OBSOLETE QI tmp_tmp;
1265// OBSOLETE tmp_tmp = ANDQI (FLD (f_u4), GETMEMQI (current_cpu, pc, * FLD (i_Ri)));
1266// OBSOLETE {
1267// OBSOLETE BI opval = EQQI (tmp_tmp, 0);
1268// OBSOLETE CPU (h_zbit) = opval;
1269// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1270// OBSOLETE }
1271// OBSOLETE {
1272// OBSOLETE BI opval = 0;
1273// OBSOLETE CPU (h_nbit) = opval;
1274// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1275// OBSOLETE }
1276// OBSOLETE }
1277// OBSOLETE
1278// OBSOLETE return vpc;
1279// OBSOLETE #undef FLD
1280// OBSOLETE }
1281// OBSOLETE
1282// OBSOLETE /* btsth: btsth $u4,@$Ri */
1283// OBSOLETE
1284// OBSOLETE static SEM_PC
1285// OBSOLETE SEM_FN_NAME (fr30bf,btsth) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1286// OBSOLETE {
1287// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1288// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1289// OBSOLETE int UNUSED written = 0;
1290// OBSOLETE IADDR UNUSED pc = abuf->addr;
1291// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1292// OBSOLETE
1293// OBSOLETE {
1294// OBSOLETE QI tmp_tmp;
1295// OBSOLETE tmp_tmp = ANDQI (SLLQI (FLD (f_u4), 4), GETMEMQI (current_cpu, pc, * FLD (i_Ri)));
1296// OBSOLETE {
1297// OBSOLETE BI opval = EQQI (tmp_tmp, 0);
1298// OBSOLETE CPU (h_zbit) = opval;
1299// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1300// OBSOLETE }
1301// OBSOLETE {
1302// OBSOLETE BI opval = LTQI (tmp_tmp, 0);
1303// OBSOLETE CPU (h_nbit) = opval;
1304// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1305// OBSOLETE }
1306// OBSOLETE }
1307// OBSOLETE
1308// OBSOLETE return vpc;
1309// OBSOLETE #undef FLD
1310// OBSOLETE }
1311// OBSOLETE
1312// OBSOLETE /* mul: mul $Rj,$Ri */
1313// OBSOLETE
1314// OBSOLETE static SEM_PC
1315// OBSOLETE SEM_FN_NAME (fr30bf,mul) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1316// OBSOLETE {
1317// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
1318// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1319// OBSOLETE int UNUSED written = 0;
1320// OBSOLETE IADDR UNUSED pc = abuf->addr;
1321// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1322// OBSOLETE
1323// OBSOLETE {
1324// OBSOLETE DI tmp_tmp;
1325// OBSOLETE tmp_tmp = MULDI (EXTSIDI (* FLD (i_Rj)), EXTSIDI (* FLD (i_Ri)));
1326// OBSOLETE {
1327// OBSOLETE SI opval = TRUNCDISI (tmp_tmp);
1328// OBSOLETE SET_H_DR (((UINT) 5), opval);
1329// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1330// OBSOLETE }
1331// OBSOLETE {
1332// OBSOLETE SI opval = TRUNCDISI (SRLDI (tmp_tmp, 32));
1333// OBSOLETE SET_H_DR (((UINT) 4), opval);
1334// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1335// OBSOLETE }
1336// OBSOLETE {
1337// OBSOLETE BI opval = LTSI (GET_H_DR (((UINT) 5)), 0);
1338// OBSOLETE CPU (h_nbit) = opval;
1339// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1340// OBSOLETE }
1341// OBSOLETE {
1342// OBSOLETE BI opval = EQDI (tmp_tmp, MAKEDI (0, 0));
1343// OBSOLETE CPU (h_zbit) = opval;
1344// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1345// OBSOLETE }
1346// OBSOLETE {
1347// OBSOLETE BI opval = ORIF (GTDI (tmp_tmp, MAKEDI (0, 2147483647)), LTDI (tmp_tmp, NEGDI (MAKEDI (0, 0x80000000))));
1348// OBSOLETE CPU (h_vbit) = opval;
1349// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
1350// OBSOLETE }
1351// OBSOLETE }
1352// OBSOLETE
1353// OBSOLETE return vpc;
1354// OBSOLETE #undef FLD
1355// OBSOLETE }
1356// OBSOLETE
1357// OBSOLETE /* mulu: mulu $Rj,$Ri */
1358// OBSOLETE
1359// OBSOLETE static SEM_PC
1360// OBSOLETE SEM_FN_NAME (fr30bf,mulu) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1361// OBSOLETE {
1362// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
1363// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1364// OBSOLETE int UNUSED written = 0;
1365// OBSOLETE IADDR UNUSED pc = abuf->addr;
1366// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1367// OBSOLETE
1368// OBSOLETE {
1369// OBSOLETE DI tmp_tmp;
1370// OBSOLETE tmp_tmp = MULDI (ZEXTSIDI (* FLD (i_Rj)), ZEXTSIDI (* FLD (i_Ri)));
1371// OBSOLETE {
1372// OBSOLETE SI opval = TRUNCDISI (tmp_tmp);
1373// OBSOLETE SET_H_DR (((UINT) 5), opval);
1374// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1375// OBSOLETE }
1376// OBSOLETE {
1377// OBSOLETE SI opval = TRUNCDISI (SRLDI (tmp_tmp, 32));
1378// OBSOLETE SET_H_DR (((UINT) 4), opval);
1379// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1380// OBSOLETE }
1381// OBSOLETE {
1382// OBSOLETE BI opval = LTSI (GET_H_DR (((UINT) 4)), 0);
1383// OBSOLETE CPU (h_nbit) = opval;
1384// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1385// OBSOLETE }
1386// OBSOLETE {
1387// OBSOLETE BI opval = EQSI (GET_H_DR (((UINT) 5)), 0);
1388// OBSOLETE CPU (h_zbit) = opval;
1389// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1390// OBSOLETE }
1391// OBSOLETE {
1392// OBSOLETE BI opval = NESI (GET_H_DR (((UINT) 4)), 0);
1393// OBSOLETE CPU (h_vbit) = opval;
1394// OBSOLETE TRACE_RESULT (current_cpu, abuf, "vbit", 'x', opval);
1395// OBSOLETE }
1396// OBSOLETE }
1397// OBSOLETE
1398// OBSOLETE return vpc;
1399// OBSOLETE #undef FLD
1400// OBSOLETE }
1401// OBSOLETE
1402// OBSOLETE /* mulh: mulh $Rj,$Ri */
1403// OBSOLETE
1404// OBSOLETE static SEM_PC
1405// OBSOLETE SEM_FN_NAME (fr30bf,mulh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1406// OBSOLETE {
1407// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
1408// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1409// OBSOLETE int UNUSED written = 0;
1410// OBSOLETE IADDR UNUSED pc = abuf->addr;
1411// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1412// OBSOLETE
1413// OBSOLETE {
1414// OBSOLETE {
1415// OBSOLETE SI opval = MULHI (TRUNCSIHI (* FLD (i_Rj)), TRUNCSIHI (* FLD (i_Ri)));
1416// OBSOLETE SET_H_DR (((UINT) 5), opval);
1417// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1418// OBSOLETE }
1419// OBSOLETE {
1420// OBSOLETE BI opval = LTSI (GET_H_DR (((UINT) 5)), 0);
1421// OBSOLETE CPU (h_nbit) = opval;
1422// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1423// OBSOLETE }
1424// OBSOLETE {
1425// OBSOLETE BI opval = GESI (GET_H_DR (((UINT) 5)), 0);
1426// OBSOLETE CPU (h_zbit) = opval;
1427// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1428// OBSOLETE }
1429// OBSOLETE }
1430// OBSOLETE
1431// OBSOLETE return vpc;
1432// OBSOLETE #undef FLD
1433// OBSOLETE }
1434// OBSOLETE
1435// OBSOLETE /* muluh: muluh $Rj,$Ri */
1436// OBSOLETE
1437// OBSOLETE static SEM_PC
1438// OBSOLETE SEM_FN_NAME (fr30bf,muluh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1439// OBSOLETE {
1440// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
1441// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1442// OBSOLETE int UNUSED written = 0;
1443// OBSOLETE IADDR UNUSED pc = abuf->addr;
1444// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1445// OBSOLETE
1446// OBSOLETE {
1447// OBSOLETE {
1448// OBSOLETE SI opval = MULSI (ANDSI (* FLD (i_Rj), 65535), ANDSI (* FLD (i_Ri), 65535));
1449// OBSOLETE SET_H_DR (((UINT) 5), opval);
1450// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1451// OBSOLETE }
1452// OBSOLETE {
1453// OBSOLETE BI opval = LTSI (GET_H_DR (((UINT) 5)), 0);
1454// OBSOLETE CPU (h_nbit) = opval;
1455// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1456// OBSOLETE }
1457// OBSOLETE {
1458// OBSOLETE BI opval = GESI (GET_H_DR (((UINT) 5)), 0);
1459// OBSOLETE CPU (h_zbit) = opval;
1460// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1461// OBSOLETE }
1462// OBSOLETE }
1463// OBSOLETE
1464// OBSOLETE return vpc;
1465// OBSOLETE #undef FLD
1466// OBSOLETE }
1467// OBSOLETE
1468// OBSOLETE /* div0s: div0s $Ri */
1469// OBSOLETE
1470// OBSOLETE static SEM_PC
1471// OBSOLETE SEM_FN_NAME (fr30bf,div0s) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1472// OBSOLETE {
1473// OBSOLETE #define FLD(f) abuf->fields.sfmt_mov2dr.f
1474// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1475// OBSOLETE int UNUSED written = 0;
1476// OBSOLETE IADDR UNUSED pc = abuf->addr;
1477// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1478// OBSOLETE
1479// OBSOLETE {
1480// OBSOLETE {
1481// OBSOLETE BI opval = LTSI (GET_H_DR (((UINT) 5)), 0);
1482// OBSOLETE CPU (h_d0bit) = opval;
1483// OBSOLETE TRACE_RESULT (current_cpu, abuf, "d0bit", 'x', opval);
1484// OBSOLETE }
1485// OBSOLETE {
1486// OBSOLETE BI opval = XORBI (CPU (h_d0bit), LTSI (* FLD (i_Ri), 0));
1487// OBSOLETE CPU (h_d1bit) = opval;
1488// OBSOLETE TRACE_RESULT (current_cpu, abuf, "d1bit", 'x', opval);
1489// OBSOLETE }
1490// OBSOLETE if (NEBI (CPU (h_d0bit), 0)) {
1491// OBSOLETE {
1492// OBSOLETE SI opval = 0xffffffff;
1493// OBSOLETE SET_H_DR (((UINT) 4), opval);
1494// OBSOLETE written |= (1 << 5);
1495// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1496// OBSOLETE }
1497// OBSOLETE } else {
1498// OBSOLETE {
1499// OBSOLETE SI opval = 0;
1500// OBSOLETE SET_H_DR (((UINT) 4), opval);
1501// OBSOLETE written |= (1 << 5);
1502// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1503// OBSOLETE }
1504// OBSOLETE }
1505// OBSOLETE }
1506// OBSOLETE
1507// OBSOLETE abuf->written = written;
1508// OBSOLETE return vpc;
1509// OBSOLETE #undef FLD
1510// OBSOLETE }
1511// OBSOLETE
1512// OBSOLETE /* div0u: div0u $Ri */
1513// OBSOLETE
1514// OBSOLETE static SEM_PC
1515// OBSOLETE SEM_FN_NAME (fr30bf,div0u) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1516// OBSOLETE {
1517// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
1518// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1519// OBSOLETE int UNUSED written = 0;
1520// OBSOLETE IADDR UNUSED pc = abuf->addr;
1521// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1522// OBSOLETE
1523// OBSOLETE {
1524// OBSOLETE {
1525// OBSOLETE BI opval = 0;
1526// OBSOLETE CPU (h_d0bit) = opval;
1527// OBSOLETE TRACE_RESULT (current_cpu, abuf, "d0bit", 'x', opval);
1528// OBSOLETE }
1529// OBSOLETE {
1530// OBSOLETE BI opval = 0;
1531// OBSOLETE CPU (h_d1bit) = opval;
1532// OBSOLETE TRACE_RESULT (current_cpu, abuf, "d1bit", 'x', opval);
1533// OBSOLETE }
1534// OBSOLETE {
1535// OBSOLETE SI opval = 0;
1536// OBSOLETE SET_H_DR (((UINT) 4), opval);
1537// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1538// OBSOLETE }
1539// OBSOLETE }
1540// OBSOLETE
1541// OBSOLETE return vpc;
1542// OBSOLETE #undef FLD
1543// OBSOLETE }
1544// OBSOLETE
1545// OBSOLETE /* div1: div1 $Ri */
1546// OBSOLETE
1547// OBSOLETE static SEM_PC
1548// OBSOLETE SEM_FN_NAME (fr30bf,div1) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1549// OBSOLETE {
1550// OBSOLETE #define FLD(f) abuf->fields.sfmt_mov2dr.f
1551// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1552// OBSOLETE int UNUSED written = 0;
1553// OBSOLETE IADDR UNUSED pc = abuf->addr;
1554// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1555// OBSOLETE
1556// OBSOLETE {
1557// OBSOLETE SI tmp_tmp;
1558// OBSOLETE {
1559// OBSOLETE SI opval = SLLSI (GET_H_DR (((UINT) 4)), 1);
1560// OBSOLETE SET_H_DR (((UINT) 4), opval);
1561// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1562// OBSOLETE }
1563// OBSOLETE if (LTSI (GET_H_DR (((UINT) 5)), 0)) {
1564// OBSOLETE {
1565// OBSOLETE SI opval = ADDSI (GET_H_DR (((UINT) 4)), 1);
1566// OBSOLETE SET_H_DR (((UINT) 4), opval);
1567// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1568// OBSOLETE }
1569// OBSOLETE }
1570// OBSOLETE {
1571// OBSOLETE SI opval = SLLSI (GET_H_DR (((UINT) 5)), 1);
1572// OBSOLETE SET_H_DR (((UINT) 5), opval);
1573// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1574// OBSOLETE }
1575// OBSOLETE if (EQBI (CPU (h_d1bit), 1)) {
1576// OBSOLETE {
1577// OBSOLETE tmp_tmp = ADDSI (GET_H_DR (((UINT) 4)), * FLD (i_Ri));
1578// OBSOLETE {
1579// OBSOLETE BI opval = ADDCFSI (GET_H_DR (((UINT) 4)), * FLD (i_Ri), 0);
1580// OBSOLETE CPU (h_cbit) = opval;
1581// OBSOLETE written |= (1 << 6);
1582// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1583// OBSOLETE }
1584// OBSOLETE }
1585// OBSOLETE } else {
1586// OBSOLETE {
1587// OBSOLETE tmp_tmp = SUBSI (GET_H_DR (((UINT) 4)), * FLD (i_Ri));
1588// OBSOLETE {
1589// OBSOLETE BI opval = SUBCFSI (GET_H_DR (((UINT) 4)), * FLD (i_Ri), 0);
1590// OBSOLETE CPU (h_cbit) = opval;
1591// OBSOLETE written |= (1 << 6);
1592// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1593// OBSOLETE }
1594// OBSOLETE }
1595// OBSOLETE }
1596// OBSOLETE if (NOTBI (XORBI (XORBI (CPU (h_d0bit), CPU (h_d1bit)), CPU (h_cbit)))) {
1597// OBSOLETE {
1598// OBSOLETE {
1599// OBSOLETE SI opval = tmp_tmp;
1600// OBSOLETE SET_H_DR (((UINT) 4), opval);
1601// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1602// OBSOLETE }
1603// OBSOLETE {
1604// OBSOLETE SI opval = ORSI (GET_H_DR (((UINT) 5)), 1);
1605// OBSOLETE SET_H_DR (((UINT) 5), opval);
1606// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1607// OBSOLETE }
1608// OBSOLETE }
1609// OBSOLETE }
1610// OBSOLETE {
1611// OBSOLETE BI opval = EQSI (GET_H_DR (((UINT) 4)), 0);
1612// OBSOLETE CPU (h_zbit) = opval;
1613// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1614// OBSOLETE }
1615// OBSOLETE }
1616// OBSOLETE
1617// OBSOLETE abuf->written = written;
1618// OBSOLETE return vpc;
1619// OBSOLETE #undef FLD
1620// OBSOLETE }
1621// OBSOLETE
1622// OBSOLETE /* div2: div2 $Ri */
1623// OBSOLETE
1624// OBSOLETE static SEM_PC
1625// OBSOLETE SEM_FN_NAME (fr30bf,div2) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1626// OBSOLETE {
1627// OBSOLETE #define FLD(f) abuf->fields.sfmt_mov2dr.f
1628// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1629// OBSOLETE int UNUSED written = 0;
1630// OBSOLETE IADDR UNUSED pc = abuf->addr;
1631// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1632// OBSOLETE
1633// OBSOLETE {
1634// OBSOLETE SI tmp_tmp;
1635// OBSOLETE if (EQBI (CPU (h_d1bit), 1)) {
1636// OBSOLETE {
1637// OBSOLETE tmp_tmp = ADDSI (GET_H_DR (((UINT) 4)), * FLD (i_Ri));
1638// OBSOLETE {
1639// OBSOLETE BI opval = ADDCFSI (GET_H_DR (((UINT) 4)), * FLD (i_Ri), 0);
1640// OBSOLETE CPU (h_cbit) = opval;
1641// OBSOLETE written |= (1 << 3);
1642// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1643// OBSOLETE }
1644// OBSOLETE }
1645// OBSOLETE } else {
1646// OBSOLETE {
1647// OBSOLETE tmp_tmp = SUBSI (GET_H_DR (((UINT) 4)), * FLD (i_Ri));
1648// OBSOLETE {
1649// OBSOLETE BI opval = SUBCFSI (GET_H_DR (((UINT) 4)), * FLD (i_Ri), 0);
1650// OBSOLETE CPU (h_cbit) = opval;
1651// OBSOLETE written |= (1 << 3);
1652// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1653// OBSOLETE }
1654// OBSOLETE }
1655// OBSOLETE }
1656// OBSOLETE if (EQSI (tmp_tmp, 0)) {
1657// OBSOLETE {
1658// OBSOLETE {
1659// OBSOLETE BI opval = 1;
1660// OBSOLETE CPU (h_zbit) = opval;
1661// OBSOLETE written |= (1 << 5);
1662// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1663// OBSOLETE }
1664// OBSOLETE {
1665// OBSOLETE SI opval = 0;
1666// OBSOLETE SET_H_DR (((UINT) 4), opval);
1667// OBSOLETE written |= (1 << 4);
1668// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1669// OBSOLETE }
1670// OBSOLETE }
1671// OBSOLETE } else {
1672// OBSOLETE {
1673// OBSOLETE BI opval = 0;
1674// OBSOLETE CPU (h_zbit) = opval;
1675// OBSOLETE written |= (1 << 5);
1676// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1677// OBSOLETE }
1678// OBSOLETE }
1679// OBSOLETE }
1680// OBSOLETE
1681// OBSOLETE abuf->written = written;
1682// OBSOLETE return vpc;
1683// OBSOLETE #undef FLD
1684// OBSOLETE }
1685// OBSOLETE
1686// OBSOLETE /* div3: div3 */
1687// OBSOLETE
1688// OBSOLETE static SEM_PC
1689// OBSOLETE SEM_FN_NAME (fr30bf,div3) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1690// OBSOLETE {
1691// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
1692// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1693// OBSOLETE int UNUSED written = 0;
1694// OBSOLETE IADDR UNUSED pc = abuf->addr;
1695// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1696// OBSOLETE
1697// OBSOLETE if (EQBI (CPU (h_zbit), 1)) {
1698// OBSOLETE {
1699// OBSOLETE SI opval = ADDSI (GET_H_DR (((UINT) 5)), 1);
1700// OBSOLETE SET_H_DR (((UINT) 5), opval);
1701// OBSOLETE written |= (1 << 2);
1702// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1703// OBSOLETE }
1704// OBSOLETE }
1705// OBSOLETE
1706// OBSOLETE abuf->written = written;
1707// OBSOLETE return vpc;
1708// OBSOLETE #undef FLD
1709// OBSOLETE }
1710// OBSOLETE
1711// OBSOLETE /* div4s: div4s */
1712// OBSOLETE
1713// OBSOLETE static SEM_PC
1714// OBSOLETE SEM_FN_NAME (fr30bf,div4s) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1715// OBSOLETE {
1716// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
1717// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1718// OBSOLETE int UNUSED written = 0;
1719// OBSOLETE IADDR UNUSED pc = abuf->addr;
1720// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1721// OBSOLETE
1722// OBSOLETE if (EQBI (CPU (h_d1bit), 1)) {
1723// OBSOLETE {
1724// OBSOLETE SI opval = NEGSI (GET_H_DR (((UINT) 5)));
1725// OBSOLETE SET_H_DR (((UINT) 5), opval);
1726// OBSOLETE written |= (1 << 2);
1727// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
1728// OBSOLETE }
1729// OBSOLETE }
1730// OBSOLETE
1731// OBSOLETE abuf->written = written;
1732// OBSOLETE return vpc;
1733// OBSOLETE #undef FLD
1734// OBSOLETE }
1735// OBSOLETE
1736// OBSOLETE /* lsl: lsl $Rj,$Ri */
1737// OBSOLETE
1738// OBSOLETE static SEM_PC
1739// OBSOLETE SEM_FN_NAME (fr30bf,lsl) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1740// OBSOLETE {
1741// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
1742// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1743// OBSOLETE int UNUSED written = 0;
1744// OBSOLETE IADDR UNUSED pc = abuf->addr;
1745// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1746// OBSOLETE
1747// OBSOLETE {
1748// OBSOLETE SI tmp_shift;
1749// OBSOLETE tmp_shift = ANDSI (* FLD (i_Rj), 31);
1750// OBSOLETE if (NESI (tmp_shift, 0)) {
1751// OBSOLETE {
1752// OBSOLETE {
1753// OBSOLETE BI opval = NESI (ANDSI (* FLD (i_Ri), SLLSI (1, SUBSI (32, tmp_shift))), 0);
1754// OBSOLETE CPU (h_cbit) = opval;
1755// OBSOLETE written |= (1 << 3);
1756// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1757// OBSOLETE }
1758// OBSOLETE {
1759// OBSOLETE SI opval = SLLSI (* FLD (i_Ri), tmp_shift);
1760// OBSOLETE * FLD (i_Ri) = opval;
1761// OBSOLETE written |= (1 << 2);
1762// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
1763// OBSOLETE }
1764// OBSOLETE }
1765// OBSOLETE } else {
1766// OBSOLETE {
1767// OBSOLETE BI opval = 0;
1768// OBSOLETE CPU (h_cbit) = opval;
1769// OBSOLETE written |= (1 << 3);
1770// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1771// OBSOLETE }
1772// OBSOLETE }
1773// OBSOLETE {
1774// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
1775// OBSOLETE CPU (h_nbit) = opval;
1776// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1777// OBSOLETE }
1778// OBSOLETE {
1779// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
1780// OBSOLETE CPU (h_zbit) = opval;
1781// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1782// OBSOLETE }
1783// OBSOLETE }
1784// OBSOLETE
1785// OBSOLETE abuf->written = written;
1786// OBSOLETE return vpc;
1787// OBSOLETE #undef FLD
1788// OBSOLETE }
1789// OBSOLETE
1790// OBSOLETE /* lsli: lsl $u4,$Ri */
1791// OBSOLETE
1792// OBSOLETE static SEM_PC
1793// OBSOLETE SEM_FN_NAME (fr30bf,lsli) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1794// OBSOLETE {
1795// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1796// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1797// OBSOLETE int UNUSED written = 0;
1798// OBSOLETE IADDR UNUSED pc = abuf->addr;
1799// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1800// OBSOLETE
1801// OBSOLETE {
1802// OBSOLETE SI tmp_shift;
1803// OBSOLETE tmp_shift = FLD (f_u4);
1804// OBSOLETE if (NESI (tmp_shift, 0)) {
1805// OBSOLETE {
1806// OBSOLETE {
1807// OBSOLETE BI opval = NESI (ANDSI (* FLD (i_Ri), SLLSI (1, SUBSI (32, tmp_shift))), 0);
1808// OBSOLETE CPU (h_cbit) = opval;
1809// OBSOLETE written |= (1 << 3);
1810// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1811// OBSOLETE }
1812// OBSOLETE {
1813// OBSOLETE SI opval = SLLSI (* FLD (i_Ri), tmp_shift);
1814// OBSOLETE * FLD (i_Ri) = opval;
1815// OBSOLETE written |= (1 << 2);
1816// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
1817// OBSOLETE }
1818// OBSOLETE }
1819// OBSOLETE } else {
1820// OBSOLETE {
1821// OBSOLETE BI opval = 0;
1822// OBSOLETE CPU (h_cbit) = opval;
1823// OBSOLETE written |= (1 << 3);
1824// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1825// OBSOLETE }
1826// OBSOLETE }
1827// OBSOLETE {
1828// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
1829// OBSOLETE CPU (h_nbit) = opval;
1830// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1831// OBSOLETE }
1832// OBSOLETE {
1833// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
1834// OBSOLETE CPU (h_zbit) = opval;
1835// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1836// OBSOLETE }
1837// OBSOLETE }
1838// OBSOLETE
1839// OBSOLETE abuf->written = written;
1840// OBSOLETE return vpc;
1841// OBSOLETE #undef FLD
1842// OBSOLETE }
1843// OBSOLETE
1844// OBSOLETE /* lsl2: lsl2 $u4,$Ri */
1845// OBSOLETE
1846// OBSOLETE static SEM_PC
1847// OBSOLETE SEM_FN_NAME (fr30bf,lsl2) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1848// OBSOLETE {
1849// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1850// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1851// OBSOLETE int UNUSED written = 0;
1852// OBSOLETE IADDR UNUSED pc = abuf->addr;
1853// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1854// OBSOLETE
1855// OBSOLETE {
1856// OBSOLETE SI tmp_shift;
1857// OBSOLETE tmp_shift = ADDSI (FLD (f_u4), 16);
1858// OBSOLETE if (NESI (tmp_shift, 0)) {
1859// OBSOLETE {
1860// OBSOLETE {
1861// OBSOLETE BI opval = NESI (ANDSI (* FLD (i_Ri), SLLSI (1, SUBSI (32, tmp_shift))), 0);
1862// OBSOLETE CPU (h_cbit) = opval;
1863// OBSOLETE written |= (1 << 3);
1864// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1865// OBSOLETE }
1866// OBSOLETE {
1867// OBSOLETE SI opval = SLLSI (* FLD (i_Ri), tmp_shift);
1868// OBSOLETE * FLD (i_Ri) = opval;
1869// OBSOLETE written |= (1 << 2);
1870// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
1871// OBSOLETE }
1872// OBSOLETE }
1873// OBSOLETE } else {
1874// OBSOLETE {
1875// OBSOLETE BI opval = 0;
1876// OBSOLETE CPU (h_cbit) = opval;
1877// OBSOLETE written |= (1 << 3);
1878// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1879// OBSOLETE }
1880// OBSOLETE }
1881// OBSOLETE {
1882// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
1883// OBSOLETE CPU (h_nbit) = opval;
1884// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1885// OBSOLETE }
1886// OBSOLETE {
1887// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
1888// OBSOLETE CPU (h_zbit) = opval;
1889// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1890// OBSOLETE }
1891// OBSOLETE }
1892// OBSOLETE
1893// OBSOLETE abuf->written = written;
1894// OBSOLETE return vpc;
1895// OBSOLETE #undef FLD
1896// OBSOLETE }
1897// OBSOLETE
1898// OBSOLETE /* lsr: lsr $Rj,$Ri */
1899// OBSOLETE
1900// OBSOLETE static SEM_PC
1901// OBSOLETE SEM_FN_NAME (fr30bf,lsr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1902// OBSOLETE {
1903// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
1904// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1905// OBSOLETE int UNUSED written = 0;
1906// OBSOLETE IADDR UNUSED pc = abuf->addr;
1907// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1908// OBSOLETE
1909// OBSOLETE {
1910// OBSOLETE SI tmp_shift;
1911// OBSOLETE tmp_shift = ANDSI (* FLD (i_Rj), 31);
1912// OBSOLETE if (NESI (tmp_shift, 0)) {
1913// OBSOLETE {
1914// OBSOLETE {
1915// OBSOLETE BI opval = NESI (ANDSI (* FLD (i_Ri), SLLSI (1, SUBSI (tmp_shift, 1))), 0);
1916// OBSOLETE CPU (h_cbit) = opval;
1917// OBSOLETE written |= (1 << 3);
1918// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1919// OBSOLETE }
1920// OBSOLETE {
1921// OBSOLETE SI opval = SRLSI (* FLD (i_Ri), tmp_shift);
1922// OBSOLETE * FLD (i_Ri) = opval;
1923// OBSOLETE written |= (1 << 2);
1924// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
1925// OBSOLETE }
1926// OBSOLETE }
1927// OBSOLETE } else {
1928// OBSOLETE {
1929// OBSOLETE BI opval = 0;
1930// OBSOLETE CPU (h_cbit) = opval;
1931// OBSOLETE written |= (1 << 3);
1932// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1933// OBSOLETE }
1934// OBSOLETE }
1935// OBSOLETE {
1936// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
1937// OBSOLETE CPU (h_nbit) = opval;
1938// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1939// OBSOLETE }
1940// OBSOLETE {
1941// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
1942// OBSOLETE CPU (h_zbit) = opval;
1943// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1944// OBSOLETE }
1945// OBSOLETE }
1946// OBSOLETE
1947// OBSOLETE abuf->written = written;
1948// OBSOLETE return vpc;
1949// OBSOLETE #undef FLD
1950// OBSOLETE }
1951// OBSOLETE
1952// OBSOLETE /* lsri: lsr $u4,$Ri */
1953// OBSOLETE
1954// OBSOLETE static SEM_PC
1955// OBSOLETE SEM_FN_NAME (fr30bf,lsri) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
1956// OBSOLETE {
1957// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
1958// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
1959// OBSOLETE int UNUSED written = 0;
1960// OBSOLETE IADDR UNUSED pc = abuf->addr;
1961// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
1962// OBSOLETE
1963// OBSOLETE {
1964// OBSOLETE SI tmp_shift;
1965// OBSOLETE tmp_shift = FLD (f_u4);
1966// OBSOLETE if (NESI (tmp_shift, 0)) {
1967// OBSOLETE {
1968// OBSOLETE {
1969// OBSOLETE BI opval = NESI (ANDSI (* FLD (i_Ri), SLLSI (1, SUBSI (tmp_shift, 1))), 0);
1970// OBSOLETE CPU (h_cbit) = opval;
1971// OBSOLETE written |= (1 << 3);
1972// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1973// OBSOLETE }
1974// OBSOLETE {
1975// OBSOLETE SI opval = SRLSI (* FLD (i_Ri), tmp_shift);
1976// OBSOLETE * FLD (i_Ri) = opval;
1977// OBSOLETE written |= (1 << 2);
1978// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
1979// OBSOLETE }
1980// OBSOLETE }
1981// OBSOLETE } else {
1982// OBSOLETE {
1983// OBSOLETE BI opval = 0;
1984// OBSOLETE CPU (h_cbit) = opval;
1985// OBSOLETE written |= (1 << 3);
1986// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
1987// OBSOLETE }
1988// OBSOLETE }
1989// OBSOLETE {
1990// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
1991// OBSOLETE CPU (h_nbit) = opval;
1992// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
1993// OBSOLETE }
1994// OBSOLETE {
1995// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
1996// OBSOLETE CPU (h_zbit) = opval;
1997// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
1998// OBSOLETE }
1999// OBSOLETE }
2000// OBSOLETE
2001// OBSOLETE abuf->written = written;
2002// OBSOLETE return vpc;
2003// OBSOLETE #undef FLD
2004// OBSOLETE }
2005// OBSOLETE
2006// OBSOLETE /* lsr2: lsr2 $u4,$Ri */
2007// OBSOLETE
2008// OBSOLETE static SEM_PC
2009// OBSOLETE SEM_FN_NAME (fr30bf,lsr2) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2010// OBSOLETE {
2011// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
2012// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2013// OBSOLETE int UNUSED written = 0;
2014// OBSOLETE IADDR UNUSED pc = abuf->addr;
2015// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2016// OBSOLETE
2017// OBSOLETE {
2018// OBSOLETE SI tmp_shift;
2019// OBSOLETE tmp_shift = ADDSI (FLD (f_u4), 16);
2020// OBSOLETE if (NESI (tmp_shift, 0)) {
2021// OBSOLETE {
2022// OBSOLETE {
2023// OBSOLETE BI opval = NESI (ANDSI (* FLD (i_Ri), SLLSI (1, SUBSI (tmp_shift, 1))), 0);
2024// OBSOLETE CPU (h_cbit) = opval;
2025// OBSOLETE written |= (1 << 3);
2026// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
2027// OBSOLETE }
2028// OBSOLETE {
2029// OBSOLETE SI opval = SRLSI (* FLD (i_Ri), tmp_shift);
2030// OBSOLETE * FLD (i_Ri) = opval;
2031// OBSOLETE written |= (1 << 2);
2032// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2033// OBSOLETE }
2034// OBSOLETE }
2035// OBSOLETE } else {
2036// OBSOLETE {
2037// OBSOLETE BI opval = 0;
2038// OBSOLETE CPU (h_cbit) = opval;
2039// OBSOLETE written |= (1 << 3);
2040// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
2041// OBSOLETE }
2042// OBSOLETE }
2043// OBSOLETE {
2044// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
2045// OBSOLETE CPU (h_nbit) = opval;
2046// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
2047// OBSOLETE }
2048// OBSOLETE {
2049// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
2050// OBSOLETE CPU (h_zbit) = opval;
2051// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
2052// OBSOLETE }
2053// OBSOLETE }
2054// OBSOLETE
2055// OBSOLETE abuf->written = written;
2056// OBSOLETE return vpc;
2057// OBSOLETE #undef FLD
2058// OBSOLETE }
2059// OBSOLETE
2060// OBSOLETE /* asr: asr $Rj,$Ri */
2061// OBSOLETE
2062// OBSOLETE static SEM_PC
2063// OBSOLETE SEM_FN_NAME (fr30bf,asr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2064// OBSOLETE {
2065// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
2066// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2067// OBSOLETE int UNUSED written = 0;
2068// OBSOLETE IADDR UNUSED pc = abuf->addr;
2069// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2070// OBSOLETE
2071// OBSOLETE {
2072// OBSOLETE SI tmp_shift;
2073// OBSOLETE tmp_shift = ANDSI (* FLD (i_Rj), 31);
2074// OBSOLETE if (NESI (tmp_shift, 0)) {
2075// OBSOLETE {
2076// OBSOLETE {
2077// OBSOLETE BI opval = NESI (ANDSI (* FLD (i_Ri), SLLSI (1, SUBSI (tmp_shift, 1))), 0);
2078// OBSOLETE CPU (h_cbit) = opval;
2079// OBSOLETE written |= (1 << 3);
2080// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
2081// OBSOLETE }
2082// OBSOLETE {
2083// OBSOLETE SI opval = SRASI (* FLD (i_Ri), tmp_shift);
2084// OBSOLETE * FLD (i_Ri) = opval;
2085// OBSOLETE written |= (1 << 2);
2086// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2087// OBSOLETE }
2088// OBSOLETE }
2089// OBSOLETE } else {
2090// OBSOLETE {
2091// OBSOLETE BI opval = 0;
2092// OBSOLETE CPU (h_cbit) = opval;
2093// OBSOLETE written |= (1 << 3);
2094// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
2095// OBSOLETE }
2096// OBSOLETE }
2097// OBSOLETE {
2098// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
2099// OBSOLETE CPU (h_nbit) = opval;
2100// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
2101// OBSOLETE }
2102// OBSOLETE {
2103// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
2104// OBSOLETE CPU (h_zbit) = opval;
2105// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
2106// OBSOLETE }
2107// OBSOLETE }
2108// OBSOLETE
2109// OBSOLETE abuf->written = written;
2110// OBSOLETE return vpc;
2111// OBSOLETE #undef FLD
2112// OBSOLETE }
2113// OBSOLETE
2114// OBSOLETE /* asri: asr $u4,$Ri */
2115// OBSOLETE
2116// OBSOLETE static SEM_PC
2117// OBSOLETE SEM_FN_NAME (fr30bf,asri) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2118// OBSOLETE {
2119// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
2120// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2121// OBSOLETE int UNUSED written = 0;
2122// OBSOLETE IADDR UNUSED pc = abuf->addr;
2123// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2124// OBSOLETE
2125// OBSOLETE {
2126// OBSOLETE SI tmp_shift;
2127// OBSOLETE tmp_shift = FLD (f_u4);
2128// OBSOLETE if (NESI (tmp_shift, 0)) {
2129// OBSOLETE {
2130// OBSOLETE {
2131// OBSOLETE BI opval = NESI (ANDSI (* FLD (i_Ri), SLLSI (1, SUBSI (tmp_shift, 1))), 0);
2132// OBSOLETE CPU (h_cbit) = opval;
2133// OBSOLETE written |= (1 << 3);
2134// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
2135// OBSOLETE }
2136// OBSOLETE {
2137// OBSOLETE SI opval = SRASI (* FLD (i_Ri), tmp_shift);
2138// OBSOLETE * FLD (i_Ri) = opval;
2139// OBSOLETE written |= (1 << 2);
2140// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2141// OBSOLETE }
2142// OBSOLETE }
2143// OBSOLETE } else {
2144// OBSOLETE {
2145// OBSOLETE BI opval = 0;
2146// OBSOLETE CPU (h_cbit) = opval;
2147// OBSOLETE written |= (1 << 3);
2148// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
2149// OBSOLETE }
2150// OBSOLETE }
2151// OBSOLETE {
2152// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
2153// OBSOLETE CPU (h_nbit) = opval;
2154// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
2155// OBSOLETE }
2156// OBSOLETE {
2157// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
2158// OBSOLETE CPU (h_zbit) = opval;
2159// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
2160// OBSOLETE }
2161// OBSOLETE }
2162// OBSOLETE
2163// OBSOLETE abuf->written = written;
2164// OBSOLETE return vpc;
2165// OBSOLETE #undef FLD
2166// OBSOLETE }
2167// OBSOLETE
2168// OBSOLETE /* asr2: asr2 $u4,$Ri */
2169// OBSOLETE
2170// OBSOLETE static SEM_PC
2171// OBSOLETE SEM_FN_NAME (fr30bf,asr2) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2172// OBSOLETE {
2173// OBSOLETE #define FLD(f) abuf->fields.sfmt_addi.f
2174// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2175// OBSOLETE int UNUSED written = 0;
2176// OBSOLETE IADDR UNUSED pc = abuf->addr;
2177// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2178// OBSOLETE
2179// OBSOLETE {
2180// OBSOLETE SI tmp_shift;
2181// OBSOLETE tmp_shift = ADDSI (FLD (f_u4), 16);
2182// OBSOLETE if (NESI (tmp_shift, 0)) {
2183// OBSOLETE {
2184// OBSOLETE {
2185// OBSOLETE BI opval = NESI (ANDSI (* FLD (i_Ri), SLLSI (1, SUBSI (tmp_shift, 1))), 0);
2186// OBSOLETE CPU (h_cbit) = opval;
2187// OBSOLETE written |= (1 << 3);
2188// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
2189// OBSOLETE }
2190// OBSOLETE {
2191// OBSOLETE SI opval = SRASI (* FLD (i_Ri), tmp_shift);
2192// OBSOLETE * FLD (i_Ri) = opval;
2193// OBSOLETE written |= (1 << 2);
2194// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2195// OBSOLETE }
2196// OBSOLETE }
2197// OBSOLETE } else {
2198// OBSOLETE {
2199// OBSOLETE BI opval = 0;
2200// OBSOLETE CPU (h_cbit) = opval;
2201// OBSOLETE written |= (1 << 3);
2202// OBSOLETE TRACE_RESULT (current_cpu, abuf, "cbit", 'x', opval);
2203// OBSOLETE }
2204// OBSOLETE }
2205// OBSOLETE {
2206// OBSOLETE BI opval = LTSI (* FLD (i_Ri), 0);
2207// OBSOLETE CPU (h_nbit) = opval;
2208// OBSOLETE TRACE_RESULT (current_cpu, abuf, "nbit", 'x', opval);
2209// OBSOLETE }
2210// OBSOLETE {
2211// OBSOLETE BI opval = EQSI (* FLD (i_Ri), 0);
2212// OBSOLETE CPU (h_zbit) = opval;
2213// OBSOLETE TRACE_RESULT (current_cpu, abuf, "zbit", 'x', opval);
2214// OBSOLETE }
2215// OBSOLETE }
2216// OBSOLETE
2217// OBSOLETE abuf->written = written;
2218// OBSOLETE return vpc;
2219// OBSOLETE #undef FLD
2220// OBSOLETE }
2221// OBSOLETE
2222// OBSOLETE /* ldi8: ldi:8 $i8,$Ri */
2223// OBSOLETE
2224// OBSOLETE static SEM_PC
2225// OBSOLETE SEM_FN_NAME (fr30bf,ldi8) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2226// OBSOLETE {
2227// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldi8.f
2228// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2229// OBSOLETE int UNUSED written = 0;
2230// OBSOLETE IADDR UNUSED pc = abuf->addr;
2231// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2232// OBSOLETE
2233// OBSOLETE {
2234// OBSOLETE SI opval = FLD (f_i8);
2235// OBSOLETE * FLD (i_Ri) = opval;
2236// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2237// OBSOLETE }
2238// OBSOLETE
2239// OBSOLETE return vpc;
2240// OBSOLETE #undef FLD
2241// OBSOLETE }
2242// OBSOLETE
2243// OBSOLETE /* ldi20: ldi:20 $i20,$Ri */
2244// OBSOLETE
2245// OBSOLETE static SEM_PC
2246// OBSOLETE SEM_FN_NAME (fr30bf,ldi20) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2247// OBSOLETE {
2248// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldi20.f
2249// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2250// OBSOLETE int UNUSED written = 0;
2251// OBSOLETE IADDR UNUSED pc = abuf->addr;
2252// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 4);
2253// OBSOLETE
2254// OBSOLETE {
2255// OBSOLETE SI opval = FLD (f_i20);
2256// OBSOLETE * FLD (i_Ri) = opval;
2257// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2258// OBSOLETE }
2259// OBSOLETE
2260// OBSOLETE return vpc;
2261// OBSOLETE #undef FLD
2262// OBSOLETE }
2263// OBSOLETE
2264// OBSOLETE /* ldi32: ldi:32 $i32,$Ri */
2265// OBSOLETE
2266// OBSOLETE static SEM_PC
2267// OBSOLETE SEM_FN_NAME (fr30bf,ldi32) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2268// OBSOLETE {
2269// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldi32.f
2270// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2271// OBSOLETE int UNUSED written = 0;
2272// OBSOLETE IADDR UNUSED pc = abuf->addr;
2273// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 6);
2274// OBSOLETE
2275// OBSOLETE {
2276// OBSOLETE SI opval = FLD (f_i32);
2277// OBSOLETE * FLD (i_Ri) = opval;
2278// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2279// OBSOLETE }
2280// OBSOLETE
2281// OBSOLETE return vpc;
2282// OBSOLETE #undef FLD
2283// OBSOLETE }
2284// OBSOLETE
2285// OBSOLETE /* ld: ld @$Rj,$Ri */
2286// OBSOLETE
2287// OBSOLETE static SEM_PC
2288// OBSOLETE SEM_FN_NAME (fr30bf,ld) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2289// OBSOLETE {
2290// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr13.f
2291// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2292// OBSOLETE int UNUSED written = 0;
2293// OBSOLETE IADDR UNUSED pc = abuf->addr;
2294// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2295// OBSOLETE
2296// OBSOLETE {
2297// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, * FLD (i_Rj));
2298// OBSOLETE * FLD (i_Ri) = opval;
2299// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2300// OBSOLETE }
2301// OBSOLETE
2302// OBSOLETE return vpc;
2303// OBSOLETE #undef FLD
2304// OBSOLETE }
2305// OBSOLETE
2306// OBSOLETE /* lduh: lduh @$Rj,$Ri */
2307// OBSOLETE
2308// OBSOLETE static SEM_PC
2309// OBSOLETE SEM_FN_NAME (fr30bf,lduh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2310// OBSOLETE {
2311// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr13.f
2312// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2313// OBSOLETE int UNUSED written = 0;
2314// OBSOLETE IADDR UNUSED pc = abuf->addr;
2315// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2316// OBSOLETE
2317// OBSOLETE {
2318// OBSOLETE SI opval = GETMEMUHI (current_cpu, pc, * FLD (i_Rj));
2319// OBSOLETE * FLD (i_Ri) = opval;
2320// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2321// OBSOLETE }
2322// OBSOLETE
2323// OBSOLETE return vpc;
2324// OBSOLETE #undef FLD
2325// OBSOLETE }
2326// OBSOLETE
2327// OBSOLETE /* ldub: ldub @$Rj,$Ri */
2328// OBSOLETE
2329// OBSOLETE static SEM_PC
2330// OBSOLETE SEM_FN_NAME (fr30bf,ldub) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2331// OBSOLETE {
2332// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr13.f
2333// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2334// OBSOLETE int UNUSED written = 0;
2335// OBSOLETE IADDR UNUSED pc = abuf->addr;
2336// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2337// OBSOLETE
2338// OBSOLETE {
2339// OBSOLETE SI opval = GETMEMUQI (current_cpu, pc, * FLD (i_Rj));
2340// OBSOLETE * FLD (i_Ri) = opval;
2341// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2342// OBSOLETE }
2343// OBSOLETE
2344// OBSOLETE return vpc;
2345// OBSOLETE #undef FLD
2346// OBSOLETE }
2347// OBSOLETE
2348// OBSOLETE /* ldr13: ld @($R13,$Rj),$Ri */
2349// OBSOLETE
2350// OBSOLETE static SEM_PC
2351// OBSOLETE SEM_FN_NAME (fr30bf,ldr13) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2352// OBSOLETE {
2353// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr13.f
2354// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2355// OBSOLETE int UNUSED written = 0;
2356// OBSOLETE IADDR UNUSED pc = abuf->addr;
2357// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2358// OBSOLETE
2359// OBSOLETE {
2360// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, ADDSI (* FLD (i_Rj), CPU (h_gr[((UINT) 13)])));
2361// OBSOLETE * FLD (i_Ri) = opval;
2362// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2363// OBSOLETE }
2364// OBSOLETE
2365// OBSOLETE return vpc;
2366// OBSOLETE #undef FLD
2367// OBSOLETE }
2368// OBSOLETE
2369// OBSOLETE /* ldr13uh: lduh @($R13,$Rj),$Ri */
2370// OBSOLETE
2371// OBSOLETE static SEM_PC
2372// OBSOLETE SEM_FN_NAME (fr30bf,ldr13uh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2373// OBSOLETE {
2374// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr13.f
2375// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2376// OBSOLETE int UNUSED written = 0;
2377// OBSOLETE IADDR UNUSED pc = abuf->addr;
2378// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2379// OBSOLETE
2380// OBSOLETE {
2381// OBSOLETE SI opval = GETMEMUHI (current_cpu, pc, ADDSI (* FLD (i_Rj), CPU (h_gr[((UINT) 13)])));
2382// OBSOLETE * FLD (i_Ri) = opval;
2383// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2384// OBSOLETE }
2385// OBSOLETE
2386// OBSOLETE return vpc;
2387// OBSOLETE #undef FLD
2388// OBSOLETE }
2389// OBSOLETE
2390// OBSOLETE /* ldr13ub: ldub @($R13,$Rj),$Ri */
2391// OBSOLETE
2392// OBSOLETE static SEM_PC
2393// OBSOLETE SEM_FN_NAME (fr30bf,ldr13ub) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2394// OBSOLETE {
2395// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr13.f
2396// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2397// OBSOLETE int UNUSED written = 0;
2398// OBSOLETE IADDR UNUSED pc = abuf->addr;
2399// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2400// OBSOLETE
2401// OBSOLETE {
2402// OBSOLETE SI opval = GETMEMUQI (current_cpu, pc, ADDSI (* FLD (i_Rj), CPU (h_gr[((UINT) 13)])));
2403// OBSOLETE * FLD (i_Ri) = opval;
2404// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2405// OBSOLETE }
2406// OBSOLETE
2407// OBSOLETE return vpc;
2408// OBSOLETE #undef FLD
2409// OBSOLETE }
2410// OBSOLETE
2411// OBSOLETE /* ldr14: ld @($R14,$disp10),$Ri */
2412// OBSOLETE
2413// OBSOLETE static SEM_PC
2414// OBSOLETE SEM_FN_NAME (fr30bf,ldr14) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2415// OBSOLETE {
2416// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr14.f
2417// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2418// OBSOLETE int UNUSED written = 0;
2419// OBSOLETE IADDR UNUSED pc = abuf->addr;
2420// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2421// OBSOLETE
2422// OBSOLETE {
2423// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, ADDSI (FLD (f_disp10), CPU (h_gr[((UINT) 14)])));
2424// OBSOLETE * FLD (i_Ri) = opval;
2425// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2426// OBSOLETE }
2427// OBSOLETE
2428// OBSOLETE return vpc;
2429// OBSOLETE #undef FLD
2430// OBSOLETE }
2431// OBSOLETE
2432// OBSOLETE /* ldr14uh: lduh @($R14,$disp9),$Ri */
2433// OBSOLETE
2434// OBSOLETE static SEM_PC
2435// OBSOLETE SEM_FN_NAME (fr30bf,ldr14uh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2436// OBSOLETE {
2437// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr14uh.f
2438// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2439// OBSOLETE int UNUSED written = 0;
2440// OBSOLETE IADDR UNUSED pc = abuf->addr;
2441// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2442// OBSOLETE
2443// OBSOLETE {
2444// OBSOLETE SI opval = GETMEMUHI (current_cpu, pc, ADDSI (FLD (f_disp9), CPU (h_gr[((UINT) 14)])));
2445// OBSOLETE * FLD (i_Ri) = opval;
2446// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2447// OBSOLETE }
2448// OBSOLETE
2449// OBSOLETE return vpc;
2450// OBSOLETE #undef FLD
2451// OBSOLETE }
2452// OBSOLETE
2453// OBSOLETE /* ldr14ub: ldub @($R14,$disp8),$Ri */
2454// OBSOLETE
2455// OBSOLETE static SEM_PC
2456// OBSOLETE SEM_FN_NAME (fr30bf,ldr14ub) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2457// OBSOLETE {
2458// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr14ub.f
2459// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2460// OBSOLETE int UNUSED written = 0;
2461// OBSOLETE IADDR UNUSED pc = abuf->addr;
2462// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2463// OBSOLETE
2464// OBSOLETE {
2465// OBSOLETE SI opval = GETMEMUQI (current_cpu, pc, ADDSI (FLD (f_disp8), CPU (h_gr[((UINT) 14)])));
2466// OBSOLETE * FLD (i_Ri) = opval;
2467// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2468// OBSOLETE }
2469// OBSOLETE
2470// OBSOLETE return vpc;
2471// OBSOLETE #undef FLD
2472// OBSOLETE }
2473// OBSOLETE
2474// OBSOLETE /* ldr15: ld @($R15,$udisp6),$Ri */
2475// OBSOLETE
2476// OBSOLETE static SEM_PC
2477// OBSOLETE SEM_FN_NAME (fr30bf,ldr15) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2478// OBSOLETE {
2479// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr15.f
2480// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2481// OBSOLETE int UNUSED written = 0;
2482// OBSOLETE IADDR UNUSED pc = abuf->addr;
2483// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2484// OBSOLETE
2485// OBSOLETE {
2486// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, ADDSI (FLD (f_udisp6), CPU (h_gr[((UINT) 15)])));
2487// OBSOLETE * FLD (i_Ri) = opval;
2488// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2489// OBSOLETE }
2490// OBSOLETE
2491// OBSOLETE return vpc;
2492// OBSOLETE #undef FLD
2493// OBSOLETE }
2494// OBSOLETE
2495// OBSOLETE /* ldr15gr: ld @$R15+,$Ri */
2496// OBSOLETE
2497// OBSOLETE static SEM_PC
2498// OBSOLETE SEM_FN_NAME (fr30bf,ldr15gr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2499// OBSOLETE {
2500// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr15gr.f
2501// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2502// OBSOLETE int UNUSED written = 0;
2503// OBSOLETE IADDR UNUSED pc = abuf->addr;
2504// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2505// OBSOLETE
2506// OBSOLETE {
2507// OBSOLETE {
2508// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
2509// OBSOLETE * FLD (i_Ri) = opval;
2510// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2511// OBSOLETE }
2512// OBSOLETE if (NESI (FLD (f_Ri), 15)) {
2513// OBSOLETE {
2514// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
2515// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
2516// OBSOLETE written |= (1 << 4);
2517// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2518// OBSOLETE }
2519// OBSOLETE }
2520// OBSOLETE }
2521// OBSOLETE
2522// OBSOLETE abuf->written = written;
2523// OBSOLETE return vpc;
2524// OBSOLETE #undef FLD
2525// OBSOLETE }
2526// OBSOLETE
2527// OBSOLETE /* ldr15dr: ld @$R15+,$Rs2 */
2528// OBSOLETE
2529// OBSOLETE static SEM_PC
2530// OBSOLETE SEM_FN_NAME (fr30bf,ldr15dr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2531// OBSOLETE {
2532// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr15dr.f
2533// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2534// OBSOLETE int UNUSED written = 0;
2535// OBSOLETE IADDR UNUSED pc = abuf->addr;
2536// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2537// OBSOLETE
2538// OBSOLETE {
2539// OBSOLETE SI tmp_tmp;
2540// OBSOLETE tmp_tmp = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
2541// OBSOLETE {
2542// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
2543// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
2544// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2545// OBSOLETE }
2546// OBSOLETE {
2547// OBSOLETE SI opval = tmp_tmp;
2548// OBSOLETE SET_H_DR (FLD (f_Rs2), opval);
2549// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
2550// OBSOLETE }
2551// OBSOLETE }
2552// OBSOLETE
2553// OBSOLETE return vpc;
2554// OBSOLETE #undef FLD
2555// OBSOLETE }
2556// OBSOLETE
2557// OBSOLETE /* ldr15ps: ld @$R15+,$ps */
2558// OBSOLETE
2559// OBSOLETE static SEM_PC
2560// OBSOLETE SEM_FN_NAME (fr30bf,ldr15ps) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2561// OBSOLETE {
2562// OBSOLETE #define FLD(f) abuf->fields.sfmt_addsp.f
2563// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2564// OBSOLETE int UNUSED written = 0;
2565// OBSOLETE IADDR UNUSED pc = abuf->addr;
2566// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2567// OBSOLETE
2568// OBSOLETE {
2569// OBSOLETE {
2570// OBSOLETE USI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
2571// OBSOLETE SET_H_PS (opval);
2572// OBSOLETE TRACE_RESULT (current_cpu, abuf, "ps", 'x', opval);
2573// OBSOLETE }
2574// OBSOLETE {
2575// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
2576// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
2577// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2578// OBSOLETE }
2579// OBSOLETE }
2580// OBSOLETE
2581// OBSOLETE return vpc;
2582// OBSOLETE #undef FLD
2583// OBSOLETE }
2584// OBSOLETE
2585// OBSOLETE /* st: st $Ri,@$Rj */
2586// OBSOLETE
2587// OBSOLETE static SEM_PC
2588// OBSOLETE SEM_FN_NAME (fr30bf,st) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2589// OBSOLETE {
2590// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
2591// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2592// OBSOLETE int UNUSED written = 0;
2593// OBSOLETE IADDR UNUSED pc = abuf->addr;
2594// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2595// OBSOLETE
2596// OBSOLETE {
2597// OBSOLETE SI opval = * FLD (i_Ri);
2598// OBSOLETE SETMEMSI (current_cpu, pc, * FLD (i_Rj), opval);
2599// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2600// OBSOLETE }
2601// OBSOLETE
2602// OBSOLETE return vpc;
2603// OBSOLETE #undef FLD
2604// OBSOLETE }
2605// OBSOLETE
2606// OBSOLETE /* sth: sth $Ri,@$Rj */
2607// OBSOLETE
2608// OBSOLETE static SEM_PC
2609// OBSOLETE SEM_FN_NAME (fr30bf,sth) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2610// OBSOLETE {
2611// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
2612// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2613// OBSOLETE int UNUSED written = 0;
2614// OBSOLETE IADDR UNUSED pc = abuf->addr;
2615// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2616// OBSOLETE
2617// OBSOLETE {
2618// OBSOLETE HI opval = * FLD (i_Ri);
2619// OBSOLETE SETMEMHI (current_cpu, pc, * FLD (i_Rj), opval);
2620// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2621// OBSOLETE }
2622// OBSOLETE
2623// OBSOLETE return vpc;
2624// OBSOLETE #undef FLD
2625// OBSOLETE }
2626// OBSOLETE
2627// OBSOLETE /* stb: stb $Ri,@$Rj */
2628// OBSOLETE
2629// OBSOLETE static SEM_PC
2630// OBSOLETE SEM_FN_NAME (fr30bf,stb) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2631// OBSOLETE {
2632// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
2633// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2634// OBSOLETE int UNUSED written = 0;
2635// OBSOLETE IADDR UNUSED pc = abuf->addr;
2636// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2637// OBSOLETE
2638// OBSOLETE {
2639// OBSOLETE QI opval = * FLD (i_Ri);
2640// OBSOLETE SETMEMQI (current_cpu, pc, * FLD (i_Rj), opval);
2641// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2642// OBSOLETE }
2643// OBSOLETE
2644// OBSOLETE return vpc;
2645// OBSOLETE #undef FLD
2646// OBSOLETE }
2647// OBSOLETE
2648// OBSOLETE /* str13: st $Ri,@($R13,$Rj) */
2649// OBSOLETE
2650// OBSOLETE static SEM_PC
2651// OBSOLETE SEM_FN_NAME (fr30bf,str13) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2652// OBSOLETE {
2653// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
2654// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2655// OBSOLETE int UNUSED written = 0;
2656// OBSOLETE IADDR UNUSED pc = abuf->addr;
2657// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2658// OBSOLETE
2659// OBSOLETE {
2660// OBSOLETE SI opval = * FLD (i_Ri);
2661// OBSOLETE SETMEMSI (current_cpu, pc, ADDSI (* FLD (i_Rj), CPU (h_gr[((UINT) 13)])), opval);
2662// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2663// OBSOLETE }
2664// OBSOLETE
2665// OBSOLETE return vpc;
2666// OBSOLETE #undef FLD
2667// OBSOLETE }
2668// OBSOLETE
2669// OBSOLETE /* str13h: sth $Ri,@($R13,$Rj) */
2670// OBSOLETE
2671// OBSOLETE static SEM_PC
2672// OBSOLETE SEM_FN_NAME (fr30bf,str13h) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2673// OBSOLETE {
2674// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
2675// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2676// OBSOLETE int UNUSED written = 0;
2677// OBSOLETE IADDR UNUSED pc = abuf->addr;
2678// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2679// OBSOLETE
2680// OBSOLETE {
2681// OBSOLETE HI opval = * FLD (i_Ri);
2682// OBSOLETE SETMEMHI (current_cpu, pc, ADDSI (* FLD (i_Rj), CPU (h_gr[((UINT) 13)])), opval);
2683// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2684// OBSOLETE }
2685// OBSOLETE
2686// OBSOLETE return vpc;
2687// OBSOLETE #undef FLD
2688// OBSOLETE }
2689// OBSOLETE
2690// OBSOLETE /* str13b: stb $Ri,@($R13,$Rj) */
2691// OBSOLETE
2692// OBSOLETE static SEM_PC
2693// OBSOLETE SEM_FN_NAME (fr30bf,str13b) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2694// OBSOLETE {
2695// OBSOLETE #define FLD(f) abuf->fields.sfmt_str13.f
2696// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2697// OBSOLETE int UNUSED written = 0;
2698// OBSOLETE IADDR UNUSED pc = abuf->addr;
2699// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2700// OBSOLETE
2701// OBSOLETE {
2702// OBSOLETE QI opval = * FLD (i_Ri);
2703// OBSOLETE SETMEMQI (current_cpu, pc, ADDSI (* FLD (i_Rj), CPU (h_gr[((UINT) 13)])), opval);
2704// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2705// OBSOLETE }
2706// OBSOLETE
2707// OBSOLETE return vpc;
2708// OBSOLETE #undef FLD
2709// OBSOLETE }
2710// OBSOLETE
2711// OBSOLETE /* str14: st $Ri,@($R14,$disp10) */
2712// OBSOLETE
2713// OBSOLETE static SEM_PC
2714// OBSOLETE SEM_FN_NAME (fr30bf,str14) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2715// OBSOLETE {
2716// OBSOLETE #define FLD(f) abuf->fields.sfmt_str14.f
2717// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2718// OBSOLETE int UNUSED written = 0;
2719// OBSOLETE IADDR UNUSED pc = abuf->addr;
2720// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2721// OBSOLETE
2722// OBSOLETE {
2723// OBSOLETE SI opval = * FLD (i_Ri);
2724// OBSOLETE SETMEMSI (current_cpu, pc, ADDSI (FLD (f_disp10), CPU (h_gr[((UINT) 14)])), opval);
2725// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2726// OBSOLETE }
2727// OBSOLETE
2728// OBSOLETE return vpc;
2729// OBSOLETE #undef FLD
2730// OBSOLETE }
2731// OBSOLETE
2732// OBSOLETE /* str14h: sth $Ri,@($R14,$disp9) */
2733// OBSOLETE
2734// OBSOLETE static SEM_PC
2735// OBSOLETE SEM_FN_NAME (fr30bf,str14h) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2736// OBSOLETE {
2737// OBSOLETE #define FLD(f) abuf->fields.sfmt_str14h.f
2738// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2739// OBSOLETE int UNUSED written = 0;
2740// OBSOLETE IADDR UNUSED pc = abuf->addr;
2741// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2742// OBSOLETE
2743// OBSOLETE {
2744// OBSOLETE HI opval = * FLD (i_Ri);
2745// OBSOLETE SETMEMHI (current_cpu, pc, ADDSI (FLD (f_disp9), CPU (h_gr[((UINT) 14)])), opval);
2746// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2747// OBSOLETE }
2748// OBSOLETE
2749// OBSOLETE return vpc;
2750// OBSOLETE #undef FLD
2751// OBSOLETE }
2752// OBSOLETE
2753// OBSOLETE /* str14b: stb $Ri,@($R14,$disp8) */
2754// OBSOLETE
2755// OBSOLETE static SEM_PC
2756// OBSOLETE SEM_FN_NAME (fr30bf,str14b) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2757// OBSOLETE {
2758// OBSOLETE #define FLD(f) abuf->fields.sfmt_str14b.f
2759// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2760// OBSOLETE int UNUSED written = 0;
2761// OBSOLETE IADDR UNUSED pc = abuf->addr;
2762// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2763// OBSOLETE
2764// OBSOLETE {
2765// OBSOLETE QI opval = * FLD (i_Ri);
2766// OBSOLETE SETMEMQI (current_cpu, pc, ADDSI (FLD (f_disp8), CPU (h_gr[((UINT) 14)])), opval);
2767// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2768// OBSOLETE }
2769// OBSOLETE
2770// OBSOLETE return vpc;
2771// OBSOLETE #undef FLD
2772// OBSOLETE }
2773// OBSOLETE
2774// OBSOLETE /* str15: st $Ri,@($R15,$udisp6) */
2775// OBSOLETE
2776// OBSOLETE static SEM_PC
2777// OBSOLETE SEM_FN_NAME (fr30bf,str15) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2778// OBSOLETE {
2779// OBSOLETE #define FLD(f) abuf->fields.sfmt_str15.f
2780// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2781// OBSOLETE int UNUSED written = 0;
2782// OBSOLETE IADDR UNUSED pc = abuf->addr;
2783// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2784// OBSOLETE
2785// OBSOLETE {
2786// OBSOLETE SI opval = * FLD (i_Ri);
2787// OBSOLETE SETMEMSI (current_cpu, pc, ADDSI (CPU (h_gr[((UINT) 15)]), FLD (f_udisp6)), opval);
2788// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2789// OBSOLETE }
2790// OBSOLETE
2791// OBSOLETE return vpc;
2792// OBSOLETE #undef FLD
2793// OBSOLETE }
2794// OBSOLETE
2795// OBSOLETE /* str15gr: st $Ri,@-$R15 */
2796// OBSOLETE
2797// OBSOLETE static SEM_PC
2798// OBSOLETE SEM_FN_NAME (fr30bf,str15gr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2799// OBSOLETE {
2800// OBSOLETE #define FLD(f) abuf->fields.sfmt_str15gr.f
2801// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2802// OBSOLETE int UNUSED written = 0;
2803// OBSOLETE IADDR UNUSED pc = abuf->addr;
2804// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2805// OBSOLETE
2806// OBSOLETE {
2807// OBSOLETE SI tmp_tmp;
2808// OBSOLETE tmp_tmp = * FLD (i_Ri);
2809// OBSOLETE {
2810// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
2811// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
2812// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2813// OBSOLETE }
2814// OBSOLETE {
2815// OBSOLETE SI opval = tmp_tmp;
2816// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
2817// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2818// OBSOLETE }
2819// OBSOLETE }
2820// OBSOLETE
2821// OBSOLETE return vpc;
2822// OBSOLETE #undef FLD
2823// OBSOLETE }
2824// OBSOLETE
2825// OBSOLETE /* str15dr: st $Rs2,@-$R15 */
2826// OBSOLETE
2827// OBSOLETE static SEM_PC
2828// OBSOLETE SEM_FN_NAME (fr30bf,str15dr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2829// OBSOLETE {
2830// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr15dr.f
2831// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2832// OBSOLETE int UNUSED written = 0;
2833// OBSOLETE IADDR UNUSED pc = abuf->addr;
2834// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2835// OBSOLETE
2836// OBSOLETE {
2837// OBSOLETE SI tmp_tmp;
2838// OBSOLETE tmp_tmp = GET_H_DR (FLD (f_Rs2));
2839// OBSOLETE {
2840// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
2841// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
2842// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2843// OBSOLETE }
2844// OBSOLETE {
2845// OBSOLETE SI opval = tmp_tmp;
2846// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
2847// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2848// OBSOLETE }
2849// OBSOLETE }
2850// OBSOLETE
2851// OBSOLETE return vpc;
2852// OBSOLETE #undef FLD
2853// OBSOLETE }
2854// OBSOLETE
2855// OBSOLETE /* str15ps: st $ps,@-$R15 */
2856// OBSOLETE
2857// OBSOLETE static SEM_PC
2858// OBSOLETE SEM_FN_NAME (fr30bf,str15ps) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2859// OBSOLETE {
2860// OBSOLETE #define FLD(f) abuf->fields.sfmt_addsp.f
2861// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2862// OBSOLETE int UNUSED written = 0;
2863// OBSOLETE IADDR UNUSED pc = abuf->addr;
2864// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2865// OBSOLETE
2866// OBSOLETE {
2867// OBSOLETE {
2868// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
2869// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
2870// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2871// OBSOLETE }
2872// OBSOLETE {
2873// OBSOLETE SI opval = GET_H_PS ();
2874// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
2875// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
2876// OBSOLETE }
2877// OBSOLETE }
2878// OBSOLETE
2879// OBSOLETE return vpc;
2880// OBSOLETE #undef FLD
2881// OBSOLETE }
2882// OBSOLETE
2883// OBSOLETE /* mov: mov $Rj,$Ri */
2884// OBSOLETE
2885// OBSOLETE static SEM_PC
2886// OBSOLETE SEM_FN_NAME (fr30bf,mov) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2887// OBSOLETE {
2888// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldr13.f
2889// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2890// OBSOLETE int UNUSED written = 0;
2891// OBSOLETE IADDR UNUSED pc = abuf->addr;
2892// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2893// OBSOLETE
2894// OBSOLETE {
2895// OBSOLETE SI opval = * FLD (i_Rj);
2896// OBSOLETE * FLD (i_Ri) = opval;
2897// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2898// OBSOLETE }
2899// OBSOLETE
2900// OBSOLETE return vpc;
2901// OBSOLETE #undef FLD
2902// OBSOLETE }
2903// OBSOLETE
2904// OBSOLETE /* movdr: mov $Rs1,$Ri */
2905// OBSOLETE
2906// OBSOLETE static SEM_PC
2907// OBSOLETE SEM_FN_NAME (fr30bf,movdr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2908// OBSOLETE {
2909// OBSOLETE #define FLD(f) abuf->fields.sfmt_movdr.f
2910// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2911// OBSOLETE int UNUSED written = 0;
2912// OBSOLETE IADDR UNUSED pc = abuf->addr;
2913// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2914// OBSOLETE
2915// OBSOLETE {
2916// OBSOLETE SI opval = GET_H_DR (FLD (f_Rs1));
2917// OBSOLETE * FLD (i_Ri) = opval;
2918// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2919// OBSOLETE }
2920// OBSOLETE
2921// OBSOLETE return vpc;
2922// OBSOLETE #undef FLD
2923// OBSOLETE }
2924// OBSOLETE
2925// OBSOLETE /* movps: mov $ps,$Ri */
2926// OBSOLETE
2927// OBSOLETE static SEM_PC
2928// OBSOLETE SEM_FN_NAME (fr30bf,movps) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2929// OBSOLETE {
2930// OBSOLETE #define FLD(f) abuf->fields.sfmt_movdr.f
2931// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2932// OBSOLETE int UNUSED written = 0;
2933// OBSOLETE IADDR UNUSED pc = abuf->addr;
2934// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2935// OBSOLETE
2936// OBSOLETE {
2937// OBSOLETE SI opval = GET_H_PS ();
2938// OBSOLETE * FLD (i_Ri) = opval;
2939// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
2940// OBSOLETE }
2941// OBSOLETE
2942// OBSOLETE return vpc;
2943// OBSOLETE #undef FLD
2944// OBSOLETE }
2945// OBSOLETE
2946// OBSOLETE /* mov2dr: mov $Ri,$Rs1 */
2947// OBSOLETE
2948// OBSOLETE static SEM_PC
2949// OBSOLETE SEM_FN_NAME (fr30bf,mov2dr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2950// OBSOLETE {
2951// OBSOLETE #define FLD(f) abuf->fields.sfmt_mov2dr.f
2952// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2953// OBSOLETE int UNUSED written = 0;
2954// OBSOLETE IADDR UNUSED pc = abuf->addr;
2955// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2956// OBSOLETE
2957// OBSOLETE {
2958// OBSOLETE SI opval = * FLD (i_Ri);
2959// OBSOLETE SET_H_DR (FLD (f_Rs1), opval);
2960// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
2961// OBSOLETE }
2962// OBSOLETE
2963// OBSOLETE return vpc;
2964// OBSOLETE #undef FLD
2965// OBSOLETE }
2966// OBSOLETE
2967// OBSOLETE /* mov2ps: mov $Ri,$ps */
2968// OBSOLETE
2969// OBSOLETE static SEM_PC
2970// OBSOLETE SEM_FN_NAME (fr30bf,mov2ps) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2971// OBSOLETE {
2972// OBSOLETE #define FLD(f) abuf->fields.sfmt_mov2dr.f
2973// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2974// OBSOLETE int UNUSED written = 0;
2975// OBSOLETE IADDR UNUSED pc = abuf->addr;
2976// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2977// OBSOLETE
2978// OBSOLETE {
2979// OBSOLETE USI opval = * FLD (i_Ri);
2980// OBSOLETE SET_H_PS (opval);
2981// OBSOLETE TRACE_RESULT (current_cpu, abuf, "ps", 'x', opval);
2982// OBSOLETE }
2983// OBSOLETE
2984// OBSOLETE return vpc;
2985// OBSOLETE #undef FLD
2986// OBSOLETE }
2987// OBSOLETE
2988// OBSOLETE /* jmp: jmp @$Ri */
2989// OBSOLETE
2990// OBSOLETE static SEM_PC
2991// OBSOLETE SEM_FN_NAME (fr30bf,jmp) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
2992// OBSOLETE {
2993// OBSOLETE #define FLD(f) abuf->fields.sfmt_mov2dr.f
2994// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
2995// OBSOLETE int UNUSED written = 0;
2996// OBSOLETE IADDR UNUSED pc = abuf->addr;
2997// OBSOLETE SEM_BRANCH_INIT
2998// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
2999// OBSOLETE
3000// OBSOLETE {
3001// OBSOLETE USI opval = * FLD (i_Ri);
3002// OBSOLETE SEM_BRANCH_VIA_ADDR (current_cpu, sem_arg, opval, vpc);
3003// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3004// OBSOLETE }
3005// OBSOLETE
3006// OBSOLETE SEM_BRANCH_FINI (vpc);
3007// OBSOLETE return vpc;
3008// OBSOLETE #undef FLD
3009// OBSOLETE }
3010// OBSOLETE
3011// OBSOLETE /* jmpd: jmp:d @$Ri */
3012// OBSOLETE
3013// OBSOLETE static SEM_PC
3014// OBSOLETE SEM_FN_NAME (fr30bf,jmpd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3015// OBSOLETE {
3016// OBSOLETE #define FLD(f) abuf->fields.sfmt_mov2dr.f
3017// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3018// OBSOLETE int UNUSED written = 0;
3019// OBSOLETE IADDR UNUSED pc = abuf->addr;
3020// OBSOLETE SEM_BRANCH_INIT
3021// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3022// OBSOLETE
3023// OBSOLETE {
3024// OBSOLETE {
3025// OBSOLETE USI opval = * FLD (i_Ri);
3026// OBSOLETE SEM_BRANCH_VIA_ADDR (current_cpu, sem_arg, opval, vpc);
3027// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3028// OBSOLETE }
3029// OBSOLETE }
3030// OBSOLETE
3031// OBSOLETE SEM_BRANCH_FINI (vpc);
3032// OBSOLETE return vpc;
3033// OBSOLETE #undef FLD
3034// OBSOLETE }
3035// OBSOLETE
3036// OBSOLETE /* callr: call @$Ri */
3037// OBSOLETE
3038// OBSOLETE static SEM_PC
3039// OBSOLETE SEM_FN_NAME (fr30bf,callr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3040// OBSOLETE {
3041// OBSOLETE #define FLD(f) abuf->fields.sfmt_mov2dr.f
3042// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3043// OBSOLETE int UNUSED written = 0;
3044// OBSOLETE IADDR UNUSED pc = abuf->addr;
3045// OBSOLETE SEM_BRANCH_INIT
3046// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3047// OBSOLETE
3048// OBSOLETE {
3049// OBSOLETE {
3050// OBSOLETE SI opval = ADDSI (pc, 2);
3051// OBSOLETE SET_H_DR (((UINT) 1), opval);
3052// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
3053// OBSOLETE }
3054// OBSOLETE {
3055// OBSOLETE USI opval = * FLD (i_Ri);
3056// OBSOLETE SEM_BRANCH_VIA_ADDR (current_cpu, sem_arg, opval, vpc);
3057// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3058// OBSOLETE }
3059// OBSOLETE }
3060// OBSOLETE
3061// OBSOLETE SEM_BRANCH_FINI (vpc);
3062// OBSOLETE return vpc;
3063// OBSOLETE #undef FLD
3064// OBSOLETE }
3065// OBSOLETE
3066// OBSOLETE /* callrd: call:d @$Ri */
3067// OBSOLETE
3068// OBSOLETE static SEM_PC
3069// OBSOLETE SEM_FN_NAME (fr30bf,callrd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3070// OBSOLETE {
3071// OBSOLETE #define FLD(f) abuf->fields.sfmt_mov2dr.f
3072// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3073// OBSOLETE int UNUSED written = 0;
3074// OBSOLETE IADDR UNUSED pc = abuf->addr;
3075// OBSOLETE SEM_BRANCH_INIT
3076// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3077// OBSOLETE
3078// OBSOLETE {
3079// OBSOLETE {
3080// OBSOLETE {
3081// OBSOLETE SI opval = ADDSI (pc, 4);
3082// OBSOLETE SET_H_DR (((UINT) 1), opval);
3083// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
3084// OBSOLETE }
3085// OBSOLETE {
3086// OBSOLETE USI opval = * FLD (i_Ri);
3087// OBSOLETE SEM_BRANCH_VIA_ADDR (current_cpu, sem_arg, opval, vpc);
3088// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3089// OBSOLETE }
3090// OBSOLETE }
3091// OBSOLETE }
3092// OBSOLETE
3093// OBSOLETE SEM_BRANCH_FINI (vpc);
3094// OBSOLETE return vpc;
3095// OBSOLETE #undef FLD
3096// OBSOLETE }
3097// OBSOLETE
3098// OBSOLETE /* call: call $label12 */
3099// OBSOLETE
3100// OBSOLETE static SEM_PC
3101// OBSOLETE SEM_FN_NAME (fr30bf,call) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3102// OBSOLETE {
3103// OBSOLETE #define FLD(f) abuf->fields.sfmt_call.f
3104// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3105// OBSOLETE int UNUSED written = 0;
3106// OBSOLETE IADDR UNUSED pc = abuf->addr;
3107// OBSOLETE SEM_BRANCH_INIT
3108// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3109// OBSOLETE
3110// OBSOLETE {
3111// OBSOLETE {
3112// OBSOLETE SI opval = ADDSI (pc, 2);
3113// OBSOLETE SET_H_DR (((UINT) 1), opval);
3114// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
3115// OBSOLETE }
3116// OBSOLETE {
3117// OBSOLETE USI opval = FLD (i_label12);
3118// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3119// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3120// OBSOLETE }
3121// OBSOLETE }
3122// OBSOLETE
3123// OBSOLETE SEM_BRANCH_FINI (vpc);
3124// OBSOLETE return vpc;
3125// OBSOLETE #undef FLD
3126// OBSOLETE }
3127// OBSOLETE
3128// OBSOLETE /* calld: call:d $label12 */
3129// OBSOLETE
3130// OBSOLETE static SEM_PC
3131// OBSOLETE SEM_FN_NAME (fr30bf,calld) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3132// OBSOLETE {
3133// OBSOLETE #define FLD(f) abuf->fields.sfmt_call.f
3134// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3135// OBSOLETE int UNUSED written = 0;
3136// OBSOLETE IADDR UNUSED pc = abuf->addr;
3137// OBSOLETE SEM_BRANCH_INIT
3138// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3139// OBSOLETE
3140// OBSOLETE {
3141// OBSOLETE {
3142// OBSOLETE {
3143// OBSOLETE SI opval = ADDSI (pc, 4);
3144// OBSOLETE SET_H_DR (((UINT) 1), opval);
3145// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
3146// OBSOLETE }
3147// OBSOLETE {
3148// OBSOLETE USI opval = FLD (i_label12);
3149// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3150// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3151// OBSOLETE }
3152// OBSOLETE }
3153// OBSOLETE }
3154// OBSOLETE
3155// OBSOLETE SEM_BRANCH_FINI (vpc);
3156// OBSOLETE return vpc;
3157// OBSOLETE #undef FLD
3158// OBSOLETE }
3159// OBSOLETE
3160// OBSOLETE /* ret: ret */
3161// OBSOLETE
3162// OBSOLETE static SEM_PC
3163// OBSOLETE SEM_FN_NAME (fr30bf,ret) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3164// OBSOLETE {
3165// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
3166// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3167// OBSOLETE int UNUSED written = 0;
3168// OBSOLETE IADDR UNUSED pc = abuf->addr;
3169// OBSOLETE SEM_BRANCH_INIT
3170// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3171// OBSOLETE
3172// OBSOLETE {
3173// OBSOLETE USI opval = GET_H_DR (((UINT) 1));
3174// OBSOLETE SEM_BRANCH_VIA_ADDR (current_cpu, sem_arg, opval, vpc);
3175// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3176// OBSOLETE }
3177// OBSOLETE
3178// OBSOLETE SEM_BRANCH_FINI (vpc);
3179// OBSOLETE return vpc;
3180// OBSOLETE #undef FLD
3181// OBSOLETE }
3182// OBSOLETE
3183// OBSOLETE /* ret:d: ret:d */
3184// OBSOLETE
3185// OBSOLETE static SEM_PC
3186// OBSOLETE SEM_FN_NAME (fr30bf,ret_d) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3187// OBSOLETE {
3188// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
3189// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3190// OBSOLETE int UNUSED written = 0;
3191// OBSOLETE IADDR UNUSED pc = abuf->addr;
3192// OBSOLETE SEM_BRANCH_INIT
3193// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3194// OBSOLETE
3195// OBSOLETE {
3196// OBSOLETE {
3197// OBSOLETE USI opval = GET_H_DR (((UINT) 1));
3198// OBSOLETE SEM_BRANCH_VIA_ADDR (current_cpu, sem_arg, opval, vpc);
3199// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3200// OBSOLETE }
3201// OBSOLETE }
3202// OBSOLETE
3203// OBSOLETE SEM_BRANCH_FINI (vpc);
3204// OBSOLETE return vpc;
3205// OBSOLETE #undef FLD
3206// OBSOLETE }
3207// OBSOLETE
3208// OBSOLETE /* int: int $u8 */
3209// OBSOLETE
3210// OBSOLETE static SEM_PC
3211// OBSOLETE SEM_FN_NAME (fr30bf,int) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3212// OBSOLETE {
3213// OBSOLETE #define FLD(f) abuf->fields.sfmt_int.f
3214// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3215// OBSOLETE int UNUSED written = 0;
3216// OBSOLETE IADDR UNUSED pc = abuf->addr;
3217// OBSOLETE SEM_BRANCH_INIT
3218// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3219// OBSOLETE
3220// OBSOLETE {
3221// OBSOLETE ; /*clobber*/
3222// OBSOLETE ; /*clobber*/
3223// OBSOLETE ; /*clobber*/
3224// OBSOLETE {
3225// OBSOLETE SI opval = fr30_int (current_cpu, pc, FLD (f_u8));
3226// OBSOLETE SEM_BRANCH_VIA_ADDR (current_cpu, sem_arg, opval, vpc);
3227// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3228// OBSOLETE }
3229// OBSOLETE }
3230// OBSOLETE
3231// OBSOLETE SEM_BRANCH_FINI (vpc);
3232// OBSOLETE return vpc;
3233// OBSOLETE #undef FLD
3234// OBSOLETE }
3235// OBSOLETE
3236// OBSOLETE /* inte: inte */
3237// OBSOLETE
3238// OBSOLETE static SEM_PC
3239// OBSOLETE SEM_FN_NAME (fr30bf,inte) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3240// OBSOLETE {
3241// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
3242// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3243// OBSOLETE int UNUSED written = 0;
3244// OBSOLETE IADDR UNUSED pc = abuf->addr;
3245// OBSOLETE SEM_BRANCH_INIT
3246// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3247// OBSOLETE
3248// OBSOLETE {
3249// OBSOLETE ; /*clobber*/
3250// OBSOLETE ; /*clobber*/
3251// OBSOLETE ; /*clobber*/
3252// OBSOLETE {
3253// OBSOLETE SI opval = fr30_inte (current_cpu, pc);
3254// OBSOLETE SEM_BRANCH_VIA_ADDR (current_cpu, sem_arg, opval, vpc);
3255// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3256// OBSOLETE }
3257// OBSOLETE }
3258// OBSOLETE
3259// OBSOLETE SEM_BRANCH_FINI (vpc);
3260// OBSOLETE return vpc;
3261// OBSOLETE #undef FLD
3262// OBSOLETE }
3263// OBSOLETE
3264// OBSOLETE /* reti: reti */
3265// OBSOLETE
3266// OBSOLETE static SEM_PC
3267// OBSOLETE SEM_FN_NAME (fr30bf,reti) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3268// OBSOLETE {
3269// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
3270// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3271// OBSOLETE int UNUSED written = 0;
3272// OBSOLETE IADDR UNUSED pc = abuf->addr;
3273// OBSOLETE SEM_BRANCH_INIT
3274// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3275// OBSOLETE
3276// OBSOLETE if (EQBI (GET_H_SBIT (), 0)) {
3277// OBSOLETE {
3278// OBSOLETE {
3279// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, GET_H_DR (((UINT) 2)));
3280// OBSOLETE SEM_BRANCH_VIA_ADDR (current_cpu, sem_arg, opval, vpc);
3281// OBSOLETE written |= (1 << 7);
3282// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3283// OBSOLETE }
3284// OBSOLETE {
3285// OBSOLETE SI opval = ADDSI (GET_H_DR (((UINT) 2)), 4);
3286// OBSOLETE SET_H_DR (((UINT) 2), opval);
3287// OBSOLETE written |= (1 << 5);
3288// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
3289// OBSOLETE }
3290// OBSOLETE {
3291// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, GET_H_DR (((UINT) 2)));
3292// OBSOLETE SET_H_PS (opval);
3293// OBSOLETE written |= (1 << 8);
3294// OBSOLETE TRACE_RESULT (current_cpu, abuf, "ps", 'x', opval);
3295// OBSOLETE }
3296// OBSOLETE {
3297// OBSOLETE SI opval = ADDSI (GET_H_DR (((UINT) 2)), 4);
3298// OBSOLETE SET_H_DR (((UINT) 2), opval);
3299// OBSOLETE written |= (1 << 5);
3300// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
3301// OBSOLETE }
3302// OBSOLETE }
3303// OBSOLETE } else {
3304// OBSOLETE {
3305// OBSOLETE {
3306// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, GET_H_DR (((UINT) 3)));
3307// OBSOLETE SEM_BRANCH_VIA_ADDR (current_cpu, sem_arg, opval, vpc);
3308// OBSOLETE written |= (1 << 7);
3309// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3310// OBSOLETE }
3311// OBSOLETE {
3312// OBSOLETE SI opval = ADDSI (GET_H_DR (((UINT) 3)), 4);
3313// OBSOLETE SET_H_DR (((UINT) 3), opval);
3314// OBSOLETE written |= (1 << 6);
3315// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
3316// OBSOLETE }
3317// OBSOLETE {
3318// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, GET_H_DR (((UINT) 3)));
3319// OBSOLETE SET_H_PS (opval);
3320// OBSOLETE written |= (1 << 8);
3321// OBSOLETE TRACE_RESULT (current_cpu, abuf, "ps", 'x', opval);
3322// OBSOLETE }
3323// OBSOLETE {
3324// OBSOLETE SI opval = ADDSI (GET_H_DR (((UINT) 3)), 4);
3325// OBSOLETE SET_H_DR (((UINT) 3), opval);
3326// OBSOLETE written |= (1 << 6);
3327// OBSOLETE TRACE_RESULT (current_cpu, abuf, "dr", 'x', opval);
3328// OBSOLETE }
3329// OBSOLETE }
3330// OBSOLETE }
3331// OBSOLETE
3332// OBSOLETE abuf->written = written;
3333// OBSOLETE SEM_BRANCH_FINI (vpc);
3334// OBSOLETE return vpc;
3335// OBSOLETE #undef FLD
3336// OBSOLETE }
3337// OBSOLETE
3338// OBSOLETE /* brad: bra:d $label9 */
3339// OBSOLETE
3340// OBSOLETE static SEM_PC
3341// OBSOLETE SEM_FN_NAME (fr30bf,brad) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3342// OBSOLETE {
3343// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3344// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3345// OBSOLETE int UNUSED written = 0;
3346// OBSOLETE IADDR UNUSED pc = abuf->addr;
3347// OBSOLETE SEM_BRANCH_INIT
3348// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3349// OBSOLETE
3350// OBSOLETE {
3351// OBSOLETE {
3352// OBSOLETE USI opval = FLD (i_label9);
3353// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3354// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3355// OBSOLETE }
3356// OBSOLETE }
3357// OBSOLETE
3358// OBSOLETE SEM_BRANCH_FINI (vpc);
3359// OBSOLETE return vpc;
3360// OBSOLETE #undef FLD
3361// OBSOLETE }
3362// OBSOLETE
3363// OBSOLETE /* bra: bra $label9 */
3364// OBSOLETE
3365// OBSOLETE static SEM_PC
3366// OBSOLETE SEM_FN_NAME (fr30bf,bra) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3367// OBSOLETE {
3368// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3369// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3370// OBSOLETE int UNUSED written = 0;
3371// OBSOLETE IADDR UNUSED pc = abuf->addr;
3372// OBSOLETE SEM_BRANCH_INIT
3373// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3374// OBSOLETE
3375// OBSOLETE {
3376// OBSOLETE USI opval = FLD (i_label9);
3377// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3378// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3379// OBSOLETE }
3380// OBSOLETE
3381// OBSOLETE SEM_BRANCH_FINI (vpc);
3382// OBSOLETE return vpc;
3383// OBSOLETE #undef FLD
3384// OBSOLETE }
3385// OBSOLETE
3386// OBSOLETE /* bnod: bno:d $label9 */
3387// OBSOLETE
3388// OBSOLETE static SEM_PC
3389// OBSOLETE SEM_FN_NAME (fr30bf,bnod) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3390// OBSOLETE {
3391// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
3392// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3393// OBSOLETE int UNUSED written = 0;
3394// OBSOLETE IADDR UNUSED pc = abuf->addr;
3395// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3396// OBSOLETE
3397// OBSOLETE {
3398// OBSOLETE ((void) 0); /*nop*/
3399// OBSOLETE }
3400// OBSOLETE
3401// OBSOLETE return vpc;
3402// OBSOLETE #undef FLD
3403// OBSOLETE }
3404// OBSOLETE
3405// OBSOLETE /* bno: bno $label9 */
3406// OBSOLETE
3407// OBSOLETE static SEM_PC
3408// OBSOLETE SEM_FN_NAME (fr30bf,bno) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3409// OBSOLETE {
3410// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
3411// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3412// OBSOLETE int UNUSED written = 0;
3413// OBSOLETE IADDR UNUSED pc = abuf->addr;
3414// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3415// OBSOLETE
3416// OBSOLETE ((void) 0); /*nop*/
3417// OBSOLETE
3418// OBSOLETE return vpc;
3419// OBSOLETE #undef FLD
3420// OBSOLETE }
3421// OBSOLETE
3422// OBSOLETE /* beqd: beq:d $label9 */
3423// OBSOLETE
3424// OBSOLETE static SEM_PC
3425// OBSOLETE SEM_FN_NAME (fr30bf,beqd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3426// OBSOLETE {
3427// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3428// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3429// OBSOLETE int UNUSED written = 0;
3430// OBSOLETE IADDR UNUSED pc = abuf->addr;
3431// OBSOLETE SEM_BRANCH_INIT
3432// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3433// OBSOLETE
3434// OBSOLETE {
3435// OBSOLETE if (CPU (h_zbit)) {
3436// OBSOLETE {
3437// OBSOLETE USI opval = FLD (i_label9);
3438// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3439// OBSOLETE written |= (1 << 2);
3440// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3441// OBSOLETE }
3442// OBSOLETE }
3443// OBSOLETE }
3444// OBSOLETE
3445// OBSOLETE abuf->written = written;
3446// OBSOLETE SEM_BRANCH_FINI (vpc);
3447// OBSOLETE return vpc;
3448// OBSOLETE #undef FLD
3449// OBSOLETE }
3450// OBSOLETE
3451// OBSOLETE /* beq: beq $label9 */
3452// OBSOLETE
3453// OBSOLETE static SEM_PC
3454// OBSOLETE SEM_FN_NAME (fr30bf,beq) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3455// OBSOLETE {
3456// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3457// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3458// OBSOLETE int UNUSED written = 0;
3459// OBSOLETE IADDR UNUSED pc = abuf->addr;
3460// OBSOLETE SEM_BRANCH_INIT
3461// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3462// OBSOLETE
3463// OBSOLETE if (CPU (h_zbit)) {
3464// OBSOLETE {
3465// OBSOLETE USI opval = FLD (i_label9);
3466// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3467// OBSOLETE written |= (1 << 2);
3468// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3469// OBSOLETE }
3470// OBSOLETE }
3471// OBSOLETE
3472// OBSOLETE abuf->written = written;
3473// OBSOLETE SEM_BRANCH_FINI (vpc);
3474// OBSOLETE return vpc;
3475// OBSOLETE #undef FLD
3476// OBSOLETE }
3477// OBSOLETE
3478// OBSOLETE /* bned: bne:d $label9 */
3479// OBSOLETE
3480// OBSOLETE static SEM_PC
3481// OBSOLETE SEM_FN_NAME (fr30bf,bned) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3482// OBSOLETE {
3483// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3484// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3485// OBSOLETE int UNUSED written = 0;
3486// OBSOLETE IADDR UNUSED pc = abuf->addr;
3487// OBSOLETE SEM_BRANCH_INIT
3488// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3489// OBSOLETE
3490// OBSOLETE {
3491// OBSOLETE if (NOTBI (CPU (h_zbit))) {
3492// OBSOLETE {
3493// OBSOLETE USI opval = FLD (i_label9);
3494// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3495// OBSOLETE written |= (1 << 2);
3496// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3497// OBSOLETE }
3498// OBSOLETE }
3499// OBSOLETE }
3500// OBSOLETE
3501// OBSOLETE abuf->written = written;
3502// OBSOLETE SEM_BRANCH_FINI (vpc);
3503// OBSOLETE return vpc;
3504// OBSOLETE #undef FLD
3505// OBSOLETE }
3506// OBSOLETE
3507// OBSOLETE /* bne: bne $label9 */
3508// OBSOLETE
3509// OBSOLETE static SEM_PC
3510// OBSOLETE SEM_FN_NAME (fr30bf,bne) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3511// OBSOLETE {
3512// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3513// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3514// OBSOLETE int UNUSED written = 0;
3515// OBSOLETE IADDR UNUSED pc = abuf->addr;
3516// OBSOLETE SEM_BRANCH_INIT
3517// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3518// OBSOLETE
3519// OBSOLETE if (NOTBI (CPU (h_zbit))) {
3520// OBSOLETE {
3521// OBSOLETE USI opval = FLD (i_label9);
3522// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3523// OBSOLETE written |= (1 << 2);
3524// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3525// OBSOLETE }
3526// OBSOLETE }
3527// OBSOLETE
3528// OBSOLETE abuf->written = written;
3529// OBSOLETE SEM_BRANCH_FINI (vpc);
3530// OBSOLETE return vpc;
3531// OBSOLETE #undef FLD
3532// OBSOLETE }
3533// OBSOLETE
3534// OBSOLETE /* bcd: bc:d $label9 */
3535// OBSOLETE
3536// OBSOLETE static SEM_PC
3537// OBSOLETE SEM_FN_NAME (fr30bf,bcd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3538// OBSOLETE {
3539// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3540// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3541// OBSOLETE int UNUSED written = 0;
3542// OBSOLETE IADDR UNUSED pc = abuf->addr;
3543// OBSOLETE SEM_BRANCH_INIT
3544// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3545// OBSOLETE
3546// OBSOLETE {
3547// OBSOLETE if (CPU (h_cbit)) {
3548// OBSOLETE {
3549// OBSOLETE USI opval = FLD (i_label9);
3550// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3551// OBSOLETE written |= (1 << 2);
3552// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3553// OBSOLETE }
3554// OBSOLETE }
3555// OBSOLETE }
3556// OBSOLETE
3557// OBSOLETE abuf->written = written;
3558// OBSOLETE SEM_BRANCH_FINI (vpc);
3559// OBSOLETE return vpc;
3560// OBSOLETE #undef FLD
3561// OBSOLETE }
3562// OBSOLETE
3563// OBSOLETE /* bc: bc $label9 */
3564// OBSOLETE
3565// OBSOLETE static SEM_PC
3566// OBSOLETE SEM_FN_NAME (fr30bf,bc) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3567// OBSOLETE {
3568// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3569// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3570// OBSOLETE int UNUSED written = 0;
3571// OBSOLETE IADDR UNUSED pc = abuf->addr;
3572// OBSOLETE SEM_BRANCH_INIT
3573// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3574// OBSOLETE
3575// OBSOLETE if (CPU (h_cbit)) {
3576// OBSOLETE {
3577// OBSOLETE USI opval = FLD (i_label9);
3578// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3579// OBSOLETE written |= (1 << 2);
3580// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3581// OBSOLETE }
3582// OBSOLETE }
3583// OBSOLETE
3584// OBSOLETE abuf->written = written;
3585// OBSOLETE SEM_BRANCH_FINI (vpc);
3586// OBSOLETE return vpc;
3587// OBSOLETE #undef FLD
3588// OBSOLETE }
3589// OBSOLETE
3590// OBSOLETE /* bncd: bnc:d $label9 */
3591// OBSOLETE
3592// OBSOLETE static SEM_PC
3593// OBSOLETE SEM_FN_NAME (fr30bf,bncd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3594// OBSOLETE {
3595// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3596// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3597// OBSOLETE int UNUSED written = 0;
3598// OBSOLETE IADDR UNUSED pc = abuf->addr;
3599// OBSOLETE SEM_BRANCH_INIT
3600// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3601// OBSOLETE
3602// OBSOLETE {
3603// OBSOLETE if (NOTBI (CPU (h_cbit))) {
3604// OBSOLETE {
3605// OBSOLETE USI opval = FLD (i_label9);
3606// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3607// OBSOLETE written |= (1 << 2);
3608// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3609// OBSOLETE }
3610// OBSOLETE }
3611// OBSOLETE }
3612// OBSOLETE
3613// OBSOLETE abuf->written = written;
3614// OBSOLETE SEM_BRANCH_FINI (vpc);
3615// OBSOLETE return vpc;
3616// OBSOLETE #undef FLD
3617// OBSOLETE }
3618// OBSOLETE
3619// OBSOLETE /* bnc: bnc $label9 */
3620// OBSOLETE
3621// OBSOLETE static SEM_PC
3622// OBSOLETE SEM_FN_NAME (fr30bf,bnc) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3623// OBSOLETE {
3624// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3625// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3626// OBSOLETE int UNUSED written = 0;
3627// OBSOLETE IADDR UNUSED pc = abuf->addr;
3628// OBSOLETE SEM_BRANCH_INIT
3629// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3630// OBSOLETE
3631// OBSOLETE if (NOTBI (CPU (h_cbit))) {
3632// OBSOLETE {
3633// OBSOLETE USI opval = FLD (i_label9);
3634// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3635// OBSOLETE written |= (1 << 2);
3636// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3637// OBSOLETE }
3638// OBSOLETE }
3639// OBSOLETE
3640// OBSOLETE abuf->written = written;
3641// OBSOLETE SEM_BRANCH_FINI (vpc);
3642// OBSOLETE return vpc;
3643// OBSOLETE #undef FLD
3644// OBSOLETE }
3645// OBSOLETE
3646// OBSOLETE /* bnd: bn:d $label9 */
3647// OBSOLETE
3648// OBSOLETE static SEM_PC
3649// OBSOLETE SEM_FN_NAME (fr30bf,bnd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3650// OBSOLETE {
3651// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3652// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3653// OBSOLETE int UNUSED written = 0;
3654// OBSOLETE IADDR UNUSED pc = abuf->addr;
3655// OBSOLETE SEM_BRANCH_INIT
3656// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3657// OBSOLETE
3658// OBSOLETE {
3659// OBSOLETE if (CPU (h_nbit)) {
3660// OBSOLETE {
3661// OBSOLETE USI opval = FLD (i_label9);
3662// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3663// OBSOLETE written |= (1 << 2);
3664// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3665// OBSOLETE }
3666// OBSOLETE }
3667// OBSOLETE }
3668// OBSOLETE
3669// OBSOLETE abuf->written = written;
3670// OBSOLETE SEM_BRANCH_FINI (vpc);
3671// OBSOLETE return vpc;
3672// OBSOLETE #undef FLD
3673// OBSOLETE }
3674// OBSOLETE
3675// OBSOLETE /* bn: bn $label9 */
3676// OBSOLETE
3677// OBSOLETE static SEM_PC
3678// OBSOLETE SEM_FN_NAME (fr30bf,bn) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3679// OBSOLETE {
3680// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3681// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3682// OBSOLETE int UNUSED written = 0;
3683// OBSOLETE IADDR UNUSED pc = abuf->addr;
3684// OBSOLETE SEM_BRANCH_INIT
3685// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3686// OBSOLETE
3687// OBSOLETE if (CPU (h_nbit)) {
3688// OBSOLETE {
3689// OBSOLETE USI opval = FLD (i_label9);
3690// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3691// OBSOLETE written |= (1 << 2);
3692// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3693// OBSOLETE }
3694// OBSOLETE }
3695// OBSOLETE
3696// OBSOLETE abuf->written = written;
3697// OBSOLETE SEM_BRANCH_FINI (vpc);
3698// OBSOLETE return vpc;
3699// OBSOLETE #undef FLD
3700// OBSOLETE }
3701// OBSOLETE
3702// OBSOLETE /* bpd: bp:d $label9 */
3703// OBSOLETE
3704// OBSOLETE static SEM_PC
3705// OBSOLETE SEM_FN_NAME (fr30bf,bpd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3706// OBSOLETE {
3707// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3708// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3709// OBSOLETE int UNUSED written = 0;
3710// OBSOLETE IADDR UNUSED pc = abuf->addr;
3711// OBSOLETE SEM_BRANCH_INIT
3712// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3713// OBSOLETE
3714// OBSOLETE {
3715// OBSOLETE if (NOTBI (CPU (h_nbit))) {
3716// OBSOLETE {
3717// OBSOLETE USI opval = FLD (i_label9);
3718// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3719// OBSOLETE written |= (1 << 2);
3720// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3721// OBSOLETE }
3722// OBSOLETE }
3723// OBSOLETE }
3724// OBSOLETE
3725// OBSOLETE abuf->written = written;
3726// OBSOLETE SEM_BRANCH_FINI (vpc);
3727// OBSOLETE return vpc;
3728// OBSOLETE #undef FLD
3729// OBSOLETE }
3730// OBSOLETE
3731// OBSOLETE /* bp: bp $label9 */
3732// OBSOLETE
3733// OBSOLETE static SEM_PC
3734// OBSOLETE SEM_FN_NAME (fr30bf,bp) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3735// OBSOLETE {
3736// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3737// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3738// OBSOLETE int UNUSED written = 0;
3739// OBSOLETE IADDR UNUSED pc = abuf->addr;
3740// OBSOLETE SEM_BRANCH_INIT
3741// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3742// OBSOLETE
3743// OBSOLETE if (NOTBI (CPU (h_nbit))) {
3744// OBSOLETE {
3745// OBSOLETE USI opval = FLD (i_label9);
3746// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3747// OBSOLETE written |= (1 << 2);
3748// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3749// OBSOLETE }
3750// OBSOLETE }
3751// OBSOLETE
3752// OBSOLETE abuf->written = written;
3753// OBSOLETE SEM_BRANCH_FINI (vpc);
3754// OBSOLETE return vpc;
3755// OBSOLETE #undef FLD
3756// OBSOLETE }
3757// OBSOLETE
3758// OBSOLETE /* bvd: bv:d $label9 */
3759// OBSOLETE
3760// OBSOLETE static SEM_PC
3761// OBSOLETE SEM_FN_NAME (fr30bf,bvd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3762// OBSOLETE {
3763// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3764// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3765// OBSOLETE int UNUSED written = 0;
3766// OBSOLETE IADDR UNUSED pc = abuf->addr;
3767// OBSOLETE SEM_BRANCH_INIT
3768// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3769// OBSOLETE
3770// OBSOLETE {
3771// OBSOLETE if (CPU (h_vbit)) {
3772// OBSOLETE {
3773// OBSOLETE USI opval = FLD (i_label9);
3774// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3775// OBSOLETE written |= (1 << 2);
3776// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3777// OBSOLETE }
3778// OBSOLETE }
3779// OBSOLETE }
3780// OBSOLETE
3781// OBSOLETE abuf->written = written;
3782// OBSOLETE SEM_BRANCH_FINI (vpc);
3783// OBSOLETE return vpc;
3784// OBSOLETE #undef FLD
3785// OBSOLETE }
3786// OBSOLETE
3787// OBSOLETE /* bv: bv $label9 */
3788// OBSOLETE
3789// OBSOLETE static SEM_PC
3790// OBSOLETE SEM_FN_NAME (fr30bf,bv) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3791// OBSOLETE {
3792// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3793// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3794// OBSOLETE int UNUSED written = 0;
3795// OBSOLETE IADDR UNUSED pc = abuf->addr;
3796// OBSOLETE SEM_BRANCH_INIT
3797// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3798// OBSOLETE
3799// OBSOLETE if (CPU (h_vbit)) {
3800// OBSOLETE {
3801// OBSOLETE USI opval = FLD (i_label9);
3802// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3803// OBSOLETE written |= (1 << 2);
3804// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3805// OBSOLETE }
3806// OBSOLETE }
3807// OBSOLETE
3808// OBSOLETE abuf->written = written;
3809// OBSOLETE SEM_BRANCH_FINI (vpc);
3810// OBSOLETE return vpc;
3811// OBSOLETE #undef FLD
3812// OBSOLETE }
3813// OBSOLETE
3814// OBSOLETE /* bnvd: bnv:d $label9 */
3815// OBSOLETE
3816// OBSOLETE static SEM_PC
3817// OBSOLETE SEM_FN_NAME (fr30bf,bnvd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3818// OBSOLETE {
3819// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3820// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3821// OBSOLETE int UNUSED written = 0;
3822// OBSOLETE IADDR UNUSED pc = abuf->addr;
3823// OBSOLETE SEM_BRANCH_INIT
3824// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3825// OBSOLETE
3826// OBSOLETE {
3827// OBSOLETE if (NOTBI (CPU (h_vbit))) {
3828// OBSOLETE {
3829// OBSOLETE USI opval = FLD (i_label9);
3830// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3831// OBSOLETE written |= (1 << 2);
3832// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3833// OBSOLETE }
3834// OBSOLETE }
3835// OBSOLETE }
3836// OBSOLETE
3837// OBSOLETE abuf->written = written;
3838// OBSOLETE SEM_BRANCH_FINI (vpc);
3839// OBSOLETE return vpc;
3840// OBSOLETE #undef FLD
3841// OBSOLETE }
3842// OBSOLETE
3843// OBSOLETE /* bnv: bnv $label9 */
3844// OBSOLETE
3845// OBSOLETE static SEM_PC
3846// OBSOLETE SEM_FN_NAME (fr30bf,bnv) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3847// OBSOLETE {
3848// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3849// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3850// OBSOLETE int UNUSED written = 0;
3851// OBSOLETE IADDR UNUSED pc = abuf->addr;
3852// OBSOLETE SEM_BRANCH_INIT
3853// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3854// OBSOLETE
3855// OBSOLETE if (NOTBI (CPU (h_vbit))) {
3856// OBSOLETE {
3857// OBSOLETE USI opval = FLD (i_label9);
3858// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3859// OBSOLETE written |= (1 << 2);
3860// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3861// OBSOLETE }
3862// OBSOLETE }
3863// OBSOLETE
3864// OBSOLETE abuf->written = written;
3865// OBSOLETE SEM_BRANCH_FINI (vpc);
3866// OBSOLETE return vpc;
3867// OBSOLETE #undef FLD
3868// OBSOLETE }
3869// OBSOLETE
3870// OBSOLETE /* bltd: blt:d $label9 */
3871// OBSOLETE
3872// OBSOLETE static SEM_PC
3873// OBSOLETE SEM_FN_NAME (fr30bf,bltd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3874// OBSOLETE {
3875// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3876// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3877// OBSOLETE int UNUSED written = 0;
3878// OBSOLETE IADDR UNUSED pc = abuf->addr;
3879// OBSOLETE SEM_BRANCH_INIT
3880// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3881// OBSOLETE
3882// OBSOLETE {
3883// OBSOLETE if (XORBI (CPU (h_vbit), CPU (h_nbit))) {
3884// OBSOLETE {
3885// OBSOLETE USI opval = FLD (i_label9);
3886// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3887// OBSOLETE written |= (1 << 3);
3888// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3889// OBSOLETE }
3890// OBSOLETE }
3891// OBSOLETE }
3892// OBSOLETE
3893// OBSOLETE abuf->written = written;
3894// OBSOLETE SEM_BRANCH_FINI (vpc);
3895// OBSOLETE return vpc;
3896// OBSOLETE #undef FLD
3897// OBSOLETE }
3898// OBSOLETE
3899// OBSOLETE /* blt: blt $label9 */
3900// OBSOLETE
3901// OBSOLETE static SEM_PC
3902// OBSOLETE SEM_FN_NAME (fr30bf,blt) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3903// OBSOLETE {
3904// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3905// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3906// OBSOLETE int UNUSED written = 0;
3907// OBSOLETE IADDR UNUSED pc = abuf->addr;
3908// OBSOLETE SEM_BRANCH_INIT
3909// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3910// OBSOLETE
3911// OBSOLETE if (XORBI (CPU (h_vbit), CPU (h_nbit))) {
3912// OBSOLETE {
3913// OBSOLETE USI opval = FLD (i_label9);
3914// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3915// OBSOLETE written |= (1 << 3);
3916// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3917// OBSOLETE }
3918// OBSOLETE }
3919// OBSOLETE
3920// OBSOLETE abuf->written = written;
3921// OBSOLETE SEM_BRANCH_FINI (vpc);
3922// OBSOLETE return vpc;
3923// OBSOLETE #undef FLD
3924// OBSOLETE }
3925// OBSOLETE
3926// OBSOLETE /* bged: bge:d $label9 */
3927// OBSOLETE
3928// OBSOLETE static SEM_PC
3929// OBSOLETE SEM_FN_NAME (fr30bf,bged) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3930// OBSOLETE {
3931// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3932// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3933// OBSOLETE int UNUSED written = 0;
3934// OBSOLETE IADDR UNUSED pc = abuf->addr;
3935// OBSOLETE SEM_BRANCH_INIT
3936// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3937// OBSOLETE
3938// OBSOLETE {
3939// OBSOLETE if (NOTBI (XORBI (CPU (h_vbit), CPU (h_nbit)))) {
3940// OBSOLETE {
3941// OBSOLETE USI opval = FLD (i_label9);
3942// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3943// OBSOLETE written |= (1 << 3);
3944// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3945// OBSOLETE }
3946// OBSOLETE }
3947// OBSOLETE }
3948// OBSOLETE
3949// OBSOLETE abuf->written = written;
3950// OBSOLETE SEM_BRANCH_FINI (vpc);
3951// OBSOLETE return vpc;
3952// OBSOLETE #undef FLD
3953// OBSOLETE }
3954// OBSOLETE
3955// OBSOLETE /* bge: bge $label9 */
3956// OBSOLETE
3957// OBSOLETE static SEM_PC
3958// OBSOLETE SEM_FN_NAME (fr30bf,bge) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3959// OBSOLETE {
3960// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3961// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3962// OBSOLETE int UNUSED written = 0;
3963// OBSOLETE IADDR UNUSED pc = abuf->addr;
3964// OBSOLETE SEM_BRANCH_INIT
3965// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3966// OBSOLETE
3967// OBSOLETE if (NOTBI (XORBI (CPU (h_vbit), CPU (h_nbit)))) {
3968// OBSOLETE {
3969// OBSOLETE USI opval = FLD (i_label9);
3970// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3971// OBSOLETE written |= (1 << 3);
3972// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
3973// OBSOLETE }
3974// OBSOLETE }
3975// OBSOLETE
3976// OBSOLETE abuf->written = written;
3977// OBSOLETE SEM_BRANCH_FINI (vpc);
3978// OBSOLETE return vpc;
3979// OBSOLETE #undef FLD
3980// OBSOLETE }
3981// OBSOLETE
3982// OBSOLETE /* bled: ble:d $label9 */
3983// OBSOLETE
3984// OBSOLETE static SEM_PC
3985// OBSOLETE SEM_FN_NAME (fr30bf,bled) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
3986// OBSOLETE {
3987// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
3988// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
3989// OBSOLETE int UNUSED written = 0;
3990// OBSOLETE IADDR UNUSED pc = abuf->addr;
3991// OBSOLETE SEM_BRANCH_INIT
3992// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
3993// OBSOLETE
3994// OBSOLETE {
3995// OBSOLETE if (ORBI (XORBI (CPU (h_vbit), CPU (h_nbit)), CPU (h_zbit))) {
3996// OBSOLETE {
3997// OBSOLETE USI opval = FLD (i_label9);
3998// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
3999// OBSOLETE written |= (1 << 4);
4000// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
4001// OBSOLETE }
4002// OBSOLETE }
4003// OBSOLETE }
4004// OBSOLETE
4005// OBSOLETE abuf->written = written;
4006// OBSOLETE SEM_BRANCH_FINI (vpc);
4007// OBSOLETE return vpc;
4008// OBSOLETE #undef FLD
4009// OBSOLETE }
4010// OBSOLETE
4011// OBSOLETE /* ble: ble $label9 */
4012// OBSOLETE
4013// OBSOLETE static SEM_PC
4014// OBSOLETE SEM_FN_NAME (fr30bf,ble) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4015// OBSOLETE {
4016// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
4017// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4018// OBSOLETE int UNUSED written = 0;
4019// OBSOLETE IADDR UNUSED pc = abuf->addr;
4020// OBSOLETE SEM_BRANCH_INIT
4021// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4022// OBSOLETE
4023// OBSOLETE if (ORBI (XORBI (CPU (h_vbit), CPU (h_nbit)), CPU (h_zbit))) {
4024// OBSOLETE {
4025// OBSOLETE USI opval = FLD (i_label9);
4026// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
4027// OBSOLETE written |= (1 << 4);
4028// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
4029// OBSOLETE }
4030// OBSOLETE }
4031// OBSOLETE
4032// OBSOLETE abuf->written = written;
4033// OBSOLETE SEM_BRANCH_FINI (vpc);
4034// OBSOLETE return vpc;
4035// OBSOLETE #undef FLD
4036// OBSOLETE }
4037// OBSOLETE
4038// OBSOLETE /* bgtd: bgt:d $label9 */
4039// OBSOLETE
4040// OBSOLETE static SEM_PC
4041// OBSOLETE SEM_FN_NAME (fr30bf,bgtd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4042// OBSOLETE {
4043// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
4044// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4045// OBSOLETE int UNUSED written = 0;
4046// OBSOLETE IADDR UNUSED pc = abuf->addr;
4047// OBSOLETE SEM_BRANCH_INIT
4048// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4049// OBSOLETE
4050// OBSOLETE {
4051// OBSOLETE if (NOTBI (ORBI (XORBI (CPU (h_vbit), CPU (h_nbit)), CPU (h_zbit)))) {
4052// OBSOLETE {
4053// OBSOLETE USI opval = FLD (i_label9);
4054// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
4055// OBSOLETE written |= (1 << 4);
4056// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
4057// OBSOLETE }
4058// OBSOLETE }
4059// OBSOLETE }
4060// OBSOLETE
4061// OBSOLETE abuf->written = written;
4062// OBSOLETE SEM_BRANCH_FINI (vpc);
4063// OBSOLETE return vpc;
4064// OBSOLETE #undef FLD
4065// OBSOLETE }
4066// OBSOLETE
4067// OBSOLETE /* bgt: bgt $label9 */
4068// OBSOLETE
4069// OBSOLETE static SEM_PC
4070// OBSOLETE SEM_FN_NAME (fr30bf,bgt) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4071// OBSOLETE {
4072// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
4073// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4074// OBSOLETE int UNUSED written = 0;
4075// OBSOLETE IADDR UNUSED pc = abuf->addr;
4076// OBSOLETE SEM_BRANCH_INIT
4077// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4078// OBSOLETE
4079// OBSOLETE if (NOTBI (ORBI (XORBI (CPU (h_vbit), CPU (h_nbit)), CPU (h_zbit)))) {
4080// OBSOLETE {
4081// OBSOLETE USI opval = FLD (i_label9);
4082// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
4083// OBSOLETE written |= (1 << 4);
4084// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
4085// OBSOLETE }
4086// OBSOLETE }
4087// OBSOLETE
4088// OBSOLETE abuf->written = written;
4089// OBSOLETE SEM_BRANCH_FINI (vpc);
4090// OBSOLETE return vpc;
4091// OBSOLETE #undef FLD
4092// OBSOLETE }
4093// OBSOLETE
4094// OBSOLETE /* blsd: bls:d $label9 */
4095// OBSOLETE
4096// OBSOLETE static SEM_PC
4097// OBSOLETE SEM_FN_NAME (fr30bf,blsd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4098// OBSOLETE {
4099// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
4100// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4101// OBSOLETE int UNUSED written = 0;
4102// OBSOLETE IADDR UNUSED pc = abuf->addr;
4103// OBSOLETE SEM_BRANCH_INIT
4104// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4105// OBSOLETE
4106// OBSOLETE {
4107// OBSOLETE if (ORBI (CPU (h_cbit), CPU (h_zbit))) {
4108// OBSOLETE {
4109// OBSOLETE USI opval = FLD (i_label9);
4110// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
4111// OBSOLETE written |= (1 << 3);
4112// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
4113// OBSOLETE }
4114// OBSOLETE }
4115// OBSOLETE }
4116// OBSOLETE
4117// OBSOLETE abuf->written = written;
4118// OBSOLETE SEM_BRANCH_FINI (vpc);
4119// OBSOLETE return vpc;
4120// OBSOLETE #undef FLD
4121// OBSOLETE }
4122// OBSOLETE
4123// OBSOLETE /* bls: bls $label9 */
4124// OBSOLETE
4125// OBSOLETE static SEM_PC
4126// OBSOLETE SEM_FN_NAME (fr30bf,bls) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4127// OBSOLETE {
4128// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
4129// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4130// OBSOLETE int UNUSED written = 0;
4131// OBSOLETE IADDR UNUSED pc = abuf->addr;
4132// OBSOLETE SEM_BRANCH_INIT
4133// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4134// OBSOLETE
4135// OBSOLETE if (ORBI (CPU (h_cbit), CPU (h_zbit))) {
4136// OBSOLETE {
4137// OBSOLETE USI opval = FLD (i_label9);
4138// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
4139// OBSOLETE written |= (1 << 3);
4140// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
4141// OBSOLETE }
4142// OBSOLETE }
4143// OBSOLETE
4144// OBSOLETE abuf->written = written;
4145// OBSOLETE SEM_BRANCH_FINI (vpc);
4146// OBSOLETE return vpc;
4147// OBSOLETE #undef FLD
4148// OBSOLETE }
4149// OBSOLETE
4150// OBSOLETE /* bhid: bhi:d $label9 */
4151// OBSOLETE
4152// OBSOLETE static SEM_PC
4153// OBSOLETE SEM_FN_NAME (fr30bf,bhid) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4154// OBSOLETE {
4155// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
4156// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4157// OBSOLETE int UNUSED written = 0;
4158// OBSOLETE IADDR UNUSED pc = abuf->addr;
4159// OBSOLETE SEM_BRANCH_INIT
4160// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4161// OBSOLETE
4162// OBSOLETE {
4163// OBSOLETE if (NOTBI (ORBI (CPU (h_cbit), CPU (h_zbit)))) {
4164// OBSOLETE {
4165// OBSOLETE USI opval = FLD (i_label9);
4166// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
4167// OBSOLETE written |= (1 << 3);
4168// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
4169// OBSOLETE }
4170// OBSOLETE }
4171// OBSOLETE }
4172// OBSOLETE
4173// OBSOLETE abuf->written = written;
4174// OBSOLETE SEM_BRANCH_FINI (vpc);
4175// OBSOLETE return vpc;
4176// OBSOLETE #undef FLD
4177// OBSOLETE }
4178// OBSOLETE
4179// OBSOLETE /* bhi: bhi $label9 */
4180// OBSOLETE
4181// OBSOLETE static SEM_PC
4182// OBSOLETE SEM_FN_NAME (fr30bf,bhi) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4183// OBSOLETE {
4184// OBSOLETE #define FLD(f) abuf->fields.sfmt_brad.f
4185// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4186// OBSOLETE int UNUSED written = 0;
4187// OBSOLETE IADDR UNUSED pc = abuf->addr;
4188// OBSOLETE SEM_BRANCH_INIT
4189// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4190// OBSOLETE
4191// OBSOLETE if (NOTBI (ORBI (CPU (h_cbit), CPU (h_zbit)))) {
4192// OBSOLETE {
4193// OBSOLETE USI opval = FLD (i_label9);
4194// OBSOLETE SEM_BRANCH_VIA_CACHE (current_cpu, sem_arg, opval, vpc);
4195// OBSOLETE written |= (1 << 3);
4196// OBSOLETE TRACE_RESULT (current_cpu, abuf, "pc", 'x', opval);
4197// OBSOLETE }
4198// OBSOLETE }
4199// OBSOLETE
4200// OBSOLETE abuf->written = written;
4201// OBSOLETE SEM_BRANCH_FINI (vpc);
4202// OBSOLETE return vpc;
4203// OBSOLETE #undef FLD
4204// OBSOLETE }
4205// OBSOLETE
4206// OBSOLETE /* dmovr13: dmov $R13,@$dir10 */
4207// OBSOLETE
4208// OBSOLETE static SEM_PC
4209// OBSOLETE SEM_FN_NAME (fr30bf,dmovr13) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4210// OBSOLETE {
4211// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pi.f
4212// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4213// OBSOLETE int UNUSED written = 0;
4214// OBSOLETE IADDR UNUSED pc = abuf->addr;
4215// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4216// OBSOLETE
4217// OBSOLETE {
4218// OBSOLETE SI opval = CPU (h_gr[((UINT) 13)]);
4219// OBSOLETE SETMEMSI (current_cpu, pc, FLD (f_dir10), opval);
4220// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4221// OBSOLETE }
4222// OBSOLETE
4223// OBSOLETE return vpc;
4224// OBSOLETE #undef FLD
4225// OBSOLETE }
4226// OBSOLETE
4227// OBSOLETE /* dmovr13h: dmovh $R13,@$dir9 */
4228// OBSOLETE
4229// OBSOLETE static SEM_PC
4230// OBSOLETE SEM_FN_NAME (fr30bf,dmovr13h) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4231// OBSOLETE {
4232// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pih.f
4233// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4234// OBSOLETE int UNUSED written = 0;
4235// OBSOLETE IADDR UNUSED pc = abuf->addr;
4236// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4237// OBSOLETE
4238// OBSOLETE {
4239// OBSOLETE HI opval = CPU (h_gr[((UINT) 13)]);
4240// OBSOLETE SETMEMHI (current_cpu, pc, FLD (f_dir9), opval);
4241// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4242// OBSOLETE }
4243// OBSOLETE
4244// OBSOLETE return vpc;
4245// OBSOLETE #undef FLD
4246// OBSOLETE }
4247// OBSOLETE
4248// OBSOLETE /* dmovr13b: dmovb $R13,@$dir8 */
4249// OBSOLETE
4250// OBSOLETE static SEM_PC
4251// OBSOLETE SEM_FN_NAME (fr30bf,dmovr13b) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4252// OBSOLETE {
4253// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pib.f
4254// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4255// OBSOLETE int UNUSED written = 0;
4256// OBSOLETE IADDR UNUSED pc = abuf->addr;
4257// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4258// OBSOLETE
4259// OBSOLETE {
4260// OBSOLETE QI opval = CPU (h_gr[((UINT) 13)]);
4261// OBSOLETE SETMEMQI (current_cpu, pc, FLD (f_dir8), opval);
4262// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4263// OBSOLETE }
4264// OBSOLETE
4265// OBSOLETE return vpc;
4266// OBSOLETE #undef FLD
4267// OBSOLETE }
4268// OBSOLETE
4269// OBSOLETE /* dmovr13pi: dmov @$R13+,@$dir10 */
4270// OBSOLETE
4271// OBSOLETE static SEM_PC
4272// OBSOLETE SEM_FN_NAME (fr30bf,dmovr13pi) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4273// OBSOLETE {
4274// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pi.f
4275// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4276// OBSOLETE int UNUSED written = 0;
4277// OBSOLETE IADDR UNUSED pc = abuf->addr;
4278// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4279// OBSOLETE
4280// OBSOLETE {
4281// OBSOLETE {
4282// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 13)]));
4283// OBSOLETE SETMEMSI (current_cpu, pc, FLD (f_dir10), opval);
4284// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4285// OBSOLETE }
4286// OBSOLETE {
4287// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 13)]), 4);
4288// OBSOLETE CPU (h_gr[((UINT) 13)]) = opval;
4289// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4290// OBSOLETE }
4291// OBSOLETE }
4292// OBSOLETE
4293// OBSOLETE return vpc;
4294// OBSOLETE #undef FLD
4295// OBSOLETE }
4296// OBSOLETE
4297// OBSOLETE /* dmovr13pih: dmovh @$R13+,@$dir9 */
4298// OBSOLETE
4299// OBSOLETE static SEM_PC
4300// OBSOLETE SEM_FN_NAME (fr30bf,dmovr13pih) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4301// OBSOLETE {
4302// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pih.f
4303// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4304// OBSOLETE int UNUSED written = 0;
4305// OBSOLETE IADDR UNUSED pc = abuf->addr;
4306// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4307// OBSOLETE
4308// OBSOLETE {
4309// OBSOLETE {
4310// OBSOLETE HI opval = GETMEMHI (current_cpu, pc, CPU (h_gr[((UINT) 13)]));
4311// OBSOLETE SETMEMHI (current_cpu, pc, FLD (f_dir9), opval);
4312// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4313// OBSOLETE }
4314// OBSOLETE {
4315// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 13)]), 2);
4316// OBSOLETE CPU (h_gr[((UINT) 13)]) = opval;
4317// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4318// OBSOLETE }
4319// OBSOLETE }
4320// OBSOLETE
4321// OBSOLETE return vpc;
4322// OBSOLETE #undef FLD
4323// OBSOLETE }
4324// OBSOLETE
4325// OBSOLETE /* dmovr13pib: dmovb @$R13+,@$dir8 */
4326// OBSOLETE
4327// OBSOLETE static SEM_PC
4328// OBSOLETE SEM_FN_NAME (fr30bf,dmovr13pib) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4329// OBSOLETE {
4330// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pib.f
4331// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4332// OBSOLETE int UNUSED written = 0;
4333// OBSOLETE IADDR UNUSED pc = abuf->addr;
4334// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4335// OBSOLETE
4336// OBSOLETE {
4337// OBSOLETE {
4338// OBSOLETE QI opval = GETMEMQI (current_cpu, pc, CPU (h_gr[((UINT) 13)]));
4339// OBSOLETE SETMEMQI (current_cpu, pc, FLD (f_dir8), opval);
4340// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4341// OBSOLETE }
4342// OBSOLETE {
4343// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 13)]), 1);
4344// OBSOLETE CPU (h_gr[((UINT) 13)]) = opval;
4345// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4346// OBSOLETE }
4347// OBSOLETE }
4348// OBSOLETE
4349// OBSOLETE return vpc;
4350// OBSOLETE #undef FLD
4351// OBSOLETE }
4352// OBSOLETE
4353// OBSOLETE /* dmovr15pi: dmov @$R15+,@$dir10 */
4354// OBSOLETE
4355// OBSOLETE static SEM_PC
4356// OBSOLETE SEM_FN_NAME (fr30bf,dmovr15pi) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4357// OBSOLETE {
4358// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr15pi.f
4359// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4360// OBSOLETE int UNUSED written = 0;
4361// OBSOLETE IADDR UNUSED pc = abuf->addr;
4362// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4363// OBSOLETE
4364// OBSOLETE {
4365// OBSOLETE {
4366// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
4367// OBSOLETE SETMEMSI (current_cpu, pc, FLD (f_dir10), opval);
4368// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4369// OBSOLETE }
4370// OBSOLETE {
4371// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
4372// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4373// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4374// OBSOLETE }
4375// OBSOLETE }
4376// OBSOLETE
4377// OBSOLETE return vpc;
4378// OBSOLETE #undef FLD
4379// OBSOLETE }
4380// OBSOLETE
4381// OBSOLETE /* dmov2r13: dmov @$dir10,$R13 */
4382// OBSOLETE
4383// OBSOLETE static SEM_PC
4384// OBSOLETE SEM_FN_NAME (fr30bf,dmov2r13) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4385// OBSOLETE {
4386// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pi.f
4387// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4388// OBSOLETE int UNUSED written = 0;
4389// OBSOLETE IADDR UNUSED pc = abuf->addr;
4390// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4391// OBSOLETE
4392// OBSOLETE {
4393// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, FLD (f_dir10));
4394// OBSOLETE CPU (h_gr[((UINT) 13)]) = opval;
4395// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4396// OBSOLETE }
4397// OBSOLETE
4398// OBSOLETE return vpc;
4399// OBSOLETE #undef FLD
4400// OBSOLETE }
4401// OBSOLETE
4402// OBSOLETE /* dmov2r13h: dmovh @$dir9,$R13 */
4403// OBSOLETE
4404// OBSOLETE static SEM_PC
4405// OBSOLETE SEM_FN_NAME (fr30bf,dmov2r13h) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4406// OBSOLETE {
4407// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pih.f
4408// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4409// OBSOLETE int UNUSED written = 0;
4410// OBSOLETE IADDR UNUSED pc = abuf->addr;
4411// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4412// OBSOLETE
4413// OBSOLETE {
4414// OBSOLETE SI opval = GETMEMHI (current_cpu, pc, FLD (f_dir9));
4415// OBSOLETE CPU (h_gr[((UINT) 13)]) = opval;
4416// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4417// OBSOLETE }
4418// OBSOLETE
4419// OBSOLETE return vpc;
4420// OBSOLETE #undef FLD
4421// OBSOLETE }
4422// OBSOLETE
4423// OBSOLETE /* dmov2r13b: dmovb @$dir8,$R13 */
4424// OBSOLETE
4425// OBSOLETE static SEM_PC
4426// OBSOLETE SEM_FN_NAME (fr30bf,dmov2r13b) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4427// OBSOLETE {
4428// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pib.f
4429// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4430// OBSOLETE int UNUSED written = 0;
4431// OBSOLETE IADDR UNUSED pc = abuf->addr;
4432// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4433// OBSOLETE
4434// OBSOLETE {
4435// OBSOLETE SI opval = GETMEMQI (current_cpu, pc, FLD (f_dir8));
4436// OBSOLETE CPU (h_gr[((UINT) 13)]) = opval;
4437// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4438// OBSOLETE }
4439// OBSOLETE
4440// OBSOLETE return vpc;
4441// OBSOLETE #undef FLD
4442// OBSOLETE }
4443// OBSOLETE
4444// OBSOLETE /* dmov2r13pi: dmov @$dir10,@$R13+ */
4445// OBSOLETE
4446// OBSOLETE static SEM_PC
4447// OBSOLETE SEM_FN_NAME (fr30bf,dmov2r13pi) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4448// OBSOLETE {
4449// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pi.f
4450// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4451// OBSOLETE int UNUSED written = 0;
4452// OBSOLETE IADDR UNUSED pc = abuf->addr;
4453// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4454// OBSOLETE
4455// OBSOLETE {
4456// OBSOLETE {
4457// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, FLD (f_dir10));
4458// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 13)]), opval);
4459// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4460// OBSOLETE }
4461// OBSOLETE {
4462// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 13)]), 4);
4463// OBSOLETE CPU (h_gr[((UINT) 13)]) = opval;
4464// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4465// OBSOLETE }
4466// OBSOLETE }
4467// OBSOLETE
4468// OBSOLETE return vpc;
4469// OBSOLETE #undef FLD
4470// OBSOLETE }
4471// OBSOLETE
4472// OBSOLETE /* dmov2r13pih: dmovh @$dir9,@$R13+ */
4473// OBSOLETE
4474// OBSOLETE static SEM_PC
4475// OBSOLETE SEM_FN_NAME (fr30bf,dmov2r13pih) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4476// OBSOLETE {
4477// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pih.f
4478// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4479// OBSOLETE int UNUSED written = 0;
4480// OBSOLETE IADDR UNUSED pc = abuf->addr;
4481// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4482// OBSOLETE
4483// OBSOLETE {
4484// OBSOLETE {
4485// OBSOLETE HI opval = GETMEMHI (current_cpu, pc, FLD (f_dir9));
4486// OBSOLETE SETMEMHI (current_cpu, pc, CPU (h_gr[((UINT) 13)]), opval);
4487// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4488// OBSOLETE }
4489// OBSOLETE {
4490// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 13)]), 2);
4491// OBSOLETE CPU (h_gr[((UINT) 13)]) = opval;
4492// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4493// OBSOLETE }
4494// OBSOLETE }
4495// OBSOLETE
4496// OBSOLETE return vpc;
4497// OBSOLETE #undef FLD
4498// OBSOLETE }
4499// OBSOLETE
4500// OBSOLETE /* dmov2r13pib: dmovb @$dir8,@$R13+ */
4501// OBSOLETE
4502// OBSOLETE static SEM_PC
4503// OBSOLETE SEM_FN_NAME (fr30bf,dmov2r13pib) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4504// OBSOLETE {
4505// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr13pib.f
4506// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4507// OBSOLETE int UNUSED written = 0;
4508// OBSOLETE IADDR UNUSED pc = abuf->addr;
4509// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4510// OBSOLETE
4511// OBSOLETE {
4512// OBSOLETE {
4513// OBSOLETE QI opval = GETMEMQI (current_cpu, pc, FLD (f_dir8));
4514// OBSOLETE SETMEMQI (current_cpu, pc, CPU (h_gr[((UINT) 13)]), opval);
4515// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4516// OBSOLETE }
4517// OBSOLETE {
4518// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 13)]), 1);
4519// OBSOLETE CPU (h_gr[((UINT) 13)]) = opval;
4520// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4521// OBSOLETE }
4522// OBSOLETE }
4523// OBSOLETE
4524// OBSOLETE return vpc;
4525// OBSOLETE #undef FLD
4526// OBSOLETE }
4527// OBSOLETE
4528// OBSOLETE /* dmov2r15pd: dmov @$dir10,@-$R15 */
4529// OBSOLETE
4530// OBSOLETE static SEM_PC
4531// OBSOLETE SEM_FN_NAME (fr30bf,dmov2r15pd) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4532// OBSOLETE {
4533// OBSOLETE #define FLD(f) abuf->fields.sfmt_dmovr15pi.f
4534// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4535// OBSOLETE int UNUSED written = 0;
4536// OBSOLETE IADDR UNUSED pc = abuf->addr;
4537// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4538// OBSOLETE
4539// OBSOLETE {
4540// OBSOLETE {
4541// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
4542// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4543// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4544// OBSOLETE }
4545// OBSOLETE {
4546// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, FLD (f_dir10));
4547// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
4548// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
4549// OBSOLETE }
4550// OBSOLETE }
4551// OBSOLETE
4552// OBSOLETE return vpc;
4553// OBSOLETE #undef FLD
4554// OBSOLETE }
4555// OBSOLETE
4556// OBSOLETE /* ldres: ldres @$Ri+,$u4 */
4557// OBSOLETE
4558// OBSOLETE static SEM_PC
4559// OBSOLETE SEM_FN_NAME (fr30bf,ldres) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4560// OBSOLETE {
4561// OBSOLETE #define FLD(f) abuf->fields.sfmt_add2.f
4562// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4563// OBSOLETE int UNUSED written = 0;
4564// OBSOLETE IADDR UNUSED pc = abuf->addr;
4565// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4566// OBSOLETE
4567// OBSOLETE {
4568// OBSOLETE SI opval = ADDSI (* FLD (i_Ri), 4);
4569// OBSOLETE * FLD (i_Ri) = opval;
4570// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4571// OBSOLETE }
4572// OBSOLETE
4573// OBSOLETE return vpc;
4574// OBSOLETE #undef FLD
4575// OBSOLETE }
4576// OBSOLETE
4577// OBSOLETE /* stres: stres $u4,@$Ri+ */
4578// OBSOLETE
4579// OBSOLETE static SEM_PC
4580// OBSOLETE SEM_FN_NAME (fr30bf,stres) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4581// OBSOLETE {
4582// OBSOLETE #define FLD(f) abuf->fields.sfmt_add2.f
4583// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4584// OBSOLETE int UNUSED written = 0;
4585// OBSOLETE IADDR UNUSED pc = abuf->addr;
4586// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4587// OBSOLETE
4588// OBSOLETE {
4589// OBSOLETE SI opval = ADDSI (* FLD (i_Ri), 4);
4590// OBSOLETE * FLD (i_Ri) = opval;
4591// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4592// OBSOLETE }
4593// OBSOLETE
4594// OBSOLETE return vpc;
4595// OBSOLETE #undef FLD
4596// OBSOLETE }
4597// OBSOLETE
4598// OBSOLETE /* copop: copop $u4c,$ccc,$CRj,$CRi */
4599// OBSOLETE
4600// OBSOLETE static SEM_PC
4601// OBSOLETE SEM_FN_NAME (fr30bf,copop) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4602// OBSOLETE {
4603// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
4604// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4605// OBSOLETE int UNUSED written = 0;
4606// OBSOLETE IADDR UNUSED pc = abuf->addr;
4607// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 4);
4608// OBSOLETE
4609// OBSOLETE ((void) 0); /*nop*/
4610// OBSOLETE
4611// OBSOLETE return vpc;
4612// OBSOLETE #undef FLD
4613// OBSOLETE }
4614// OBSOLETE
4615// OBSOLETE /* copld: copld $u4c,$ccc,$Rjc,$CRi */
4616// OBSOLETE
4617// OBSOLETE static SEM_PC
4618// OBSOLETE SEM_FN_NAME (fr30bf,copld) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4619// OBSOLETE {
4620// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
4621// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4622// OBSOLETE int UNUSED written = 0;
4623// OBSOLETE IADDR UNUSED pc = abuf->addr;
4624// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 4);
4625// OBSOLETE
4626// OBSOLETE ((void) 0); /*nop*/
4627// OBSOLETE
4628// OBSOLETE return vpc;
4629// OBSOLETE #undef FLD
4630// OBSOLETE }
4631// OBSOLETE
4632// OBSOLETE /* copst: copst $u4c,$ccc,$CRj,$Ric */
4633// OBSOLETE
4634// OBSOLETE static SEM_PC
4635// OBSOLETE SEM_FN_NAME (fr30bf,copst) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4636// OBSOLETE {
4637// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
4638// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4639// OBSOLETE int UNUSED written = 0;
4640// OBSOLETE IADDR UNUSED pc = abuf->addr;
4641// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 4);
4642// OBSOLETE
4643// OBSOLETE ((void) 0); /*nop*/
4644// OBSOLETE
4645// OBSOLETE return vpc;
4646// OBSOLETE #undef FLD
4647// OBSOLETE }
4648// OBSOLETE
4649// OBSOLETE /* copsv: copsv $u4c,$ccc,$CRj,$Ric */
4650// OBSOLETE
4651// OBSOLETE static SEM_PC
4652// OBSOLETE SEM_FN_NAME (fr30bf,copsv) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4653// OBSOLETE {
4654// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
4655// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4656// OBSOLETE int UNUSED written = 0;
4657// OBSOLETE IADDR UNUSED pc = abuf->addr;
4658// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 4);
4659// OBSOLETE
4660// OBSOLETE ((void) 0); /*nop*/
4661// OBSOLETE
4662// OBSOLETE return vpc;
4663// OBSOLETE #undef FLD
4664// OBSOLETE }
4665// OBSOLETE
4666// OBSOLETE /* nop: nop */
4667// OBSOLETE
4668// OBSOLETE static SEM_PC
4669// OBSOLETE SEM_FN_NAME (fr30bf,nop) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4670// OBSOLETE {
4671// OBSOLETE #define FLD(f) abuf->fields.fmt_empty.f
4672// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4673// OBSOLETE int UNUSED written = 0;
4674// OBSOLETE IADDR UNUSED pc = abuf->addr;
4675// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4676// OBSOLETE
4677// OBSOLETE ((void) 0); /*nop*/
4678// OBSOLETE
4679// OBSOLETE return vpc;
4680// OBSOLETE #undef FLD
4681// OBSOLETE }
4682// OBSOLETE
4683// OBSOLETE /* andccr: andccr $u8 */
4684// OBSOLETE
4685// OBSOLETE static SEM_PC
4686// OBSOLETE SEM_FN_NAME (fr30bf,andccr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4687// OBSOLETE {
4688// OBSOLETE #define FLD(f) abuf->fields.sfmt_int.f
4689// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4690// OBSOLETE int UNUSED written = 0;
4691// OBSOLETE IADDR UNUSED pc = abuf->addr;
4692// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4693// OBSOLETE
4694// OBSOLETE {
4695// OBSOLETE UQI opval = ANDQI (GET_H_CCR (), FLD (f_u8));
4696// OBSOLETE SET_H_CCR (opval);
4697// OBSOLETE TRACE_RESULT (current_cpu, abuf, "ccr", 'x', opval);
4698// OBSOLETE }
4699// OBSOLETE
4700// OBSOLETE return vpc;
4701// OBSOLETE #undef FLD
4702// OBSOLETE }
4703// OBSOLETE
4704// OBSOLETE /* orccr: orccr $u8 */
4705// OBSOLETE
4706// OBSOLETE static SEM_PC
4707// OBSOLETE SEM_FN_NAME (fr30bf,orccr) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4708// OBSOLETE {
4709// OBSOLETE #define FLD(f) abuf->fields.sfmt_int.f
4710// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4711// OBSOLETE int UNUSED written = 0;
4712// OBSOLETE IADDR UNUSED pc = abuf->addr;
4713// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4714// OBSOLETE
4715// OBSOLETE {
4716// OBSOLETE UQI opval = ORQI (GET_H_CCR (), FLD (f_u8));
4717// OBSOLETE SET_H_CCR (opval);
4718// OBSOLETE TRACE_RESULT (current_cpu, abuf, "ccr", 'x', opval);
4719// OBSOLETE }
4720// OBSOLETE
4721// OBSOLETE return vpc;
4722// OBSOLETE #undef FLD
4723// OBSOLETE }
4724// OBSOLETE
4725// OBSOLETE /* stilm: stilm $u8 */
4726// OBSOLETE
4727// OBSOLETE static SEM_PC
4728// OBSOLETE SEM_FN_NAME (fr30bf,stilm) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4729// OBSOLETE {
4730// OBSOLETE #define FLD(f) abuf->fields.sfmt_int.f
4731// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4732// OBSOLETE int UNUSED written = 0;
4733// OBSOLETE IADDR UNUSED pc = abuf->addr;
4734// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4735// OBSOLETE
4736// OBSOLETE {
4737// OBSOLETE UQI opval = ANDSI (FLD (f_u8), 31);
4738// OBSOLETE SET_H_ILM (opval);
4739// OBSOLETE TRACE_RESULT (current_cpu, abuf, "ilm", 'x', opval);
4740// OBSOLETE }
4741// OBSOLETE
4742// OBSOLETE return vpc;
4743// OBSOLETE #undef FLD
4744// OBSOLETE }
4745// OBSOLETE
4746// OBSOLETE /* addsp: addsp $s10 */
4747// OBSOLETE
4748// OBSOLETE static SEM_PC
4749// OBSOLETE SEM_FN_NAME (fr30bf,addsp) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4750// OBSOLETE {
4751// OBSOLETE #define FLD(f) abuf->fields.sfmt_addsp.f
4752// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4753// OBSOLETE int UNUSED written = 0;
4754// OBSOLETE IADDR UNUSED pc = abuf->addr;
4755// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4756// OBSOLETE
4757// OBSOLETE {
4758// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), FLD (f_s10));
4759// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4760// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4761// OBSOLETE }
4762// OBSOLETE
4763// OBSOLETE return vpc;
4764// OBSOLETE #undef FLD
4765// OBSOLETE }
4766// OBSOLETE
4767// OBSOLETE /* extsb: extsb $Ri */
4768// OBSOLETE
4769// OBSOLETE static SEM_PC
4770// OBSOLETE SEM_FN_NAME (fr30bf,extsb) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4771// OBSOLETE {
4772// OBSOLETE #define FLD(f) abuf->fields.sfmt_add2.f
4773// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4774// OBSOLETE int UNUSED written = 0;
4775// OBSOLETE IADDR UNUSED pc = abuf->addr;
4776// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4777// OBSOLETE
4778// OBSOLETE {
4779// OBSOLETE SI opval = EXTQISI (ANDQI (* FLD (i_Ri), 255));
4780// OBSOLETE * FLD (i_Ri) = opval;
4781// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4782// OBSOLETE }
4783// OBSOLETE
4784// OBSOLETE return vpc;
4785// OBSOLETE #undef FLD
4786// OBSOLETE }
4787// OBSOLETE
4788// OBSOLETE /* extub: extub $Ri */
4789// OBSOLETE
4790// OBSOLETE static SEM_PC
4791// OBSOLETE SEM_FN_NAME (fr30bf,extub) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4792// OBSOLETE {
4793// OBSOLETE #define FLD(f) abuf->fields.sfmt_add2.f
4794// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4795// OBSOLETE int UNUSED written = 0;
4796// OBSOLETE IADDR UNUSED pc = abuf->addr;
4797// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4798// OBSOLETE
4799// OBSOLETE {
4800// OBSOLETE SI opval = ZEXTQISI (ANDQI (* FLD (i_Ri), 255));
4801// OBSOLETE * FLD (i_Ri) = opval;
4802// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4803// OBSOLETE }
4804// OBSOLETE
4805// OBSOLETE return vpc;
4806// OBSOLETE #undef FLD
4807// OBSOLETE }
4808// OBSOLETE
4809// OBSOLETE /* extsh: extsh $Ri */
4810// OBSOLETE
4811// OBSOLETE static SEM_PC
4812// OBSOLETE SEM_FN_NAME (fr30bf,extsh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4813// OBSOLETE {
4814// OBSOLETE #define FLD(f) abuf->fields.sfmt_add2.f
4815// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4816// OBSOLETE int UNUSED written = 0;
4817// OBSOLETE IADDR UNUSED pc = abuf->addr;
4818// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4819// OBSOLETE
4820// OBSOLETE {
4821// OBSOLETE SI opval = EXTHISI (ANDHI (* FLD (i_Ri), 65535));
4822// OBSOLETE * FLD (i_Ri) = opval;
4823// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4824// OBSOLETE }
4825// OBSOLETE
4826// OBSOLETE return vpc;
4827// OBSOLETE #undef FLD
4828// OBSOLETE }
4829// OBSOLETE
4830// OBSOLETE /* extuh: extuh $Ri */
4831// OBSOLETE
4832// OBSOLETE static SEM_PC
4833// OBSOLETE SEM_FN_NAME (fr30bf,extuh) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4834// OBSOLETE {
4835// OBSOLETE #define FLD(f) abuf->fields.sfmt_add2.f
4836// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4837// OBSOLETE int UNUSED written = 0;
4838// OBSOLETE IADDR UNUSED pc = abuf->addr;
4839// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4840// OBSOLETE
4841// OBSOLETE {
4842// OBSOLETE SI opval = ZEXTHISI (ANDHI (* FLD (i_Ri), 65535));
4843// OBSOLETE * FLD (i_Ri) = opval;
4844// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4845// OBSOLETE }
4846// OBSOLETE
4847// OBSOLETE return vpc;
4848// OBSOLETE #undef FLD
4849// OBSOLETE }
4850// OBSOLETE
4851// OBSOLETE /* ldm0: ldm0 ($reglist_low_ld) */
4852// OBSOLETE
4853// OBSOLETE static SEM_PC
4854// OBSOLETE SEM_FN_NAME (fr30bf,ldm0) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
4855// OBSOLETE {
4856// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldm0.f
4857// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
4858// OBSOLETE int UNUSED written = 0;
4859// OBSOLETE IADDR UNUSED pc = abuf->addr;
4860// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
4861// OBSOLETE
4862// OBSOLETE {
4863// OBSOLETE if (ANDSI (FLD (f_reglist_low_ld), 1)) {
4864// OBSOLETE {
4865// OBSOLETE {
4866// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
4867// OBSOLETE CPU (h_gr[((UINT) 0)]) = opval;
4868// OBSOLETE written |= (1 << 3);
4869// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4870// OBSOLETE }
4871// OBSOLETE {
4872// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
4873// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4874// OBSOLETE written |= (1 << 5);
4875// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4876// OBSOLETE }
4877// OBSOLETE }
4878// OBSOLETE }
4879// OBSOLETE if (ANDSI (FLD (f_reglist_low_ld), 2)) {
4880// OBSOLETE {
4881// OBSOLETE {
4882// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
4883// OBSOLETE CPU (h_gr[((UINT) 1)]) = opval;
4884// OBSOLETE written |= (1 << 4);
4885// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4886// OBSOLETE }
4887// OBSOLETE {
4888// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
4889// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4890// OBSOLETE written |= (1 << 5);
4891// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4892// OBSOLETE }
4893// OBSOLETE }
4894// OBSOLETE }
4895// OBSOLETE if (ANDSI (FLD (f_reglist_low_ld), 4)) {
4896// OBSOLETE {
4897// OBSOLETE {
4898// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
4899// OBSOLETE CPU (h_gr[((UINT) 2)]) = opval;
4900// OBSOLETE written |= (1 << 6);
4901// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4902// OBSOLETE }
4903// OBSOLETE {
4904// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
4905// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4906// OBSOLETE written |= (1 << 5);
4907// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4908// OBSOLETE }
4909// OBSOLETE }
4910// OBSOLETE }
4911// OBSOLETE if (ANDSI (FLD (f_reglist_low_ld), 8)) {
4912// OBSOLETE {
4913// OBSOLETE {
4914// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
4915// OBSOLETE CPU (h_gr[((UINT) 3)]) = opval;
4916// OBSOLETE written |= (1 << 7);
4917// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4918// OBSOLETE }
4919// OBSOLETE {
4920// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
4921// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4922// OBSOLETE written |= (1 << 5);
4923// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4924// OBSOLETE }
4925// OBSOLETE }
4926// OBSOLETE }
4927// OBSOLETE if (ANDSI (FLD (f_reglist_low_ld), 16)) {
4928// OBSOLETE {
4929// OBSOLETE {
4930// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
4931// OBSOLETE CPU (h_gr[((UINT) 4)]) = opval;
4932// OBSOLETE written |= (1 << 8);
4933// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4934// OBSOLETE }
4935// OBSOLETE {
4936// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
4937// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4938// OBSOLETE written |= (1 << 5);
4939// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4940// OBSOLETE }
4941// OBSOLETE }
4942// OBSOLETE }
4943// OBSOLETE if (ANDSI (FLD (f_reglist_low_ld), 32)) {
4944// OBSOLETE {
4945// OBSOLETE {
4946// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
4947// OBSOLETE CPU (h_gr[((UINT) 5)]) = opval;
4948// OBSOLETE written |= (1 << 9);
4949// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4950// OBSOLETE }
4951// OBSOLETE {
4952// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
4953// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4954// OBSOLETE written |= (1 << 5);
4955// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4956// OBSOLETE }
4957// OBSOLETE }
4958// OBSOLETE }
4959// OBSOLETE if (ANDSI (FLD (f_reglist_low_ld), 64)) {
4960// OBSOLETE {
4961// OBSOLETE {
4962// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
4963// OBSOLETE CPU (h_gr[((UINT) 6)]) = opval;
4964// OBSOLETE written |= (1 << 10);
4965// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4966// OBSOLETE }
4967// OBSOLETE {
4968// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
4969// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4970// OBSOLETE written |= (1 << 5);
4971// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4972// OBSOLETE }
4973// OBSOLETE }
4974// OBSOLETE }
4975// OBSOLETE if (ANDSI (FLD (f_reglist_low_ld), 128)) {
4976// OBSOLETE {
4977// OBSOLETE {
4978// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
4979// OBSOLETE CPU (h_gr[((UINT) 7)]) = opval;
4980// OBSOLETE written |= (1 << 11);
4981// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4982// OBSOLETE }
4983// OBSOLETE {
4984// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
4985// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
4986// OBSOLETE written |= (1 << 5);
4987// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
4988// OBSOLETE }
4989// OBSOLETE }
4990// OBSOLETE }
4991// OBSOLETE }
4992// OBSOLETE
4993// OBSOLETE abuf->written = written;
4994// OBSOLETE return vpc;
4995// OBSOLETE #undef FLD
4996// OBSOLETE }
4997// OBSOLETE
4998// OBSOLETE /* ldm1: ldm1 ($reglist_hi_ld) */
4999// OBSOLETE
5000// OBSOLETE static SEM_PC
5001// OBSOLETE SEM_FN_NAME (fr30bf,ldm1) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
5002// OBSOLETE {
5003// OBSOLETE #define FLD(f) abuf->fields.sfmt_ldm1.f
5004// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
5005// OBSOLETE int UNUSED written = 0;
5006// OBSOLETE IADDR UNUSED pc = abuf->addr;
5007// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
5008// OBSOLETE
5009// OBSOLETE {
5010// OBSOLETE if (ANDSI (FLD (f_reglist_hi_ld), 1)) {
5011// OBSOLETE {
5012// OBSOLETE {
5013// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
5014// OBSOLETE CPU (h_gr[((UINT) 8)]) = opval;
5015// OBSOLETE written |= (1 << 9);
5016// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5017// OBSOLETE }
5018// OBSOLETE {
5019// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
5020// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5021// OBSOLETE written |= (1 << 8);
5022// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5023// OBSOLETE }
5024// OBSOLETE }
5025// OBSOLETE }
5026// OBSOLETE if (ANDSI (FLD (f_reglist_hi_ld), 2)) {
5027// OBSOLETE {
5028// OBSOLETE {
5029// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
5030// OBSOLETE CPU (h_gr[((UINT) 9)]) = opval;
5031// OBSOLETE written |= (1 << 10);
5032// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5033// OBSOLETE }
5034// OBSOLETE {
5035// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
5036// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5037// OBSOLETE written |= (1 << 8);
5038// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5039// OBSOLETE }
5040// OBSOLETE }
5041// OBSOLETE }
5042// OBSOLETE if (ANDSI (FLD (f_reglist_hi_ld), 4)) {
5043// OBSOLETE {
5044// OBSOLETE {
5045// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
5046// OBSOLETE CPU (h_gr[((UINT) 10)]) = opval;
5047// OBSOLETE written |= (1 << 3);
5048// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5049// OBSOLETE }
5050// OBSOLETE {
5051// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
5052// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5053// OBSOLETE written |= (1 << 8);
5054// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5055// OBSOLETE }
5056// OBSOLETE }
5057// OBSOLETE }
5058// OBSOLETE if (ANDSI (FLD (f_reglist_hi_ld), 8)) {
5059// OBSOLETE {
5060// OBSOLETE {
5061// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
5062// OBSOLETE CPU (h_gr[((UINT) 11)]) = opval;
5063// OBSOLETE written |= (1 << 4);
5064// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5065// OBSOLETE }
5066// OBSOLETE {
5067// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
5068// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5069// OBSOLETE written |= (1 << 8);
5070// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5071// OBSOLETE }
5072// OBSOLETE }
5073// OBSOLETE }
5074// OBSOLETE if (ANDSI (FLD (f_reglist_hi_ld), 16)) {
5075// OBSOLETE {
5076// OBSOLETE {
5077// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
5078// OBSOLETE CPU (h_gr[((UINT) 12)]) = opval;
5079// OBSOLETE written |= (1 << 5);
5080// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5081// OBSOLETE }
5082// OBSOLETE {
5083// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
5084// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5085// OBSOLETE written |= (1 << 8);
5086// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5087// OBSOLETE }
5088// OBSOLETE }
5089// OBSOLETE }
5090// OBSOLETE if (ANDSI (FLD (f_reglist_hi_ld), 32)) {
5091// OBSOLETE {
5092// OBSOLETE {
5093// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
5094// OBSOLETE CPU (h_gr[((UINT) 13)]) = opval;
5095// OBSOLETE written |= (1 << 6);
5096// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5097// OBSOLETE }
5098// OBSOLETE {
5099// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
5100// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5101// OBSOLETE written |= (1 << 8);
5102// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5103// OBSOLETE }
5104// OBSOLETE }
5105// OBSOLETE }
5106// OBSOLETE if (ANDSI (FLD (f_reglist_hi_ld), 64)) {
5107// OBSOLETE {
5108// OBSOLETE {
5109// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
5110// OBSOLETE CPU (h_gr[((UINT) 14)]) = opval;
5111// OBSOLETE written |= (1 << 7);
5112// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5113// OBSOLETE }
5114// OBSOLETE {
5115// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 15)]), 4);
5116// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5117// OBSOLETE written |= (1 << 8);
5118// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5119// OBSOLETE }
5120// OBSOLETE }
5121// OBSOLETE }
5122// OBSOLETE if (ANDSI (FLD (f_reglist_hi_ld), 128)) {
5123// OBSOLETE {
5124// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]));
5125// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5126// OBSOLETE written |= (1 << 8);
5127// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5128// OBSOLETE }
5129// OBSOLETE }
5130// OBSOLETE }
5131// OBSOLETE
5132// OBSOLETE abuf->written = written;
5133// OBSOLETE return vpc;
5134// OBSOLETE #undef FLD
5135// OBSOLETE }
5136// OBSOLETE
5137// OBSOLETE /* stm0: stm0 ($reglist_low_st) */
5138// OBSOLETE
5139// OBSOLETE static SEM_PC
5140// OBSOLETE SEM_FN_NAME (fr30bf,stm0) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
5141// OBSOLETE {
5142// OBSOLETE #define FLD(f) abuf->fields.sfmt_stm0.f
5143// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
5144// OBSOLETE int UNUSED written = 0;
5145// OBSOLETE IADDR UNUSED pc = abuf->addr;
5146// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
5147// OBSOLETE
5148// OBSOLETE {
5149// OBSOLETE if (ANDSI (FLD (f_reglist_low_st), 1)) {
5150// OBSOLETE {
5151// OBSOLETE {
5152// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5153// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5154// OBSOLETE written |= (1 << 10);
5155// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5156// OBSOLETE }
5157// OBSOLETE {
5158// OBSOLETE SI opval = CPU (h_gr[((UINT) 7)]);
5159// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5160// OBSOLETE written |= (1 << 11);
5161// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5162// OBSOLETE }
5163// OBSOLETE }
5164// OBSOLETE }
5165// OBSOLETE if (ANDSI (FLD (f_reglist_low_st), 2)) {
5166// OBSOLETE {
5167// OBSOLETE {
5168// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5169// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5170// OBSOLETE written |= (1 << 10);
5171// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5172// OBSOLETE }
5173// OBSOLETE {
5174// OBSOLETE SI opval = CPU (h_gr[((UINT) 6)]);
5175// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5176// OBSOLETE written |= (1 << 11);
5177// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5178// OBSOLETE }
5179// OBSOLETE }
5180// OBSOLETE }
5181// OBSOLETE if (ANDSI (FLD (f_reglist_low_st), 4)) {
5182// OBSOLETE {
5183// OBSOLETE {
5184// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5185// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5186// OBSOLETE written |= (1 << 10);
5187// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5188// OBSOLETE }
5189// OBSOLETE {
5190// OBSOLETE SI opval = CPU (h_gr[((UINT) 5)]);
5191// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5192// OBSOLETE written |= (1 << 11);
5193// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5194// OBSOLETE }
5195// OBSOLETE }
5196// OBSOLETE }
5197// OBSOLETE if (ANDSI (FLD (f_reglist_low_st), 8)) {
5198// OBSOLETE {
5199// OBSOLETE {
5200// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5201// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5202// OBSOLETE written |= (1 << 10);
5203// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5204// OBSOLETE }
5205// OBSOLETE {
5206// OBSOLETE SI opval = CPU (h_gr[((UINT) 4)]);
5207// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5208// OBSOLETE written |= (1 << 11);
5209// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5210// OBSOLETE }
5211// OBSOLETE }
5212// OBSOLETE }
5213// OBSOLETE if (ANDSI (FLD (f_reglist_low_st), 16)) {
5214// OBSOLETE {
5215// OBSOLETE {
5216// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5217// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5218// OBSOLETE written |= (1 << 10);
5219// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5220// OBSOLETE }
5221// OBSOLETE {
5222// OBSOLETE SI opval = CPU (h_gr[((UINT) 3)]);
5223// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5224// OBSOLETE written |= (1 << 11);
5225// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5226// OBSOLETE }
5227// OBSOLETE }
5228// OBSOLETE }
5229// OBSOLETE if (ANDSI (FLD (f_reglist_low_st), 32)) {
5230// OBSOLETE {
5231// OBSOLETE {
5232// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5233// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5234// OBSOLETE written |= (1 << 10);
5235// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5236// OBSOLETE }
5237// OBSOLETE {
5238// OBSOLETE SI opval = CPU (h_gr[((UINT) 2)]);
5239// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5240// OBSOLETE written |= (1 << 11);
5241// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5242// OBSOLETE }
5243// OBSOLETE }
5244// OBSOLETE }
5245// OBSOLETE if (ANDSI (FLD (f_reglist_low_st), 64)) {
5246// OBSOLETE {
5247// OBSOLETE {
5248// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5249// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5250// OBSOLETE written |= (1 << 10);
5251// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5252// OBSOLETE }
5253// OBSOLETE {
5254// OBSOLETE SI opval = CPU (h_gr[((UINT) 1)]);
5255// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5256// OBSOLETE written |= (1 << 11);
5257// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5258// OBSOLETE }
5259// OBSOLETE }
5260// OBSOLETE }
5261// OBSOLETE if (ANDSI (FLD (f_reglist_low_st), 128)) {
5262// OBSOLETE {
5263// OBSOLETE {
5264// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5265// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5266// OBSOLETE written |= (1 << 10);
5267// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5268// OBSOLETE }
5269// OBSOLETE {
5270// OBSOLETE SI opval = CPU (h_gr[((UINT) 0)]);
5271// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5272// OBSOLETE written |= (1 << 11);
5273// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5274// OBSOLETE }
5275// OBSOLETE }
5276// OBSOLETE }
5277// OBSOLETE }
5278// OBSOLETE
5279// OBSOLETE abuf->written = written;
5280// OBSOLETE return vpc;
5281// OBSOLETE #undef FLD
5282// OBSOLETE }
5283// OBSOLETE
5284// OBSOLETE /* stm1: stm1 ($reglist_hi_st) */
5285// OBSOLETE
5286// OBSOLETE static SEM_PC
5287// OBSOLETE SEM_FN_NAME (fr30bf,stm1) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
5288// OBSOLETE {
5289// OBSOLETE #define FLD(f) abuf->fields.sfmt_stm1.f
5290// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
5291// OBSOLETE int UNUSED written = 0;
5292// OBSOLETE IADDR UNUSED pc = abuf->addr;
5293// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
5294// OBSOLETE
5295// OBSOLETE {
5296// OBSOLETE if (ANDSI (FLD (f_reglist_hi_st), 1)) {
5297// OBSOLETE {
5298// OBSOLETE SI tmp_save_r15;
5299// OBSOLETE tmp_save_r15 = CPU (h_gr[((UINT) 15)]);
5300// OBSOLETE {
5301// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5302// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5303// OBSOLETE written |= (1 << 9);
5304// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5305// OBSOLETE }
5306// OBSOLETE {
5307// OBSOLETE SI opval = tmp_save_r15;
5308// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5309// OBSOLETE written |= (1 << 10);
5310// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5311// OBSOLETE }
5312// OBSOLETE }
5313// OBSOLETE }
5314// OBSOLETE if (ANDSI (FLD (f_reglist_hi_st), 2)) {
5315// OBSOLETE {
5316// OBSOLETE {
5317// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5318// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5319// OBSOLETE written |= (1 << 9);
5320// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5321// OBSOLETE }
5322// OBSOLETE {
5323// OBSOLETE SI opval = CPU (h_gr[((UINT) 14)]);
5324// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5325// OBSOLETE written |= (1 << 10);
5326// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5327// OBSOLETE }
5328// OBSOLETE }
5329// OBSOLETE }
5330// OBSOLETE if (ANDSI (FLD (f_reglist_hi_st), 4)) {
5331// OBSOLETE {
5332// OBSOLETE {
5333// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5334// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5335// OBSOLETE written |= (1 << 9);
5336// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5337// OBSOLETE }
5338// OBSOLETE {
5339// OBSOLETE SI opval = CPU (h_gr[((UINT) 13)]);
5340// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5341// OBSOLETE written |= (1 << 10);
5342// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5343// OBSOLETE }
5344// OBSOLETE }
5345// OBSOLETE }
5346// OBSOLETE if (ANDSI (FLD (f_reglist_hi_st), 8)) {
5347// OBSOLETE {
5348// OBSOLETE {
5349// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5350// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5351// OBSOLETE written |= (1 << 9);
5352// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5353// OBSOLETE }
5354// OBSOLETE {
5355// OBSOLETE SI opval = CPU (h_gr[((UINT) 12)]);
5356// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5357// OBSOLETE written |= (1 << 10);
5358// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5359// OBSOLETE }
5360// OBSOLETE }
5361// OBSOLETE }
5362// OBSOLETE if (ANDSI (FLD (f_reglist_hi_st), 16)) {
5363// OBSOLETE {
5364// OBSOLETE {
5365// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5366// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5367// OBSOLETE written |= (1 << 9);
5368// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5369// OBSOLETE }
5370// OBSOLETE {
5371// OBSOLETE SI opval = CPU (h_gr[((UINT) 11)]);
5372// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5373// OBSOLETE written |= (1 << 10);
5374// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5375// OBSOLETE }
5376// OBSOLETE }
5377// OBSOLETE }
5378// OBSOLETE if (ANDSI (FLD (f_reglist_hi_st), 32)) {
5379// OBSOLETE {
5380// OBSOLETE {
5381// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5382// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5383// OBSOLETE written |= (1 << 9);
5384// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5385// OBSOLETE }
5386// OBSOLETE {
5387// OBSOLETE SI opval = CPU (h_gr[((UINT) 10)]);
5388// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5389// OBSOLETE written |= (1 << 10);
5390// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5391// OBSOLETE }
5392// OBSOLETE }
5393// OBSOLETE }
5394// OBSOLETE if (ANDSI (FLD (f_reglist_hi_st), 64)) {
5395// OBSOLETE {
5396// OBSOLETE {
5397// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5398// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5399// OBSOLETE written |= (1 << 9);
5400// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5401// OBSOLETE }
5402// OBSOLETE {
5403// OBSOLETE SI opval = CPU (h_gr[((UINT) 9)]);
5404// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5405// OBSOLETE written |= (1 << 10);
5406// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5407// OBSOLETE }
5408// OBSOLETE }
5409// OBSOLETE }
5410// OBSOLETE if (ANDSI (FLD (f_reglist_hi_st), 128)) {
5411// OBSOLETE {
5412// OBSOLETE {
5413// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5414// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5415// OBSOLETE written |= (1 << 9);
5416// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5417// OBSOLETE }
5418// OBSOLETE {
5419// OBSOLETE SI opval = CPU (h_gr[((UINT) 8)]);
5420// OBSOLETE SETMEMSI (current_cpu, pc, CPU (h_gr[((UINT) 15)]), opval);
5421// OBSOLETE written |= (1 << 10);
5422// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5423// OBSOLETE }
5424// OBSOLETE }
5425// OBSOLETE }
5426// OBSOLETE }
5427// OBSOLETE
5428// OBSOLETE abuf->written = written;
5429// OBSOLETE return vpc;
5430// OBSOLETE #undef FLD
5431// OBSOLETE }
5432// OBSOLETE
5433// OBSOLETE /* enter: enter $u10 */
5434// OBSOLETE
5435// OBSOLETE static SEM_PC
5436// OBSOLETE SEM_FN_NAME (fr30bf,enter) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
5437// OBSOLETE {
5438// OBSOLETE #define FLD(f) abuf->fields.sfmt_enter.f
5439// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
5440// OBSOLETE int UNUSED written = 0;
5441// OBSOLETE IADDR UNUSED pc = abuf->addr;
5442// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
5443// OBSOLETE
5444// OBSOLETE {
5445// OBSOLETE SI tmp_tmp;
5446// OBSOLETE tmp_tmp = SUBSI (CPU (h_gr[((UINT) 15)]), 4);
5447// OBSOLETE {
5448// OBSOLETE SI opval = CPU (h_gr[((UINT) 14)]);
5449// OBSOLETE SETMEMSI (current_cpu, pc, tmp_tmp, opval);
5450// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5451// OBSOLETE }
5452// OBSOLETE {
5453// OBSOLETE SI opval = tmp_tmp;
5454// OBSOLETE CPU (h_gr[((UINT) 14)]) = opval;
5455// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5456// OBSOLETE }
5457// OBSOLETE {
5458// OBSOLETE SI opval = SUBSI (CPU (h_gr[((UINT) 15)]), FLD (f_u10));
5459// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5460// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5461// OBSOLETE }
5462// OBSOLETE }
5463// OBSOLETE
5464// OBSOLETE return vpc;
5465// OBSOLETE #undef FLD
5466// OBSOLETE }
5467// OBSOLETE
5468// OBSOLETE /* leave: leave */
5469// OBSOLETE
5470// OBSOLETE static SEM_PC
5471// OBSOLETE SEM_FN_NAME (fr30bf,leave) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
5472// OBSOLETE {
5473// OBSOLETE #define FLD(f) abuf->fields.sfmt_enter.f
5474// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
5475// OBSOLETE int UNUSED written = 0;
5476// OBSOLETE IADDR UNUSED pc = abuf->addr;
5477// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
5478// OBSOLETE
5479// OBSOLETE {
5480// OBSOLETE {
5481// OBSOLETE SI opval = ADDSI (CPU (h_gr[((UINT) 14)]), 4);
5482// OBSOLETE CPU (h_gr[((UINT) 15)]) = opval;
5483// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5484// OBSOLETE }
5485// OBSOLETE {
5486// OBSOLETE SI opval = GETMEMSI (current_cpu, pc, SUBSI (CPU (h_gr[((UINT) 15)]), 4));
5487// OBSOLETE CPU (h_gr[((UINT) 14)]) = opval;
5488// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5489// OBSOLETE }
5490// OBSOLETE }
5491// OBSOLETE
5492// OBSOLETE return vpc;
5493// OBSOLETE #undef FLD
5494// OBSOLETE }
5495// OBSOLETE
5496// OBSOLETE /* xchb: xchb @$Rj,$Ri */
5497// OBSOLETE
5498// OBSOLETE static SEM_PC
5499// OBSOLETE SEM_FN_NAME (fr30bf,xchb) (SIM_CPU *current_cpu, SEM_ARG sem_arg)
5500// OBSOLETE {
5501// OBSOLETE #define FLD(f) abuf->fields.sfmt_add.f
5502// OBSOLETE ARGBUF *abuf = SEM_ARGBUF (sem_arg);
5503// OBSOLETE int UNUSED written = 0;
5504// OBSOLETE IADDR UNUSED pc = abuf->addr;
5505// OBSOLETE SEM_PC vpc = SEM_NEXT_VPC (sem_arg, pc, 2);
5506// OBSOLETE
5507// OBSOLETE {
5508// OBSOLETE SI tmp_tmp;
5509// OBSOLETE tmp_tmp = * FLD (i_Ri);
5510// OBSOLETE {
5511// OBSOLETE SI opval = GETMEMUQI (current_cpu, pc, * FLD (i_Rj));
5512// OBSOLETE * FLD (i_Ri) = opval;
5513// OBSOLETE TRACE_RESULT (current_cpu, abuf, "gr", 'x', opval);
5514// OBSOLETE }
5515// OBSOLETE {
5516// OBSOLETE UQI opval = tmp_tmp;
5517// OBSOLETE SETMEMUQI (current_cpu, pc, * FLD (i_Rj), opval);
5518// OBSOLETE TRACE_RESULT (current_cpu, abuf, "memory", 'x', opval);
5519// OBSOLETE }
5520// OBSOLETE }
5521// OBSOLETE
5522// OBSOLETE return vpc;
5523// OBSOLETE #undef FLD
5524// OBSOLETE }
5525// OBSOLETE
5526// OBSOLETE /* Table of all semantic fns. */
5527// OBSOLETE
5528// OBSOLETE static const struct sem_fn_desc sem_fns[] = {
5529// OBSOLETE { FR30BF_INSN_X_INVALID, SEM_FN_NAME (fr30bf,x_invalid) },
5530// OBSOLETE { FR30BF_INSN_X_AFTER, SEM_FN_NAME (fr30bf,x_after) },
5531// OBSOLETE { FR30BF_INSN_X_BEFORE, SEM_FN_NAME (fr30bf,x_before) },
5532// OBSOLETE { FR30BF_INSN_X_CTI_CHAIN, SEM_FN_NAME (fr30bf,x_cti_chain) },
5533// OBSOLETE { FR30BF_INSN_X_CHAIN, SEM_FN_NAME (fr30bf,x_chain) },
5534// OBSOLETE { FR30BF_INSN_X_BEGIN, SEM_FN_NAME (fr30bf,x_begin) },
5535// OBSOLETE { FR30BF_INSN_ADD, SEM_FN_NAME (fr30bf,add) },
5536// OBSOLETE { FR30BF_INSN_ADDI, SEM_FN_NAME (fr30bf,addi) },
5537// OBSOLETE { FR30BF_INSN_ADD2, SEM_FN_NAME (fr30bf,add2) },
5538// OBSOLETE { FR30BF_INSN_ADDC, SEM_FN_NAME (fr30bf,addc) },
5539// OBSOLETE { FR30BF_INSN_ADDN, SEM_FN_NAME (fr30bf,addn) },
5540// OBSOLETE { FR30BF_INSN_ADDNI, SEM_FN_NAME (fr30bf,addni) },
5541// OBSOLETE { FR30BF_INSN_ADDN2, SEM_FN_NAME (fr30bf,addn2) },
5542// OBSOLETE { FR30BF_INSN_SUB, SEM_FN_NAME (fr30bf,sub) },
5543// OBSOLETE { FR30BF_INSN_SUBC, SEM_FN_NAME (fr30bf,subc) },
5544// OBSOLETE { FR30BF_INSN_SUBN, SEM_FN_NAME (fr30bf,subn) },
5545// OBSOLETE { FR30BF_INSN_CMP, SEM_FN_NAME (fr30bf,cmp) },
5546// OBSOLETE { FR30BF_INSN_CMPI, SEM_FN_NAME (fr30bf,cmpi) },
5547// OBSOLETE { FR30BF_INSN_CMP2, SEM_FN_NAME (fr30bf,cmp2) },
5548// OBSOLETE { FR30BF_INSN_AND, SEM_FN_NAME (fr30bf,and) },
5549// OBSOLETE { FR30BF_INSN_OR, SEM_FN_NAME (fr30bf,or) },
5550// OBSOLETE { FR30BF_INSN_EOR, SEM_FN_NAME (fr30bf,eor) },
5551// OBSOLETE { FR30BF_INSN_ANDM, SEM_FN_NAME (fr30bf,andm) },
5552// OBSOLETE { FR30BF_INSN_ANDH, SEM_FN_NAME (fr30bf,andh) },
5553// OBSOLETE { FR30BF_INSN_ANDB, SEM_FN_NAME (fr30bf,andb) },
5554// OBSOLETE { FR30BF_INSN_ORM, SEM_FN_NAME (fr30bf,orm) },
5555// OBSOLETE { FR30BF_INSN_ORH, SEM_FN_NAME (fr30bf,orh) },
5556// OBSOLETE { FR30BF_INSN_ORB, SEM_FN_NAME (fr30bf,orb) },
5557// OBSOLETE { FR30BF_INSN_EORM, SEM_FN_NAME (fr30bf,eorm) },
5558// OBSOLETE { FR30BF_INSN_EORH, SEM_FN_NAME (fr30bf,eorh) },
5559// OBSOLETE { FR30BF_INSN_EORB, SEM_FN_NAME (fr30bf,eorb) },
5560// OBSOLETE { FR30BF_INSN_BANDL, SEM_FN_NAME (fr30bf,bandl) },
5561// OBSOLETE { FR30BF_INSN_BORL, SEM_FN_NAME (fr30bf,borl) },
5562// OBSOLETE { FR30BF_INSN_BEORL, SEM_FN_NAME (fr30bf,beorl) },
5563// OBSOLETE { FR30BF_INSN_BANDH, SEM_FN_NAME (fr30bf,bandh) },
5564// OBSOLETE { FR30BF_INSN_BORH, SEM_FN_NAME (fr30bf,borh) },
5565// OBSOLETE { FR30BF_INSN_BEORH, SEM_FN_NAME (fr30bf,beorh) },
5566// OBSOLETE { FR30BF_INSN_BTSTL, SEM_FN_NAME (fr30bf,btstl) },
5567// OBSOLETE { FR30BF_INSN_BTSTH, SEM_FN_NAME (fr30bf,btsth) },
5568// OBSOLETE { FR30BF_INSN_MUL, SEM_FN_NAME (fr30bf,mul) },
5569// OBSOLETE { FR30BF_INSN_MULU, SEM_FN_NAME (fr30bf,mulu) },
5570// OBSOLETE { FR30BF_INSN_MULH, SEM_FN_NAME (fr30bf,mulh) },
5571// OBSOLETE { FR30BF_INSN_MULUH, SEM_FN_NAME (fr30bf,muluh) },
5572// OBSOLETE { FR30BF_INSN_DIV0S, SEM_FN_NAME (fr30bf,div0s) },
5573// OBSOLETE { FR30BF_INSN_DIV0U, SEM_FN_NAME (fr30bf,div0u) },
5574// OBSOLETE { FR30BF_INSN_DIV1, SEM_FN_NAME (fr30bf,div1) },
5575// OBSOLETE { FR30BF_INSN_DIV2, SEM_FN_NAME (fr30bf,div2) },
5576// OBSOLETE { FR30BF_INSN_DIV3, SEM_FN_NAME (fr30bf,div3) },
5577// OBSOLETE { FR30BF_INSN_DIV4S, SEM_FN_NAME (fr30bf,div4s) },
5578// OBSOLETE { FR30BF_INSN_LSL, SEM_FN_NAME (fr30bf,lsl) },
5579// OBSOLETE { FR30BF_INSN_LSLI, SEM_FN_NAME (fr30bf,lsli) },
5580// OBSOLETE { FR30BF_INSN_LSL2, SEM_FN_NAME (fr30bf,lsl2) },
5581// OBSOLETE { FR30BF_INSN_LSR, SEM_FN_NAME (fr30bf,lsr) },
5582// OBSOLETE { FR30BF_INSN_LSRI, SEM_FN_NAME (fr30bf,lsri) },
5583// OBSOLETE { FR30BF_INSN_LSR2, SEM_FN_NAME (fr30bf,lsr2) },
5584// OBSOLETE { FR30BF_INSN_ASR, SEM_FN_NAME (fr30bf,asr) },
5585// OBSOLETE { FR30BF_INSN_ASRI, SEM_FN_NAME (fr30bf,asri) },
5586// OBSOLETE { FR30BF_INSN_ASR2, SEM_FN_NAME (fr30bf,asr2) },
5587// OBSOLETE { FR30BF_INSN_LDI8, SEM_FN_NAME (fr30bf,ldi8) },
5588// OBSOLETE { FR30BF_INSN_LDI20, SEM_FN_NAME (fr30bf,ldi20) },
5589// OBSOLETE { FR30BF_INSN_LDI32, SEM_FN_NAME (fr30bf,ldi32) },
5590// OBSOLETE { FR30BF_INSN_LD, SEM_FN_NAME (fr30bf,ld) },
5591// OBSOLETE { FR30BF_INSN_LDUH, SEM_FN_NAME (fr30bf,lduh) },
5592// OBSOLETE { FR30BF_INSN_LDUB, SEM_FN_NAME (fr30bf,ldub) },
5593// OBSOLETE { FR30BF_INSN_LDR13, SEM_FN_NAME (fr30bf,ldr13) },
5594// OBSOLETE { FR30BF_INSN_LDR13UH, SEM_FN_NAME (fr30bf,ldr13uh) },
5595// OBSOLETE { FR30BF_INSN_LDR13UB, SEM_FN_NAME (fr30bf,ldr13ub) },
5596// OBSOLETE { FR30BF_INSN_LDR14, SEM_FN_NAME (fr30bf,ldr14) },
5597// OBSOLETE { FR30BF_INSN_LDR14UH, SEM_FN_NAME (fr30bf,ldr14uh) },
5598// OBSOLETE { FR30BF_INSN_LDR14UB, SEM_FN_NAME (fr30bf,ldr14ub) },
5599// OBSOLETE { FR30BF_INSN_LDR15, SEM_FN_NAME (fr30bf,ldr15) },
5600// OBSOLETE { FR30BF_INSN_LDR15GR, SEM_FN_NAME (fr30bf,ldr15gr) },
5601// OBSOLETE { FR30BF_INSN_LDR15DR, SEM_FN_NAME (fr30bf,ldr15dr) },
5602// OBSOLETE { FR30BF_INSN_LDR15PS, SEM_FN_NAME (fr30bf,ldr15ps) },
5603// OBSOLETE { FR30BF_INSN_ST, SEM_FN_NAME (fr30bf,st) },
5604// OBSOLETE { FR30BF_INSN_STH, SEM_FN_NAME (fr30bf,sth) },
5605// OBSOLETE { FR30BF_INSN_STB, SEM_FN_NAME (fr30bf,stb) },
5606// OBSOLETE { FR30BF_INSN_STR13, SEM_FN_NAME (fr30bf,str13) },
5607// OBSOLETE { FR30BF_INSN_STR13H, SEM_FN_NAME (fr30bf,str13h) },
5608// OBSOLETE { FR30BF_INSN_STR13B, SEM_FN_NAME (fr30bf,str13b) },
5609// OBSOLETE { FR30BF_INSN_STR14, SEM_FN_NAME (fr30bf,str14) },
5610// OBSOLETE { FR30BF_INSN_STR14H, SEM_FN_NAME (fr30bf,str14h) },
5611// OBSOLETE { FR30BF_INSN_STR14B, SEM_FN_NAME (fr30bf,str14b) },
5612// OBSOLETE { FR30BF_INSN_STR15, SEM_FN_NAME (fr30bf,str15) },
5613// OBSOLETE { FR30BF_INSN_STR15GR, SEM_FN_NAME (fr30bf,str15gr) },
5614// OBSOLETE { FR30BF_INSN_STR15DR, SEM_FN_NAME (fr30bf,str15dr) },
5615// OBSOLETE { FR30BF_INSN_STR15PS, SEM_FN_NAME (fr30bf,str15ps) },
5616// OBSOLETE { FR30BF_INSN_MOV, SEM_FN_NAME (fr30bf,mov) },
5617// OBSOLETE { FR30BF_INSN_MOVDR, SEM_FN_NAME (fr30bf,movdr) },
5618// OBSOLETE { FR30BF_INSN_MOVPS, SEM_FN_NAME (fr30bf,movps) },
5619// OBSOLETE { FR30BF_INSN_MOV2DR, SEM_FN_NAME (fr30bf,mov2dr) },
5620// OBSOLETE { FR30BF_INSN_MOV2PS, SEM_FN_NAME (fr30bf,mov2ps) },
5621// OBSOLETE { FR30BF_INSN_JMP, SEM_FN_NAME (fr30bf,jmp) },
5622// OBSOLETE { FR30BF_INSN_JMPD, SEM_FN_NAME (fr30bf,jmpd) },
5623// OBSOLETE { FR30BF_INSN_CALLR, SEM_FN_NAME (fr30bf,callr) },
5624// OBSOLETE { FR30BF_INSN_CALLRD, SEM_FN_NAME (fr30bf,callrd) },
5625// OBSOLETE { FR30BF_INSN_CALL, SEM_FN_NAME (fr30bf,call) },
5626// OBSOLETE { FR30BF_INSN_CALLD, SEM_FN_NAME (fr30bf,calld) },
5627// OBSOLETE { FR30BF_INSN_RET, SEM_FN_NAME (fr30bf,ret) },
5628// OBSOLETE { FR30BF_INSN_RET_D, SEM_FN_NAME (fr30bf,ret_d) },
5629// OBSOLETE { FR30BF_INSN_INT, SEM_FN_NAME (fr30bf,int) },
5630// OBSOLETE { FR30BF_INSN_INTE, SEM_FN_NAME (fr30bf,inte) },
5631// OBSOLETE { FR30BF_INSN_RETI, SEM_FN_NAME (fr30bf,reti) },
5632// OBSOLETE { FR30BF_INSN_BRAD, SEM_FN_NAME (fr30bf,brad) },
5633// OBSOLETE { FR30BF_INSN_BRA, SEM_FN_NAME (fr30bf,bra) },
5634// OBSOLETE { FR30BF_INSN_BNOD, SEM_FN_NAME (fr30bf,bnod) },
5635// OBSOLETE { FR30BF_INSN_BNO, SEM_FN_NAME (fr30bf,bno) },
5636// OBSOLETE { FR30BF_INSN_BEQD, SEM_FN_NAME (fr30bf,beqd) },
5637// OBSOLETE { FR30BF_INSN_BEQ, SEM_FN_NAME (fr30bf,beq) },
5638// OBSOLETE { FR30BF_INSN_BNED, SEM_FN_NAME (fr30bf,bned) },
5639// OBSOLETE { FR30BF_INSN_BNE, SEM_FN_NAME (fr30bf,bne) },
5640// OBSOLETE { FR30BF_INSN_BCD, SEM_FN_NAME (fr30bf,bcd) },
5641// OBSOLETE { FR30BF_INSN_BC, SEM_FN_NAME (fr30bf,bc) },
5642// OBSOLETE { FR30BF_INSN_BNCD, SEM_FN_NAME (fr30bf,bncd) },
5643// OBSOLETE { FR30BF_INSN_BNC, SEM_FN_NAME (fr30bf,bnc) },
5644// OBSOLETE { FR30BF_INSN_BND, SEM_FN_NAME (fr30bf,bnd) },
5645// OBSOLETE { FR30BF_INSN_BN, SEM_FN_NAME (fr30bf,bn) },
5646// OBSOLETE { FR30BF_INSN_BPD, SEM_FN_NAME (fr30bf,bpd) },
5647// OBSOLETE { FR30BF_INSN_BP, SEM_FN_NAME (fr30bf,bp) },
5648// OBSOLETE { FR30BF_INSN_BVD, SEM_FN_NAME (fr30bf,bvd) },
5649// OBSOLETE { FR30BF_INSN_BV, SEM_FN_NAME (fr30bf,bv) },
5650// OBSOLETE { FR30BF_INSN_BNVD, SEM_FN_NAME (fr30bf,bnvd) },
5651// OBSOLETE { FR30BF_INSN_BNV, SEM_FN_NAME (fr30bf,bnv) },
5652// OBSOLETE { FR30BF_INSN_BLTD, SEM_FN_NAME (fr30bf,bltd) },
5653// OBSOLETE { FR30BF_INSN_BLT, SEM_FN_NAME (fr30bf,blt) },
5654// OBSOLETE { FR30BF_INSN_BGED, SEM_FN_NAME (fr30bf,bged) },
5655// OBSOLETE { FR30BF_INSN_BGE, SEM_FN_NAME (fr30bf,bge) },
5656// OBSOLETE { FR30BF_INSN_BLED, SEM_FN_NAME (fr30bf,bled) },
5657// OBSOLETE { FR30BF_INSN_BLE, SEM_FN_NAME (fr30bf,ble) },
5658// OBSOLETE { FR30BF_INSN_BGTD, SEM_FN_NAME (fr30bf,bgtd) },
5659// OBSOLETE { FR30BF_INSN_BGT, SEM_FN_NAME (fr30bf,bgt) },
5660// OBSOLETE { FR30BF_INSN_BLSD, SEM_FN_NAME (fr30bf,blsd) },
5661// OBSOLETE { FR30BF_INSN_BLS, SEM_FN_NAME (fr30bf,bls) },
5662// OBSOLETE { FR30BF_INSN_BHID, SEM_FN_NAME (fr30bf,bhid) },
5663// OBSOLETE { FR30BF_INSN_BHI, SEM_FN_NAME (fr30bf,bhi) },
5664// OBSOLETE { FR30BF_INSN_DMOVR13, SEM_FN_NAME (fr30bf,dmovr13) },
5665// OBSOLETE { FR30BF_INSN_DMOVR13H, SEM_FN_NAME (fr30bf,dmovr13h) },
5666// OBSOLETE { FR30BF_INSN_DMOVR13B, SEM_FN_NAME (fr30bf,dmovr13b) },
5667// OBSOLETE { FR30BF_INSN_DMOVR13PI, SEM_FN_NAME (fr30bf,dmovr13pi) },
5668// OBSOLETE { FR30BF_INSN_DMOVR13PIH, SEM_FN_NAME (fr30bf,dmovr13pih) },
5669// OBSOLETE { FR30BF_INSN_DMOVR13PIB, SEM_FN_NAME (fr30bf,dmovr13pib) },
5670// OBSOLETE { FR30BF_INSN_DMOVR15PI, SEM_FN_NAME (fr30bf,dmovr15pi) },
5671// OBSOLETE { FR30BF_INSN_DMOV2R13, SEM_FN_NAME (fr30bf,dmov2r13) },
5672// OBSOLETE { FR30BF_INSN_DMOV2R13H, SEM_FN_NAME (fr30bf,dmov2r13h) },
5673// OBSOLETE { FR30BF_INSN_DMOV2R13B, SEM_FN_NAME (fr30bf,dmov2r13b) },
5674// OBSOLETE { FR30BF_INSN_DMOV2R13PI, SEM_FN_NAME (fr30bf,dmov2r13pi) },
5675// OBSOLETE { FR30BF_INSN_DMOV2R13PIH, SEM_FN_NAME (fr30bf,dmov2r13pih) },
5676// OBSOLETE { FR30BF_INSN_DMOV2R13PIB, SEM_FN_NAME (fr30bf,dmov2r13pib) },
5677// OBSOLETE { FR30BF_INSN_DMOV2R15PD, SEM_FN_NAME (fr30bf,dmov2r15pd) },
5678// OBSOLETE { FR30BF_INSN_LDRES, SEM_FN_NAME (fr30bf,ldres) },
5679// OBSOLETE { FR30BF_INSN_STRES, SEM_FN_NAME (fr30bf,stres) },
5680// OBSOLETE { FR30BF_INSN_COPOP, SEM_FN_NAME (fr30bf,copop) },
5681// OBSOLETE { FR30BF_INSN_COPLD, SEM_FN_NAME (fr30bf,copld) },
5682// OBSOLETE { FR30BF_INSN_COPST, SEM_FN_NAME (fr30bf,copst) },
5683// OBSOLETE { FR30BF_INSN_COPSV, SEM_FN_NAME (fr30bf,copsv) },
5684// OBSOLETE { FR30BF_INSN_NOP, SEM_FN_NAME (fr30bf,nop) },
5685// OBSOLETE { FR30BF_INSN_ANDCCR, SEM_FN_NAME (fr30bf,andccr) },
5686// OBSOLETE { FR30BF_INSN_ORCCR, SEM_FN_NAME (fr30bf,orccr) },
5687// OBSOLETE { FR30BF_INSN_STILM, SEM_FN_NAME (fr30bf,stilm) },
5688// OBSOLETE { FR30BF_INSN_ADDSP, SEM_FN_NAME (fr30bf,addsp) },
5689// OBSOLETE { FR30BF_INSN_EXTSB, SEM_FN_NAME (fr30bf,extsb) },
5690// OBSOLETE { FR30BF_INSN_EXTUB, SEM_FN_NAME (fr30bf,extub) },
5691// OBSOLETE { FR30BF_INSN_EXTSH, SEM_FN_NAME (fr30bf,extsh) },
5692// OBSOLETE { FR30BF_INSN_EXTUH, SEM_FN_NAME (fr30bf,extuh) },
5693// OBSOLETE { FR30BF_INSN_LDM0, SEM_FN_NAME (fr30bf,ldm0) },
5694// OBSOLETE { FR30BF_INSN_LDM1, SEM_FN_NAME (fr30bf,ldm1) },
5695// OBSOLETE { FR30BF_INSN_STM0, SEM_FN_NAME (fr30bf,stm0) },
5696// OBSOLETE { FR30BF_INSN_STM1, SEM_FN_NAME (fr30bf,stm1) },
5697// OBSOLETE { FR30BF_INSN_ENTER, SEM_FN_NAME (fr30bf,enter) },
5698// OBSOLETE { FR30BF_INSN_LEAVE, SEM_FN_NAME (fr30bf,leave) },
5699// OBSOLETE { FR30BF_INSN_XCHB, SEM_FN_NAME (fr30bf,xchb) },
5700// OBSOLETE { 0, 0 }
5701// OBSOLETE };
5702// OBSOLETE
5703// OBSOLETE /* Add the semantic fns to IDESC_TABLE. */
5704// OBSOLETE
5705// OBSOLETE void
5706// OBSOLETE SEM_FN_NAME (fr30bf,init_idesc_table) (SIM_CPU *current_cpu)
5707// OBSOLETE {
5708// OBSOLETE IDESC *idesc_table = CPU_IDESC (current_cpu);
5709// OBSOLETE const struct sem_fn_desc *sf;
5710// OBSOLETE int mach_num = MACH_NUM (CPU_MACH (current_cpu));
5711// OBSOLETE
5712// OBSOLETE for (sf = &sem_fns[0]; sf->fn != 0; ++sf)
5713// OBSOLETE {
5714// OBSOLETE const CGEN_INSN *insn = idesc_table[sf->index].idata;
5715// OBSOLETE int valid_p = (CGEN_INSN_VIRTUAL_P (insn)
5716// OBSOLETE || CGEN_INSN_MACH_HAS_P (insn, mach_num));
5717// OBSOLETE #if FAST_P
5718// OBSOLETE if (valid_p)
5719// OBSOLETE idesc_table[sf->index].sem_fast = sf->fn;
5720// OBSOLETE else
5721// OBSOLETE idesc_table[sf->index].sem_fast = SEM_FN_NAME (fr30bf,x_invalid);
5722// OBSOLETE #else
5723// OBSOLETE if (valid_p)
5724// OBSOLETE idesc_table[sf->index].sem_full = sf->fn;
5725// OBSOLETE else
5726// OBSOLETE idesc_table[sf->index].sem_full = SEM_FN_NAME (fr30bf,x_invalid);
5727// OBSOLETE #endif
5728// OBSOLETE }
5729// OBSOLETE }
This page took 0.238757 seconds and 4 git commands to generate.