-- Supplied by MyCorp for REG_1500 version 1.0
package REG_1500 is
   use STD_1149_1_2012.all;
end REG_1500;

package body REG_1500 is
   
   use STD_1149_1_2012.all;
   
Attribute REGISTER_MNEMONICS of REG_1500  : package is
  "WIR_decode  ( "&
    "WS_BYPASS  (0B0000) <Wrapper Bypass Instruction>, "&  
    "WS_EXTEST  (0B0001) <Wrapper Serial External Boundary Instruction>, "&
    "WS_INTEST  (0B0010) <Wrapper Serial Internal Boundary Instruction>, "&
    "WS_BIST    (0B0100) <BIST Instruction>, "& 
    "WP_ALL     (0B1xxx) <Wrapper Parallel instructions> "& 
    " )," &
  "BISTGROUP ( "&
    "Disable  (0B0) < BIST has not been enabled >, "&  
    "Enable   (0B1) < BIST enabled > "&
    " ),"&
  "STATGROUP ( "&
    "PASS     (0B1001),  "&  
    "FAIL     (0B0111)   "&
    " )," &
  "MODEGROUP ( "&
    "MODE0    (0X0),  "&  
    "MODE3    (0X3)   "&
    " )";
  
Attribute REGISTER_ASSEMBLY of REG_1500  : package IS
  "REG_1500 ( " &  -- The Select WIR bit and the Wrapper Serial Port
    -- Reset to WBY
    "(SELWIR [1] DelayPO ResetVal(0b0) TAPReset ),  "& 
    "(WSP IS WSP_MUX) "&
  " ), "&
  "WSP_MUX ( "&   -- The outer selectable segments: WIR and WDR
    "(SelectMUX "&
      -- Reset to WBY
      "(WIR IS WIR_Seg), "&
      "(WDR IS WDR_MUX) "&
      "SelectField (SELWIR) "&
      "SelectValues ((WIR : 0b1) (WDR : 0b0)) "&
    " ) "&
  " ), "&
  "WIR_Seg (  (WIR_field [4] DelayPO "&
              "ResetVal(WIR_decode(WS_BYPASS)) TAPReset )    ), "&
  "WDR_MUX ( "&  -- The inner selectable segments: WBY, WBR, and Wusr
    "(SelectMUX "&
      "(WBY  IS Reg_WBY CAPTURES(0) ), "&
      "(WBR  IS Reg_WBR), "&
      "(WUSR IS Reg_WUSER) "&
      "SelectField (WIR) "&
      "SelectValues ("&     
        "(WBY  : WS_BYPASS, WP_ALL) "&
        "(WBR  : WS_EXTEST, WS_INTEST) "&
        "(WUSR : WS_BIST) "&
        " ) "&
    " ) "&
  " ), "&
  "REG_WBY   ( (WBY[1] NOPO)), " &
  "REG_WBR   ( (WBR[8] )), " &
  "REG_WUSER ( (  CSR[4] CAPTURES(STATGROUP(-)) " & 
                     "DEFAULT(MODEGROUP(MODE0)) NOUPD )," & 
  "            (  GO [1] ResetVal(BISTGROUP(Disable)) TapReset )   )" ;
  
end REG_1500;