* --------------------------------------------------------; * Tamarin test microcode * for * CMOS Chip I * FILE: {PHYLUM}EMULATOR>TESTUCODE.tedit * --------------------------------------------------------; * -------------------------------------------------------- * Copyright (c) 1987 Xerox Corporation * All rights reserved. * -------------------------------------------------------- * Test UCode to test the Processor; Label_Reset Aside OpLength_0 MemOp_Map EUop_D1 Tag_Int RD1addr_MuxBus_K_0 RD2addr_Unbound W2addr_Temp1 Raddr_K RCxt Waddr_K WCxt WriteOctal MemOffset_MuxBus MemLatchSrc_MapAddr PhysAddrSrc_PhysAddr LatchFetchPc PcSrc_D1 NewArg_MuxBus NewArg2_MuxBus NewTos_MuxBus NewBotCxt AltCxt_K NewTopCxt; MemOp_Map EUop_D2 Tag_Int NewTos_MuxBus_K_2 NewArg_MuxBus Raddr_K RCxt Waddr_K WCxt AltCxt_K RD1addr_Nil RD2addr_MuxBus W2addr_Temp1 MemOffset_K2_1 MemLatchSrc_PhysAddr PhysAddrSrc_PhysAddr; Label_Loop MemOp_Map EUop_+ Tag_Int RD2addr_Temp1 W2addr_Temp1 WriteData Raddr_K Waddr_K_2 MuxBus_Arg NewArg_Arg+1 MemOffset_K2_1 MemLatchSrc_PhysAddr PhysAddrSrc_PhysAddr MuxCCode_Arg#0 EuCCode_NoOverflow JumpT_Loop JumpF_Reset; Label_Go Aside OpLength_1 NewTos_Tos+1 Raddr_Tos Waddr_NewTos; NewTos_Tos+MuxBus MuxBus_K_5 Raddr_Tos Waddr_NewTos; NewTos_Tos+1 MuxBus_Opcode Raddr_Tos Waddr_NewTos; NewTos_Tos-MuxBus MuxBus_K_2 Raddr_Tos Waddr_NewTos; NewTos_Tos+MuxBus+1 MuxBus_K_3 Raddr_Tos Waddr_NewTos; NewTos_MuxBus_K_8 Raddr_Tos Waddr_NewTos; NewTos_~MuxBus MuxBus_K_254 Raddr_Tos Waddr_NewTos; NewTos_-MuxBus MuxBus_K_250 Raddr_Tos Waddr_NewTos; NewTos_Zero MuxBus_Opcode OpMask_b1111 Raddr_Tos Waddr_NewTos; NewTos_One MuxBus_Opcode OpMask_b0111 Raddr_Tos Waddr_NewTos; NewTos_Tos+1 NewArg_Zero NewArg2_One Raddr_Tos Waddr_NewTos; NewTos_Tos+1 MuxBus_Arg NewArg_~MuxBus NewArg2_Arg2+1 Raddr_Tos Waddr_NewTos; NewArg_MuxBus_K_15 Raddr_Tos Waddr_NewArg; NewTos_Tos+MuxBus MuxBus_K_5 NewArg_MuxBus+1 NewArg2_Arg2+MuxBus+1 Raddr_Tos Waddr_NewArg; NewTos_Tos-MuxBus MuxBus_K_2 Raddr_Arg2 Waddr_NewArg; NewTos_Tos+MuxBus+1 MuxBus_K_3 Waddr_NewTos; NewTos_MuxBus_K_8 Waddr_NewTos; NewTos_~MuxBus MuxBus_K_250 Waddr_NewTos; NewTos_-MuxBus MuxBus_K_254 Raddr_IBufN Waddr_NewTos; NewTos_Zero Raddr_Opcode Waddr_NewTos; NewTos_One Raddr_Opcode Waddr_NewTos; Label_Noop Aside OpLength_0 JumpT_Noop; Label_Interrupt1 OpLength_0 JumpT_Done; Label_Interrupt2 OpLength_0 JumpT_Done; Label_AdjustFrames OpLength_0 JumpT_Done; Label_RefCount OpLength_0 JumpT_Done; End; PreConditions OpNbr_0 Reset RefCount AdjustFrames Interrupt1 Interrupt2; UniStart OpNbr_200Q; OpName_-X- Start_Go; End; GACHA Ç Çzº