mirror of
https://github.com/RPCS3/llvm-mirror.git
synced 2024-11-23 19:23:23 +01:00
a62a7bb9a4
This adds all remaining instructions that were still missing, mostly privileged and semi-privileged system-level instructions. These are provided for use with the assembler and disassembler only. This brings the LLVM assembler / disassembler to parity with the GNU binutils tools. llvm-svn: 306876
1197 lines
50 KiB
TableGen
1197 lines
50 KiB
TableGen
//=- SystemZScheduleZ196.td - SystemZ Scheduling Definitions ---*- tblgen -*-=//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// This file defines the machine model for Z196 to support instruction
|
|
// scheduling and other instruction cost heuristics.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def Z196Model : SchedMachineModel {
|
|
|
|
let UnsupportedFeatures = Arch9UnsupportedFeatures.List;
|
|
|
|
let IssueWidth = 5;
|
|
let MicroOpBufferSize = 40; // Issue queues
|
|
let LoadLatency = 1; // Optimistic load latency.
|
|
|
|
let PostRAScheduler = 1;
|
|
|
|
// Extra cycles for a mispredicted branch.
|
|
let MispredictPenalty = 16;
|
|
}
|
|
|
|
let SchedModel = Z196Model in {
|
|
|
|
// These definitions could be put in a subtarget common include file,
|
|
// but it seems the include system in Tablegen currently rejects
|
|
// multiple includes of same file.
|
|
def : WriteRes<GroupAlone, []> {
|
|
let NumMicroOps = 0;
|
|
let BeginGroup = 1;
|
|
let EndGroup = 1;
|
|
}
|
|
def : WriteRes<EndGroup, []> {
|
|
let NumMicroOps = 0;
|
|
let EndGroup = 1;
|
|
}
|
|
def : WriteRes<Lat2, []> { let Latency = 2; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat3, []> { let Latency = 3; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat4, []> { let Latency = 4; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat5, []> { let Latency = 5; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat6, []> { let Latency = 6; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat7, []> { let Latency = 7; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat8, []> { let Latency = 8; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat9, []> { let Latency = 9; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat10, []> { let Latency = 10; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat11, []> { let Latency = 11; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat12, []> { let Latency = 12; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat15, []> { let Latency = 15; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat20, []> { let Latency = 20; let NumMicroOps = 0;}
|
|
def : WriteRes<Lat30, []> { let Latency = 30; let NumMicroOps = 0;}
|
|
|
|
// Execution units.
|
|
def Z196_FXUnit : ProcResource<2>;
|
|
def Z196_LSUnit : ProcResource<2>;
|
|
def Z196_FPUnit : ProcResource<1>;
|
|
def Z196_DFUnit : ProcResource<1>;
|
|
|
|
// Subtarget specific definitions of scheduling resources.
|
|
def : WriteRes<FXU, [Z196_FXUnit]> { let Latency = 1; }
|
|
def : WriteRes<LSU, [Z196_LSUnit]> { let Latency = 4; }
|
|
def : WriteRes<LSU_lat1, [Z196_LSUnit]> { let Latency = 1; }
|
|
def : WriteRes<FPU, [Z196_FPUnit]> { let Latency = 8; }
|
|
def : WriteRes<FPU2, [Z196_FPUnit, Z196_FPUnit]> { let Latency = 9; }
|
|
def : WriteRes<DFU, [Z196_DFUnit]> { let Latency = 2; }
|
|
def : WriteRes<DFU2, [Z196_DFUnit, Z196_DFUnit]> { let Latency = 3; }
|
|
|
|
// -------------------------- INSTRUCTIONS ---------------------------------- //
|
|
|
|
// InstRW constructs have been used in order to preserve the
|
|
// readability of the InstrInfo files.
|
|
|
|
// For each instruction, as matched by a regexp, provide a list of
|
|
// resources that it needs. These will be combined into a SchedClass.
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Stack allocation
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU], (instregex "ADJDYNALLOC$")>; // Pseudo -> LA / LAY
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Branch instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Branch
|
|
def : InstRW<[LSU, EndGroup], (instregex "(Call)?BRC(L)?(Asm.*)?$")>;
|
|
def : InstRW<[LSU, EndGroup], (instregex "(Call)?J(G)?(Asm.*)?$")>;
|
|
def : InstRW<[LSU, EndGroup], (instregex "(Call)?BC(R)?(Asm.*)?$")>;
|
|
def : InstRW<[LSU, EndGroup], (instregex "(Call)?B(R)?(Asm.*)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5, GroupAlone], (instregex "BRCT(G|H)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5, GroupAlone], (instregex "BCT(G)?(R)?$")>;
|
|
def : InstRW<[FXU, FXU, FXU, LSU, Lat7, GroupAlone],
|
|
(instregex "B(R)?X(H|L).*$")>;
|
|
|
|
// Compare and branch
|
|
def : InstRW<[FXU, LSU, Lat5, GroupAlone],
|
|
(instregex "C(L)?(G)?(I|R)J(Asm.*)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5, GroupAlone],
|
|
(instregex "C(L)?(G)?(I|R)B(Call|Return|Asm.*)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Trap instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Trap
|
|
def : InstRW<[LSU, EndGroup], (instregex "(Cond)?Trap$")>;
|
|
|
|
// Compare and trap
|
|
def : InstRW<[FXU], (instregex "C(G)?(I|R)T(Asm.*)?$")>;
|
|
def : InstRW<[FXU], (instregex "CL(G)?RT(Asm.*)?$")>;
|
|
def : InstRW<[FXU], (instregex "CL(F|G)IT(Asm.*)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Call and return instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Call
|
|
def : InstRW<[LSU, FXU, FXU, Lat6, GroupAlone], (instregex "(Call)?BRAS$")>;
|
|
def : InstRW<[LSU, FXU, FXU, Lat6, GroupAlone], (instregex "(Call)?BRASL$")>;
|
|
def : InstRW<[FXU, FXU, LSU, Lat6, GroupAlone], (instregex "(Call)?BAS(R)?$")>;
|
|
def : InstRW<[LSU, FXU, FXU, Lat6, GroupAlone], (instregex "TLS_(G|L)DCALL$")>;
|
|
|
|
// Return
|
|
def : InstRW<[LSU_lat1, EndGroup], (instregex "Return$")>;
|
|
def : InstRW<[LSU_lat1, EndGroup], (instregex "CondReturn$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Select instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Select pseudo
|
|
def : InstRW<[FXU], (instregex "Select(32|64|32Mux)$")>;
|
|
|
|
// CondStore pseudos
|
|
def : InstRW<[FXU], (instregex "CondStore16(Inv)?$")>;
|
|
def : InstRW<[FXU], (instregex "CondStore16Mux(Inv)?$")>;
|
|
def : InstRW<[FXU], (instregex "CondStore32(Inv)?$")>;
|
|
def : InstRW<[FXU], (instregex "CondStore64(Inv)?$")>;
|
|
def : InstRW<[FXU], (instregex "CondStore8(Inv)?$")>;
|
|
def : InstRW<[FXU], (instregex "CondStore8Mux(Inv)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Move instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Moves
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "MV(G|H)?HI$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "MVI(Y)?$")>;
|
|
|
|
// Move character
|
|
def : InstRW<[LSU, LSU, LSU, FXU, Lat8, GroupAlone], (instregex "MVC$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "MVCL(E|U)?$")>;
|
|
|
|
// Pseudo -> reg move
|
|
def : InstRW<[FXU], (instregex "COPY(_TO_REGCLASS)?$")>;
|
|
def : InstRW<[FXU], (instregex "EXTRACT_SUBREG$")>;
|
|
def : InstRW<[FXU], (instregex "INSERT_SUBREG$")>;
|
|
def : InstRW<[FXU], (instregex "REG_SEQUENCE$")>;
|
|
def : InstRW<[FXU], (instregex "SUBREG_TO_REG$")>;
|
|
|
|
// Loads
|
|
def : InstRW<[LSU], (instregex "L(Y|FH|RL|Mux)?$")>;
|
|
def : InstRW<[LSU], (instregex "LG(RL)?$")>;
|
|
def : InstRW<[LSU], (instregex "L128$")>;
|
|
|
|
def : InstRW<[FXU], (instregex "LLIH(F|H|L)$")>;
|
|
def : InstRW<[FXU], (instregex "LLIL(F|H|L)$")>;
|
|
|
|
def : InstRW<[FXU], (instregex "LG(F|H)I$")>;
|
|
def : InstRW<[FXU], (instregex "LHI(Mux)?$")>;
|
|
def : InstRW<[FXU], (instregex "LR(Mux)?$")>;
|
|
|
|
// Load and test
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LT(G)?$")>;
|
|
def : InstRW<[FXU], (instregex "LT(G)?R$")>;
|
|
|
|
// Stores
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "STG(RL)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "ST128$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "ST(Y|FH|RL|Mux)?$")>;
|
|
|
|
// String moves.
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "MVST$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Conditional move instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, Lat2, EndGroup], (instregex "LOC(G)?R(Asm.*)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat6, EndGroup], (instregex "LOC(G)?(Asm.*)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5, EndGroup], (instregex "STOC(G)?(Asm.*)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Sign extensions
|
|
//===----------------------------------------------------------------------===//
|
|
def : InstRW<[FXU], (instregex "L(B|H|G)R$")>;
|
|
def : InstRW<[FXU], (instregex "LG(B|H|F)R$")>;
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LTGF$")>;
|
|
def : InstRW<[FXU], (instregex "LTGFR$")>;
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LB(H|Mux)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LH(Y)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LH(H|Mux|RL)$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LG(B|H|F)$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LG(H|F)RL$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Zero extensions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU], (instregex "LLCR(Mux)?$")>;
|
|
def : InstRW<[FXU], (instregex "LLHR(Mux)?$")>;
|
|
def : InstRW<[FXU], (instregex "LLG(C|F|H|T)R$")>;
|
|
def : InstRW<[LSU], (instregex "LLC(Mux)?$")>;
|
|
def : InstRW<[LSU], (instregex "LLH(Mux)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LL(C|H)H$")>;
|
|
def : InstRW<[LSU], (instregex "LLHRL$")>;
|
|
def : InstRW<[LSU], (instregex "LLG(C|F|H|T|FRL|HRL)$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Truncations
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "STC(H|Y|Mux)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "STH(H|Y|RL|Mux)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "STCM(H|Y)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Multi-register moves
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Load multiple (estimated average of 5 ops)
|
|
def : InstRW<[LSU, LSU, LSU, LSU, LSU, Lat10, GroupAlone],
|
|
(instregex "LM(H|Y|G)?$")>;
|
|
|
|
// Load multiple disjoint
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "LMD$")>;
|
|
|
|
// Store multiple (estimated average of 3 ops)
|
|
def : InstRW<[LSU, LSU, FXU, FXU, FXU, Lat10, GroupAlone],
|
|
(instregex "STM(H|Y|G)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Byte swaps
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU], (instregex "LRV(G)?R$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LRV(G|H)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "STRV(G|H)?$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "MVCIN$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Load address instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU], (instregex "LA(Y|RL)?$")>;
|
|
|
|
// Load the Global Offset Table address
|
|
def : InstRW<[FXU], (instregex "GOT$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Absolute and Negation
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, Lat2], (instregex "LP(G)?R$")>;
|
|
def : InstRW<[FXU, FXU, Lat3, GroupAlone], (instregex "L(N|P)GFR$")>;
|
|
def : InstRW<[FXU, Lat2], (instregex "LN(R|GR)$")>;
|
|
def : InstRW<[FXU], (instregex "LC(R|GR)$")>;
|
|
def : InstRW<[FXU, FXU, Lat2, GroupAlone], (instregex "LCGFR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Insertion
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "IC(Y)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "IC32(Y)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "ICM(H|Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "II(F|H|L)Mux$")>;
|
|
def : InstRW<[FXU], (instregex "IIHF(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "IIHH(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "IIHL(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "IILF(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "IILH(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "IILL(64)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Addition
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "A(L)?(Y|SI)?$")>;
|
|
def : InstRW<[FXU, FXU, LSU, Lat6, GroupAlone], (instregex "AH(Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "AIH$")>;
|
|
def : InstRW<[FXU], (instregex "AFI(Mux)?$")>;
|
|
def : InstRW<[FXU], (instregex "AGFI$")>;
|
|
def : InstRW<[FXU], (instregex "AGHI(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "AGR(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "AHI(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "AHIMux(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "AL(FI|HSIK)$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "ALGF$")>;
|
|
def : InstRW<[FXU], (instregex "ALGHSIK$")>;
|
|
def : InstRW<[FXU], (instregex "ALGF(I|R)$")>;
|
|
def : InstRW<[FXU], (instregex "ALGR(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "ALR(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "AR(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "A(L)?HHHR$")>;
|
|
def : InstRW<[FXU, FXU, Lat3], (instregex "A(L)?HHLR$")>;
|
|
def : InstRW<[FXU], (instregex "ALSIH(N)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "A(L)?G(SI)?$")>;
|
|
|
|
// Logical addition with carry
|
|
def : InstRW<[FXU, LSU, Lat7, GroupAlone], (instregex "ALC(G)?$")>;
|
|
def : InstRW<[FXU, Lat3, GroupAlone], (instregex "ALC(G)?R$")>;
|
|
|
|
// Add with sign extension (32 -> 64)
|
|
def : InstRW<[FXU, FXU, LSU, Lat6, GroupAlone], (instregex "AGF$")>;
|
|
def : InstRW<[FXU, FXU, Lat2, GroupAlone], (instregex "AGFR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Subtraction
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "S(G|Y)?$")>;
|
|
def : InstRW<[FXU, FXU, LSU, Lat6, GroupAlone], (instregex "SH(Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "SGR(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "SLFI$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "SL(G|GF|Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "SLGF(I|R)$")>;
|
|
def : InstRW<[FXU], (instregex "SLGR(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "SLR(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "SR(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "S(L)?HHHR$")>;
|
|
def : InstRW<[FXU, FXU, Lat3], (instregex "S(L)?HHLR$")>;
|
|
|
|
// Subtraction with borrow
|
|
def : InstRW<[FXU, LSU, Lat7, GroupAlone], (instregex "SLB(G)?$")>;
|
|
def : InstRW<[FXU, Lat3, GroupAlone], (instregex "SLB(G)?R$")>;
|
|
|
|
// Subtraction with sign extension (32 -> 64)
|
|
def : InstRW<[FXU, FXU, LSU, Lat6, GroupAlone], (instregex "SGF$")>;
|
|
def : InstRW<[FXU, FXU, Lat2, GroupAlone], (instregex "SGFR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// AND
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "N(G|Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "NGR(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "NI(FMux|HMux|LMux)$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "NI(Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "NIHF(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "NIHH(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "NIHL(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "NILF(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "NILH(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "NILL(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "NR(K)?$")>;
|
|
def : InstRW<[LSU, LSU, FXU, Lat9, GroupAlone], (instregex "NC$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// OR
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "O(G|Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "OGR(K)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "OI(Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "OI(FMux|HMux|LMux)$")>;
|
|
def : InstRW<[FXU], (instregex "OIHF(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "OIHH(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "OIHL(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "OILF(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "OILH(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "OILL(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "OR(K)?$")>;
|
|
def : InstRW<[LSU, LSU, FXU, Lat9, GroupAlone], (instregex "OC$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// XOR
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "X(G|Y)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "XI(Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "XIFMux$")>;
|
|
def : InstRW<[FXU], (instregex "XGR(K)?$")>;
|
|
def : InstRW<[FXU], (instregex "XIHF(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "XILF(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "XR(K)?$")>;
|
|
def : InstRW<[LSU, LSU, FXU, Lat9, GroupAlone], (instregex "XC$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Multiplication
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat10], (instregex "MS(GF|Y)?$")>;
|
|
def : InstRW<[FXU, Lat6], (instregex "MS(R|FI)$")>;
|
|
def : InstRW<[FXU, LSU, Lat12], (instregex "MSG$")>;
|
|
def : InstRW<[FXU, Lat8], (instregex "MSGR$")>;
|
|
def : InstRW<[FXU, Lat6], (instregex "MSGF(I|R)$")>;
|
|
def : InstRW<[FXU, LSU, Lat15, GroupAlone], (instregex "MLG$")>;
|
|
def : InstRW<[FXU, Lat9, GroupAlone], (instregex "MLGR$")>;
|
|
def : InstRW<[FXU, Lat5], (instregex "MGHI$")>;
|
|
def : InstRW<[FXU, Lat5], (instregex "MHI$")>;
|
|
def : InstRW<[FXU, LSU, Lat9], (instregex "MH(Y)?$")>;
|
|
def : InstRW<[FXU, Lat7, GroupAlone], (instregex "M(L)?R$")>;
|
|
def : InstRW<[FXU, LSU, Lat7, GroupAlone], (instregex "M(FY|L)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Division and remainder
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FPU2, FPU2, FXU, FXU, FXU, FXU, FXU, Lat30, GroupAlone],
|
|
(instregex "DR$")>;
|
|
def : InstRW<[FPU2, FPU2, LSU, FXU, FXU, FXU, FXU, Lat30, GroupAlone],
|
|
(instregex "D$")>;
|
|
def : InstRW<[FPU2, FPU2, FXU, FXU, FXU, FXU, Lat30, GroupAlone],
|
|
(instregex "DSG(F)?R$")>;
|
|
def : InstRW<[FPU2, FPU2, LSU, FXU, FXU, FXU, Lat30, GroupAlone],
|
|
(instregex "DSG(F)?$")>;
|
|
def : InstRW<[FPU2, FPU2, FXU, FXU, FXU, FXU, FXU, Lat30, GroupAlone],
|
|
(instregex "DL(G)?R$")>;
|
|
def : InstRW<[FPU2, FPU2, LSU, FXU, FXU, FXU, FXU, Lat30, GroupAlone],
|
|
(instregex "DL(G)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Shifts
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU], (instregex "SLL(G|K)?$")>;
|
|
def : InstRW<[FXU], (instregex "SRL(G|K)?$")>;
|
|
def : InstRW<[FXU], (instregex "SRA(G|K)?$")>;
|
|
def : InstRW<[FXU, Lat2], (instregex "SLA(G|K)?$")>;
|
|
def : InstRW<[FXU, FXU, FXU, FXU, Lat8], (instregex "S(L|R)D(A|L)$")>;
|
|
|
|
// Rotate
|
|
def : InstRW<[FXU, LSU, Lat6], (instregex "RLL(G)?$")>;
|
|
|
|
// Rotate and insert
|
|
def : InstRW<[FXU], (instregex "RISBG(32)?$")>;
|
|
def : InstRW<[FXU], (instregex "RISBH(G|H|L)$")>;
|
|
def : InstRW<[FXU], (instregex "RISBL(G|H|L)$")>;
|
|
def : InstRW<[FXU], (instregex "RISBMux$")>;
|
|
|
|
// Rotate and Select
|
|
def : InstRW<[FXU, FXU, Lat3, GroupAlone], (instregex "R(N|O|X)SBG$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Comparison
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "C(G|Y|Mux|RL)?$")>;
|
|
def : InstRW<[FXU], (instregex "C(F|H)I(Mux)?$")>;
|
|
def : InstRW<[FXU], (instregex "CG(F|H)I$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "CG(HSI|RL)$")>;
|
|
def : InstRW<[FXU], (instregex "C(G)?R$")>;
|
|
def : InstRW<[FXU], (instregex "CIH$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "CH(F|SI)$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "CL(Y|Mux|FHSI)?$")>;
|
|
def : InstRW<[FXU], (instregex "CLFI(Mux)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "CLG(HRL|HSI)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "CLGF(RL)?$")>;
|
|
def : InstRW<[FXU], (instregex "CLGF(I|R)$")>;
|
|
def : InstRW<[FXU], (instregex "CLGR$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "CLGRL$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "CLH(F|RL|HSI)$")>;
|
|
def : InstRW<[FXU], (instregex "CLIH$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "CLI(Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "CLR$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "CLRL$")>;
|
|
def : InstRW<[FXU], (instregex "C(L)?HHR$")>;
|
|
def : InstRW<[FXU, FXU, Lat3], (instregex "C(L)?HLR$")>;
|
|
|
|
// Compare halfword
|
|
def : InstRW<[FXU, LSU, FXU, Lat6, GroupAlone], (instregex "CH(Y|RL)?$")>;
|
|
def : InstRW<[FXU, LSU, FXU, Lat6, GroupAlone], (instregex "CGH(RL)?$")>;
|
|
def : InstRW<[FXU, LSU, FXU, Lat6, GroupAlone], (instregex "CHHSI$")>;
|
|
|
|
// Compare with sign extension (32 -> 64)
|
|
def : InstRW<[FXU, FXU, LSU, Lat6, Lat2, GroupAlone], (instregex "CGF(RL)?$")>;
|
|
def : InstRW<[FXU, FXU, Lat2, GroupAlone], (instregex "CGFR$")>;
|
|
|
|
// Compare logical character
|
|
def : InstRW<[LSU, LSU, FXU, Lat9, GroupAlone], (instregex "CLC$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "CLCL(E|U)?$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "CLST$")>;
|
|
|
|
// Test under mask
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "TM(Y)?$")>;
|
|
def : InstRW<[FXU], (instregex "TM(H|L)Mux$")>;
|
|
def : InstRW<[FXU], (instregex "TMHH(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "TMHL(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "TMLH(64)?$")>;
|
|
def : InstRW<[FXU], (instregex "TMLL(64)?$")>;
|
|
|
|
// Compare logical characters under mask
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "CLM(H|Y)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Prefetch
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[LSU, GroupAlone], (instregex "PFD(RL)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Atomic operations
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[LSU, EndGroup], (instregex "Serialize$")>;
|
|
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LAA(G)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LAAL(G)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LAN(G)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LAO(G)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "LAX(G)?$")>;
|
|
|
|
// Test and set
|
|
def : InstRW<[FXU, LSU, Lat5, EndGroup], (instregex "TS$")>;
|
|
|
|
// Compare and swap
|
|
def : InstRW<[FXU, LSU, FXU, Lat6, GroupAlone], (instregex "CS(G|Y)?$")>;
|
|
|
|
// Compare double and swap
|
|
def : InstRW<[FXU, FXU, FXU, FXU, FXU, LSU, Lat10, GroupAlone],
|
|
(instregex "CDS(Y)?$")>;
|
|
def : InstRW<[FXU, FXU, FXU, FXU, FXU, FXU, LSU, LSU, Lat12, GroupAlone],
|
|
(instregex "CDSG$")>;
|
|
|
|
// Compare and swap and store
|
|
def : InstRW<[FXU, Lat30, GroupAlone], (instregex "CSST$")>;
|
|
|
|
// Perform locked operation
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "PLO$")>;
|
|
|
|
// Load/store pair from/to quadword
|
|
def : InstRW<[LSU, LSU, Lat5, GroupAlone], (instregex "LPQ$")>;
|
|
def : InstRW<[FXU, FXU, LSU, LSU, Lat6, GroupAlone], (instregex "STPQ$")>;
|
|
|
|
// Load pair disjoint
|
|
def : InstRW<[LSU, LSU, Lat5, GroupAlone], (instregex "LPD(G)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Translate and convert
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, Lat30, GroupAlone], (instregex "TR(T|TR)?(E|EOpt)?$")>;
|
|
def : InstRW<[FXU, Lat30, GroupAlone], (instregex "TR(T|O)(T|O)(Opt)?$")>;
|
|
def : InstRW<[FXU, Lat30, GroupAlone], (instregex "CU(12|14|21|24|41|42)(Opt)?$")>;
|
|
def : InstRW<[FXU, Lat30, GroupAlone], (instregex "(CUUTF|CUTFU)(Opt)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Message-security assist
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, Lat30, GroupAlone], (instregex "KM(C|F|O|CTR)?$")>;
|
|
def : InstRW<[FXU, Lat30, GroupAlone], (instregex "(KIMD|KLMD|KMAC|PCC)$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Decimal arithmetic
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, DFU, LSU, Lat30, GroupAlone], (instregex "CVB(Y|G)?$")>;
|
|
def : InstRW<[FXU, DFU, FXU, Lat30, GroupAlone], (instregex "CVD(Y|G)?$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "MV(N|Z|O)$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "(PACK|PKA|PKU)$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "UNPK(A|U)?$")>;
|
|
|
|
def : InstRW<[FXU, FXU, DFU2, LSU, LSU, LSU, LSU, Lat15, GroupAlone],
|
|
(instregex "(A|S|ZA)P$")>;
|
|
def : InstRW<[FXU, FXU, DFU2, LSU, LSU, LSU, LSU, Lat30, GroupAlone],
|
|
(instregex "(M|D)P$")>;
|
|
def : InstRW<[FXU, FXU, DFU2, LSU, LSU, Lat15, GroupAlone],
|
|
(instregex "SRP$")>;
|
|
def : InstRW<[DFU2, LSU, LSU, LSU, LSU, Lat11, GroupAlone], (instregex "CP$")>;
|
|
def : InstRW<[DFU2, LSU, LSU, Lat3, GroupAlone], (instregex "TP$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "ED(MK)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Access registers
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Extract/set/copy access register
|
|
def : InstRW<[LSU], (instregex "(EAR|SAR|CPYA)$")>;
|
|
|
|
// Load address extended
|
|
def : InstRW<[LSU, FXU, Lat5, GroupAlone], (instregex "LAE(Y)?$")>;
|
|
|
|
// Load/store access multiple (not modeled precisely)
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "(L|ST)AM(Y)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Program mask and addressing mode
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Insert Program Mask
|
|
def : InstRW<[FXU, Lat3, EndGroup], (instregex "IPM$")>;
|
|
|
|
// Set Program Mask
|
|
def : InstRW<[LSU, EndGroup], (instregex "SPM$")>;
|
|
|
|
// Branch and link
|
|
def : InstRW<[FXU, FXU, LSU, Lat8, GroupAlone], (instregex "BAL(R)?$")>;
|
|
|
|
// Test addressing mode
|
|
def : InstRW<[FXU], (instregex "TAM$")>;
|
|
|
|
// Set addressing mode
|
|
def : InstRW<[LSU, EndGroup], (instregex "SAM(24|31|64)$")>;
|
|
|
|
// Branch (and save) and set mode.
|
|
def : InstRW<[FXU, LSU, Lat5, GroupAlone], (instregex "BSM$")>;
|
|
def : InstRW<[FXU, FXU, LSU, Lat6, GroupAlone], (instregex "BASSM$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Miscellaneous Instructions.
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Find leftmost one
|
|
def : InstRW<[FXU, Lat7, GroupAlone], (instregex "FLOGR$")>;
|
|
|
|
// Population count
|
|
def : InstRW<[FXU, Lat3], (instregex "POPCNT$")>;
|
|
|
|
// Extend
|
|
def : InstRW<[FXU], (instregex "AEXT128_64$")>;
|
|
def : InstRW<[FXU], (instregex "ZEXT128_(32|64)$")>;
|
|
|
|
// String instructions
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "SRST$")>;
|
|
def : InstRW<[LSU, Lat30], (instregex "SRSTU$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "CUSE$")>;
|
|
|
|
// Various complex instructions
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "CFC$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "UPT$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "CKSM$")>;
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "CMPSC$")>;
|
|
|
|
// Execute
|
|
def : InstRW<[LSU, GroupAlone], (instregex "EX(RL)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// .insn directive instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// An "empty" sched-class will be assigned instead of the "invalid sched-class".
|
|
// getNumDecoderSlots() will then return 1 instead of 0.
|
|
def : InstRW<[], (instregex "Insn.*")>;
|
|
|
|
|
|
// ----------------------------- Floating point ----------------------------- //
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// FP: Select instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU], (instregex "SelectF(32|64|128)$")>;
|
|
def : InstRW<[FXU], (instregex "CondStoreF32(Inv)?$")>;
|
|
def : InstRW<[FXU], (instregex "CondStoreF64(Inv)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// FP: Move instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Load zero
|
|
def : InstRW<[FXU], (instregex "LZ(DR|ER)$")>;
|
|
def : InstRW<[FXU, FXU, Lat2, GroupAlone], (instregex "LZXR$")>;
|
|
|
|
// Load
|
|
def : InstRW<[FXU], (instregex "LER$")>;
|
|
def : InstRW<[FXU], (instregex "LD(R|R32|GR)$")>;
|
|
def : InstRW<[FXU, Lat3], (instregex "LGDR$")>;
|
|
def : InstRW<[FXU, FXU, Lat2, GroupAlone], (instregex "LXR$")>;
|
|
|
|
// Load and Test
|
|
def : InstRW<[FPU], (instregex "LT(D|E)BR$")>;
|
|
def : InstRW<[FPU], (instregex "LTEBRCompare(_VecPseudo)?$")>;
|
|
def : InstRW<[FPU], (instregex "LTDBRCompare(_VecPseudo)?$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat9, GroupAlone], (instregex "LTXBR$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat9, GroupAlone],
|
|
(instregex "LTXBRCompare(_VecPseudo)?$")>;
|
|
|
|
// Copy sign
|
|
def : InstRW<[FXU, FXU, Lat5, GroupAlone], (instregex "CPSDRd(d|s)$")>;
|
|
def : InstRW<[FXU, FXU, Lat5, GroupAlone], (instregex "CPSDRs(d|s)$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// FP: Load instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[LSU], (instregex "LE(Y)?$")>;
|
|
def : InstRW<[LSU], (instregex "LD(Y|E32)?$")>;
|
|
def : InstRW<[LSU], (instregex "LX$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// FP: Store instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat7], (instregex "STD(Y)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat7], (instregex "STE(Y)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat5], (instregex "STX$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// FP: Conversion instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Load rounded
|
|
def : InstRW<[FPU], (instregex "LEDBR(A)?$")>;
|
|
def : InstRW<[FPU, FPU, Lat20], (instregex "LEXBR(A)?$")>;
|
|
def : InstRW<[FPU, FPU, Lat20], (instregex "LDXBR(A)?$")>;
|
|
|
|
// Load lengthened
|
|
def : InstRW<[FPU, LSU, Lat12], (instregex "LDEB$")>;
|
|
def : InstRW<[FPU], (instregex "LDEBR$")>;
|
|
def : InstRW<[FPU2, FPU2, LSU, Lat15, GroupAlone], (instregex "LX(D|E)B$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat10, GroupAlone], (instregex "LX(D|E)BR$")>;
|
|
|
|
// Convert from fixed / logical
|
|
def : InstRW<[FXU, FPU, Lat9, GroupAlone], (instregex "CE(F|G)BR(A)?$")>;
|
|
def : InstRW<[FXU, FPU, Lat9, GroupAlone], (instregex "CD(F|G)BR(A)?$")>;
|
|
def : InstRW<[FXU, FPU2, FPU2, Lat11, GroupAlone], (instregex "CX(F|G)BR(A)?$")>;
|
|
def : InstRW<[FXU, FPU, Lat9, GroupAlone], (instregex "CEL(F|G)BR$")>;
|
|
def : InstRW<[FXU, FPU, Lat9, GroupAlone], (instregex "CDL(F|G)BR$")>;
|
|
def : InstRW<[FXU, FPU2, FPU2, Lat11, GroupAlone], (instregex "CXL(F|G)BR$")>;
|
|
|
|
// Convert to fixed / logical
|
|
def : InstRW<[FXU, FPU, Lat12, GroupAlone], (instregex "CF(E|D)BR(A)?$")>;
|
|
def : InstRW<[FXU, FPU, Lat12, GroupAlone], (instregex "CG(E|D)BR(A)?$")>;
|
|
def : InstRW<[FXU, FPU, FPU, Lat20, GroupAlone], (instregex "C(F|G)XBR(A)?$")>;
|
|
def : InstRW<[FXU, FPU, Lat11, GroupAlone], (instregex "CLF(E|D)BR$")>;
|
|
def : InstRW<[FXU, FPU, Lat11, GroupAlone], (instregex "CLG(E|D)BR$")>;
|
|
def : InstRW<[FXU, FPU, FPU, Lat20, GroupAlone], (instregex "CL(F|G)XBR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// FP: Unary arithmetic
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Load Complement / Negative / Positive
|
|
def : InstRW<[FPU], (instregex "L(C|N|P)DBR$")>;
|
|
def : InstRW<[FPU], (instregex "L(C|N|P)EBR$")>;
|
|
def : InstRW<[FXU], (instregex "LCDFR(_32)?$")>;
|
|
def : InstRW<[FXU], (instregex "LNDFR(_32)?$")>;
|
|
def : InstRW<[FXU], (instregex "LPDFR(_32)?$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat9, GroupAlone], (instregex "L(C|N|P)XBR$")>;
|
|
|
|
// Square root
|
|
def : InstRW<[FPU, LSU, Lat30], (instregex "SQ(E|D)B$")>;
|
|
def : InstRW<[FPU, Lat30], (instregex "SQ(E|D)BR$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat30, GroupAlone], (instregex "SQXBR$")>;
|
|
|
|
// Load FP integer
|
|
def : InstRW<[FPU], (instregex "FIEBR(A)?$")>;
|
|
def : InstRW<[FPU], (instregex "FIDBR(A)?$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat15, GroupAlone], (instregex "FIXBR(A)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// FP: Binary arithmetic
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Addition
|
|
def : InstRW<[FPU, LSU, Lat12], (instregex "A(E|D)B$")>;
|
|
def : InstRW<[FPU], (instregex "A(E|D)BR$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat20, GroupAlone], (instregex "AXBR$")>;
|
|
|
|
// Subtraction
|
|
def : InstRW<[FPU, LSU, Lat12], (instregex "S(E|D)B$")>;
|
|
def : InstRW<[FPU], (instregex "S(E|D)BR$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat20, GroupAlone], (instregex "SXBR$")>;
|
|
|
|
// Multiply
|
|
def : InstRW<[FPU, LSU, Lat12], (instregex "M(D|DE|EE)B$")>;
|
|
def : InstRW<[FPU], (instregex "M(D|DE|EE)BR$")>;
|
|
def : InstRW<[FPU2, FPU2, LSU, Lat15, GroupAlone], (instregex "MXDB$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat10, GroupAlone], (instregex "MXDBR$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat30, GroupAlone], (instregex "MXBR$")>;
|
|
|
|
// Multiply and add / subtract
|
|
def : InstRW<[FPU, LSU, Lat12, GroupAlone], (instregex "M(A|S)EB$")>;
|
|
def : InstRW<[FPU, GroupAlone], (instregex "M(A|S)EBR$")>;
|
|
def : InstRW<[FPU, LSU, Lat12, GroupAlone], (instregex "M(A|S)DB$")>;
|
|
def : InstRW<[FPU, GroupAlone], (instregex "M(A|S)DBR$")>;
|
|
|
|
// Division
|
|
def : InstRW<[FPU, LSU, Lat30], (instregex "D(E|D)B$")>;
|
|
def : InstRW<[FPU, Lat30], (instregex "D(E|D)BR$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat30, GroupAlone], (instregex "DXBR$")>;
|
|
|
|
// Divide to integer
|
|
def : InstRW<[FPU, Lat30, GroupAlone], (instregex "DI(E|D)BR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// FP: Comparisons
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Compare
|
|
def : InstRW<[FPU, LSU, Lat12], (instregex "(K|C)(E|D)B$")>;
|
|
def : InstRW<[FPU], (instregex "(K|C)(E|D)BR$")>;
|
|
def : InstRW<[FPU, FPU, Lat30], (instregex "(K|C)XBR$")>;
|
|
|
|
// Test Data Class
|
|
def : InstRW<[FPU, LSU, Lat15], (instregex "TC(E|D)B$")>;
|
|
def : InstRW<[FPU2, FPU2, LSU, Lat15, GroupAlone], (instregex "TCXB$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// FP: Floating-point control register instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat4, GroupAlone], (instregex "EFPC$")>;
|
|
def : InstRW<[LSU, Lat3, GroupAlone], (instregex "SFPC$")>;
|
|
def : InstRW<[LSU, LSU, Lat6, GroupAlone], (instregex "LFPC$")>;
|
|
def : InstRW<[LSU, Lat3, GroupAlone], (instregex "STFPC$")>;
|
|
def : InstRW<[FXU, Lat30, GroupAlone], (instregex "SFASR$")>;
|
|
def : InstRW<[FXU, LSU, Lat30, GroupAlone], (instregex "LFAS$")>;
|
|
def : InstRW<[FXU, Lat2, GroupAlone], (instregex "SRNM(B|T)?$")>;
|
|
|
|
|
|
// --------------------- Hexadecimal floating point ------------------------- //
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// HFP: Move instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Load and Test
|
|
def : InstRW<[FPU], (instregex "LT(D|E)R$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat9, GroupAlone], (instregex "LTXR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// HFP: Conversion instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Load rounded
|
|
def : InstRW<[FPU], (instregex "(LEDR|LRER)$")>;
|
|
def : InstRW<[FPU], (instregex "LEXR$")>;
|
|
def : InstRW<[FPU], (instregex "(LDXR|LRDR)$")>;
|
|
|
|
// Load lengthened
|
|
def : InstRW<[LSU], (instregex "LDE$")>;
|
|
def : InstRW<[FXU], (instregex "LDER$")>;
|
|
def : InstRW<[FPU2, FPU2, LSU, Lat15, GroupAlone], (instregex "LX(D|E)$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat10, GroupAlone], (instregex "LX(D|E)R$")>;
|
|
|
|
// Convert from fixed
|
|
def : InstRW<[FXU, FPU, Lat9, GroupAlone], (instregex "CE(F|G)R$")>;
|
|
def : InstRW<[FXU, FPU, Lat9, GroupAlone], (instregex "CD(F|G)R$")>;
|
|
def : InstRW<[FXU, FPU2, FPU2, Lat11, GroupAlone], (instregex "CX(F|G)R$")>;
|
|
|
|
// Convert to fixed
|
|
def : InstRW<[FXU, FPU, Lat12, GroupAlone], (instregex "CF(E|D)R$")>;
|
|
def : InstRW<[FXU, FPU, Lat12, GroupAlone], (instregex "CG(E|D)R$")>;
|
|
def : InstRW<[FXU, FPU, FPU, Lat20, GroupAlone], (instregex "C(F|G)XR$")>;
|
|
|
|
// Convert BFP to HFP / HFP to BFP.
|
|
def : InstRW<[FPU], (instregex "THD(E)?R$")>;
|
|
def : InstRW<[FPU], (instregex "TB(E)?DR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// HFP: Unary arithmetic
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Load Complement / Negative / Positive
|
|
def : InstRW<[FPU], (instregex "L(C|N|P)DR$")>;
|
|
def : InstRW<[FPU], (instregex "L(C|N|P)ER$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat9, GroupAlone], (instregex "L(C|N|P)XR$")>;
|
|
|
|
// Halve
|
|
def : InstRW<[FPU], (instregex "H(E|D)R$")>;
|
|
|
|
// Square root
|
|
def : InstRW<[FPU, LSU, Lat30], (instregex "SQ(E|D)$")>;
|
|
def : InstRW<[FPU, Lat30], (instregex "SQ(E|D)R$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat30, GroupAlone], (instregex "SQXR$")>;
|
|
|
|
// Load FP integer
|
|
def : InstRW<[FPU], (instregex "FIER$")>;
|
|
def : InstRW<[FPU], (instregex "FIDR$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat15, GroupAlone], (instregex "FIXR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// HFP: Binary arithmetic
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Addition
|
|
def : InstRW<[FPU, LSU, Lat12], (instregex "A(E|D|U|W)$")>;
|
|
def : InstRW<[FPU], (instregex "A(E|D|U|W)R$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat20, GroupAlone], (instregex "AXR$")>;
|
|
|
|
// Subtraction
|
|
def : InstRW<[FPU, LSU, Lat12], (instregex "S(E|D|U|W)$")>;
|
|
def : InstRW<[FPU], (instregex "S(E|D|U|W)R$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat20, GroupAlone], (instregex "SXR$")>;
|
|
|
|
// Multiply
|
|
def : InstRW<[FPU, LSU, Lat12], (instregex "M(D|DE|E|EE)$")>;
|
|
def : InstRW<[FPU], (instregex "M(D|DE|E|EE)R$")>;
|
|
def : InstRW<[FPU2, FPU2, LSU, Lat15, GroupAlone], (instregex "MXD$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat10, GroupAlone], (instregex "MXDR$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat30, GroupAlone], (instregex "MXR$")>;
|
|
def : InstRW<[FPU2, FPU2, LSU, Lat15, GroupAlone], (instregex "MY(H|L)?$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat10, GroupAlone], (instregex "MY(H|L)?R$")>;
|
|
|
|
// Multiply and add / subtract
|
|
def : InstRW<[FPU, LSU, Lat12, GroupAlone], (instregex "M(A|S)E$")>;
|
|
def : InstRW<[FPU, GroupAlone], (instregex "M(A|S)ER$")>;
|
|
def : InstRW<[FPU, LSU, Lat12, GroupAlone], (instregex "M(A|S)D$")>;
|
|
def : InstRW<[FPU, GroupAlone], (instregex "M(A|S)DR$")>;
|
|
def : InstRW<[FPU2, FPU2, LSU, Lat12, GroupAlone], (instregex "MAY(H|L)?$")>;
|
|
def : InstRW<[FPU2, FPU2, GroupAlone], (instregex "MAY(H|L)?R$")>;
|
|
|
|
// Division
|
|
def : InstRW<[FPU, LSU, Lat30], (instregex "D(E|D)$")>;
|
|
def : InstRW<[FPU, Lat30], (instregex "D(E|D)R$")>;
|
|
def : InstRW<[FPU2, FPU2, Lat30, GroupAlone], (instregex "DXR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// HFP: Comparisons
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Compare
|
|
def : InstRW<[FPU, LSU, Lat12], (instregex "C(E|D)$")>;
|
|
def : InstRW<[FPU], (instregex "C(E|D)R$")>;
|
|
def : InstRW<[FPU, FPU, Lat15], (instregex "CXR$")>;
|
|
|
|
|
|
// ------------------------ Decimal floating point -------------------------- //
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// DFP: Move instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Load and Test
|
|
def : InstRW<[DFU, Lat20], (instregex "LTDTR$")>;
|
|
def : InstRW<[DFU2, DFU2, Lat20, GroupAlone], (instregex "LTXTR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// DFP: Conversion instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Load rounded
|
|
def : InstRW<[DFU, Lat30], (instregex "LEDTR$")>;
|
|
def : InstRW<[DFU, DFU, Lat30], (instregex "LDXTR$")>;
|
|
|
|
// Load lengthened
|
|
def : InstRW<[DFU, Lat20], (instregex "LDETR$")>;
|
|
def : InstRW<[DFU2, DFU2, Lat20, GroupAlone], (instregex "LXDTR$")>;
|
|
|
|
// Convert from fixed / logical
|
|
def : InstRW<[FXU, DFU, Lat30, GroupAlone], (instregex "CD(F|G)TR(A)?$")>;
|
|
def : InstRW<[FXU, DFU2, DFU2, Lat30, GroupAlone], (instregex "CX(F|G)TR(A)?$")>;
|
|
def : InstRW<[FXU, DFU, Lat11, GroupAlone], (instregex "CDL(F|G)TR$")>;
|
|
def : InstRW<[FXU, DFU2, DFU2, Lat11, GroupAlone], (instregex "CXL(F|G)TR$")>;
|
|
|
|
// Convert to fixed / logical
|
|
def : InstRW<[FXU, DFU, Lat30, GroupAlone], (instregex "C(F|G)DTR(A)?$")>;
|
|
def : InstRW<[FXU, DFU, DFU, Lat30, GroupAlone], (instregex "C(F|G)XTR(A)?$")>;
|
|
def : InstRW<[FXU, DFU, Lat30, GroupAlone], (instregex "CL(F|G)DTR$")>;
|
|
def : InstRW<[FXU, DFU, DFU, Lat30, GroupAlone], (instregex "CL(F|G)XTR$")>;
|
|
|
|
// Convert from / to signed / unsigned packed
|
|
def : InstRW<[FXU, DFU, Lat12, GroupAlone], (instregex "CD(S|U)TR$")>;
|
|
def : InstRW<[FXU, FXU, DFU2, DFU2, Lat20, GroupAlone], (instregex "CX(S|U)TR$")>;
|
|
def : InstRW<[FXU, DFU, Lat12, GroupAlone], (instregex "C(S|U)DTR$")>;
|
|
def : InstRW<[FXU, FXU, DFU2, DFU2, Lat20, GroupAlone], (instregex "C(S|U)XTR$")>;
|
|
|
|
// Perform floating-point operation
|
|
def : InstRW<[LSU, Lat30, GroupAlone], (instregex "PFPO$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// DFP: Unary arithmetic
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Load FP integer
|
|
def : InstRW<[DFU, Lat20], (instregex "FIDTR$")>;
|
|
def : InstRW<[DFU2, DFU2, Lat20, GroupAlone], (instregex "FIXTR$")>;
|
|
|
|
// Extract biased exponent
|
|
def : InstRW<[FXU, DFU, Lat15, GroupAlone], (instregex "EEDTR$")>;
|
|
def : InstRW<[FXU, DFU, Lat15, GroupAlone], (instregex "EEXTR$")>;
|
|
|
|
// Extract significance
|
|
def : InstRW<[FXU, DFU, Lat15, GroupAlone], (instregex "ESDTR$")>;
|
|
def : InstRW<[FXU, DFU, DFU, Lat20, GroupAlone], (instregex "ESXTR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// DFP: Binary arithmetic
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Addition
|
|
def : InstRW<[DFU, Lat30], (instregex "ADTR(A)?$")>;
|
|
def : InstRW<[DFU2, DFU2, Lat30, GroupAlone], (instregex "AXTR(A)?$")>;
|
|
|
|
// Subtraction
|
|
def : InstRW<[DFU, Lat30], (instregex "SDTR(A)?$")>;
|
|
def : InstRW<[DFU2, DFU2, Lat30, GroupAlone], (instregex "SXTR(A)?$")>;
|
|
|
|
// Multiply
|
|
def : InstRW<[DFU, Lat30], (instregex "MDTR(A)?$")>;
|
|
def : InstRW<[DFU2, DFU2, Lat30, GroupAlone], (instregex "MXTR(A)?$")>;
|
|
|
|
// Division
|
|
def : InstRW<[DFU, Lat30], (instregex "DDTR(A)?$")>;
|
|
def : InstRW<[DFU2, DFU2, Lat30, GroupAlone], (instregex "DXTR(A)?$")>;
|
|
|
|
// Quantize
|
|
def : InstRW<[DFU, Lat30], (instregex "QADTR$")>;
|
|
def : InstRW<[DFU2, DFU2, Lat30, GroupAlone], (instregex "QAXTR$")>;
|
|
|
|
// Reround
|
|
def : InstRW<[FXU, DFU, Lat30], (instregex "RRDTR$")>;
|
|
def : InstRW<[FXU, DFU2, DFU2, Lat30, GroupAlone], (instregex "RRXTR$")>;
|
|
|
|
// Shift significand left/right
|
|
def : InstRW<[LSU, DFU, Lat11], (instregex "S(L|R)DT$")>;
|
|
def : InstRW<[LSU, DFU2, DFU2, Lat15, GroupAlone], (instregex "S(L|R)XT$")>;
|
|
|
|
// Insert biased exponent
|
|
def : InstRW<[FXU, DFU, Lat11], (instregex "IEDTR$")>;
|
|
def : InstRW<[FXU, DFU2, DFU2, Lat15, GroupAlone], (instregex "IEXTR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// DFP: Comparisons
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Compare
|
|
def : InstRW<[DFU, Lat11], (instregex "(K|C)DTR$")>;
|
|
def : InstRW<[DFU, DFU, Lat15, GroupAlone], (instregex "(K|C)XTR$")>;
|
|
|
|
// Compare biased exponent
|
|
def : InstRW<[DFU, Lat8], (instregex "CEDTR$")>;
|
|
def : InstRW<[DFU, Lat9], (instregex "CEXTR$")>;
|
|
|
|
// Test Data Class/Group
|
|
def : InstRW<[LSU, DFU, Lat15], (instregex "TD(C|G)(E|D)T$")>;
|
|
def : InstRW<[LSU, DFU2, DFU2, Lat15, GroupAlone], (instregex "TD(C|G)XT$")>;
|
|
|
|
|
|
// -------------------------------- System ---------------------------------- //
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: Program-Status Word Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, Lat30], (instregex "EPSW$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "LPSW(E)?$")>;
|
|
def : InstRW<[FXU, Lat3], (instregex "IPK$")>;
|
|
def : InstRW<[LSU], (instregex "SPKA$")>;
|
|
def : InstRW<[LSU], (instregex "SSM$")>;
|
|
def : InstRW<[FXU], (instregex "ST(N|O)SM$")>;
|
|
def : InstRW<[FXU, Lat3], (instregex "IAC$")>;
|
|
def : InstRW<[LSU], (instregex "SAC(F)?$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: Control Register Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "LCTL(G)?$")>;
|
|
def : InstRW<[LSU, Lat30], (instregex "STCT(L|G)$")>;
|
|
def : InstRW<[LSU], (instregex "E(P|S)A(I)?R$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "SSA(I)?R$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "ESEA$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: Prefix-Register Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "SPX$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "STPX$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: Storage-Key and Real Memory Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, Lat30], (instregex "ISKE$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "IVSK$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "SSKE(Opt)?$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "RRB(E|M)$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "PFMF$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "TB$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "PGIN$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "PGOUT$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: Dynamic-Address-Translation Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "IPTE(Opt)?(Opt)?$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "IDTE(Opt)?$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "PTLB$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "CSP(G)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "LPTEA$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "LRA(Y|G)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "STRAG$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "LURA(G)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "STUR(A|G)$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "TPROT$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: Memory-move Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[LSU, Lat8, GroupAlone], (instregex "MVC(K|P|S)$")>;
|
|
def : InstRW<[LSU, Lat6, GroupAlone], (instregex "MVC(S|D)K$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "MVCOS$")>;
|
|
def : InstRW<[LSU, Lat30], (instregex "MVPG$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: Address-Space Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "LASP$")>;
|
|
def : InstRW<[LSU], (instregex "PALB$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "PC$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "PR$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "PT(I)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "RP$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "BS(G|A)$")>;
|
|
def : InstRW<[FXU, Lat20], (instregex "TAR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: Linkage-Stack Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "BAKR$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "EREG(G)?$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "(E|M)STA$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: Time-Related Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, Lat30], (instregex "PTFF$")>;
|
|
def : InstRW<[FXU, LSU, Lat20], (instregex "SCK$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "SCKPF$")>;
|
|
def : InstRW<[FXU, LSU, Lat20], (instregex "SCKC$")>;
|
|
def : InstRW<[FXU, LSU, Lat20], (instregex "SPT$")>;
|
|
def : InstRW<[FXU, LSU, Lat15], (instregex "STCK$")>;
|
|
def : InstRW<[FXU, LSU, Lat12], (instregex "STCKF$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "STCKE$")>;
|
|
def : InstRW<[FXU, LSU, Lat9], (instregex "STCKC$")>;
|
|
def : InstRW<[FXU, LSU, Lat8], (instregex "STPT$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: CPU-Related Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "STAP$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "STIDP$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "STSI$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "STFL(E)?$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "ECAG$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "ECTG$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "PTF$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "PCKMO$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: Miscellaneous Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, Lat30], (instregex "SVC$")>;
|
|
def : InstRW<[FXU], (instregex "MC$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "DIAG$")>;
|
|
def : InstRW<[FXU], (instregex "TRAC(E|G)$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "TRAP(2|4)$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "SIGP$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "SIGA$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "SIE$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: CPU-Measurement Facility Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU], (instregex "LPP$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "ECPGA$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "E(C|P)CTR$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "L(C|P|S)CTL$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "Q(S|CTR)I$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "S(C|P)CTR$")>;
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// System: I/O Instructions
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
def : InstRW<[FXU, Lat30], (instregex "(C|H|R|X)SCH$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "(M|S|ST|T)SCH$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "RCHP$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "SCHM$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "STC(PS|RW)$")>;
|
|
def : InstRW<[FXU, LSU, Lat30], (instregex "TPI$")>;
|
|
def : InstRW<[FXU, Lat30], (instregex "SAL$")>;
|
|
|
|
}
|
|
|