| ;; This file is a set of tests for the MorphoySys instructions. |
| |
| ; Make sure that each mnemonic gives the proper opcode. Use R0 and #0 |
| ; for all operands so that everything but the opcode will be 0 in the |
| ; assembled instructions. |
| |
| ldctxt R0,R0,#0,#0,#0 |
| ldfb R0,R0,#0 |
| stfb R0, R0, #0 |
| fbcb R0,#0,#0,#0,#0,#0,#0,#0,#0 |
| mfbcb R0,#0,R0,#0,#0,#0,#0,#0 |
| fbcci R0,#0,#0,#0,#0,#0,#0,#0 |
| fbrci R0,#0,#0,#0,#0,#0,#0,#0 |
| fbcri R0,#0,#0,#0,#0,#0,#0,#0 |
| fbrri R0,#0,#0,#0,#0,#0,#0,#0 |
| mfbcci R0,#0,R0,#0,#0,#0,#0 |
| mfbrci R0,#0,R0,#0,#0,#0,#0 |
| mfbcri R0,#0,R0,#0,#0,#0,#0 |
| mfbrri R0,#0,R0,#0,#0,#0,#0 |
| fbcbdr R0,#0,R0,#0,#0,#0,#0,#0,#0,#0 |
| rcfbcb #0,#0,#0,#0,#0,#0,#0,#0,#0,#0 |
| mrcfbcb R0,#0,#0,#0,#0,#0,#0,#0,#0 |
| cbcast #0,#0,#0 |
| dupcbcast #0,#0,#0,#0 |
| wfbi #0,#0,#0,#0,#0 |
| wfb R0,R0,#0,#0,#0 |
| rcrisc R0,#0,R0,#0,#0,#0,#0,#0,#0 |
| fbcbinc R0, #0, #0, #0, #0, #0, #0, #0 |
| rcxmode R0, #0, #0, #0, #0, #0, #0, #0, #0 |
| |
| ; Check to make sure that the parse routines that allow predifined |
| ; symbols (uppaer and lower case) to be used for some of the operands. |
| |
| ; dup operand: dup, xx |
| si R14 |
| fbcbdr R0,#0,R0,#0,#0,#0,#0,#0,#dup,#0 ; dup = 1 |
| fbcbdr R0,#0,R0,#0,#0,#0,#0,#0,#xx,#0 ; xx = 0 |
| fbcbdr R0,#0,R0,#0,#0,#0,#0,#0,#DUP,#0 |
| fbcbdr R0,#0,R0,#0,#0,#0,#0,#0,#XX,#0 |
| |
| ; ball operand: all, one |
| si R14 |
| rcfbcb #0,#0,#all,#0,#0,#0,#0,#0,#0,#0 ; all = 1 |
| rcfbcb #0,#0,#one,#0,#0,#0,#0,#0,#0,#0 ; one = 0 |
| rcfbcb #0,#0,#ALL,#0,#0,#0,#0,#0,#0,#0 |
| rcfbcb #0,#0,#ONE,#0,#0,#0,#0,#0,#0,#0 |
| |
| ; type operand: odd, even, oe |
| si R14 |
| mrcfbcb R0,#0,#oe,#0,#0,#0,#0,#0,#0 ; oe = 2 |
| mrcfbcb R0,#0,#even,#0,#0,#0,#0,#0,#0 ; even = 1 |
| mrcfbcb R0,#0,#odd,#0,#0,#0,#0,#0,#0 ; odd = 0 |
| mrcfbcb R0,#0,#OE,#0,#0,#0,#0,#0,#0 |
| mrcfbcb R0,#0,#EVEN,#0,#0,#0,#0,#0,#0 |
| mrcfbcb R0,#0,#ODD,#0,#0,#0,#0,#0,#0 |
| |
| ; xmode operand: pm, xm |
| si R14 |
| rcxmode R0, #0, #0, #pm, #0, #0, #0, #0, #0 ; pm = 1 |
| rcxmode R0, #0, #0, #xm, #0, #0, #0, #0, #0 ; xm = 0 |
| rcxmode R0, #0, #0, #PM, #0, #0, #0, #0, #0 |
| rcxmode R0, #0, #0, #XM, #0, #0, #0, #0, #0 |
| |
| ; rc, rc1, rc2 operands: r,c |
| si R14 |
| ldctxt R0,R0,#r,#0,#0 ; rc operand. r = 1 |
| ldctxt R0,R0,#c,#0,#0 ; rc operand. c = 0 |
| ldctxt R0,R0,#R,#0,#0 |
| ldctxt R0,R0,#C,#0,#0 |
| |
| fbcb R0,#0,#0,#0,#r,#0,#0,#0,#0 ; rc1 operand. r = 1 |
| fbcb R0,#0,#0,#0,#c,#0,#0,#0,#0 ; rc1 operand. c = 0 |
| |
| cbcast #0,#r,#0 ; rc2 operand. r = 1 |
| cbcast #0,#c,#0 ; rc2 opearnd. c = 0 |
| |
| ; cbrb operand: cb, rb |
| si R14 |
| fbcb R0,#0,#0,#0,#0,#rb,#0,#0,#0 ; rb = 1 |
| fbcb R0,#0,#0,#0,#0,#cb,#0,#0,#0 ; cb = 0 |
| fbcb R0,#0,#0,#0,#0,#RB,#0,#0,#0 |
| fbcb R0,#0,#0,#0,#0,#CB,#0,#0,#0 |
| |
| ; rbbc operand: rt, br1, br2, cs |
| si R14 |
| fbcb R0,#cs,#0,#0,#0,#0,#0,#0,#0 ; cs = 3 |
| fbcb R0,#br2,#0,#0,#0,#0,#0,#0,#0 ; br2 = 2 |
| fbcb R0,#br1,#0,#0,#0,#0,#0,#0,#0 ; br1 = 1 |
| fbcb R0,#rt,#0,#0,#0,#cb,#0,#0,#0 ; rt = 0 |
| fbcb R0,#CS,#0,#0,#0,#0,#0,#0,#0 |
| fbcb R0,#BR2,#0,#0,#0,#0,#0,#0,#0 |
| fbcb R0,#BR1,#0,#0,#0,#0,#0,#0,#0 |
| fbcb R0,#RT,#0,#0,#0,#cb,#0,#0,#0 |
| |
| intlvr R0, #0, R0, #0, #0 |