Home | History | Annotate | Line # | Download | only in xscale 
      1  1.1  christos # XSCALE testcase for MIAPH
      2  1.1  christos # mach: xscale
      3  1.1  christos # as: -mcpu=xscale
      4  1.1  christos 
      5  1.1  christos 	.include "testutils.inc"
      6  1.1  christos 
      7  1.1  christos 	start
      8  1.1  christos 
      9  1.1  christos 	.global miaph
     10  1.1  christos miaph:
     11  1.1  christos 	# Enable access to CoProcessors 0 & 1 before
     12  1.1  christos         # we attempt these instructions.
     13  1.1  christos 
     14  1.1  christos 	mvi_h_gr   r1, 3
     15  1.1  christos 	mcr        p15, 0, r1, cr15, cr1, 0
     16  1.1  christos 
     17  1.1  christos 	# Test Multilply Accumulate
     18  1.1  christos 	
     19  1.1  christos 	mvi_h_gr   r0, 0x11223344
     20  1.1  christos 	mvi_h_gr   r1, 0x55667788
     21  1.1  christos 	mvi_h_gr   r2, 0x12345678
     22  1.1  christos 	mvi_h_gr   r3, 0x9abcdef0
     23  1.1  christos 
     24  1.1  christos 	mar	   acc0, r0, r1
     25  1.1  christos 
     26  1.1  christos 	miaph	   acc0, r2, r3
     27  1.1  christos 	
     28  1.1  christos 	mra	   r0, r1, acc0
     29  1.1  christos 	
     30  1.1  christos 	test_h_gr  r0, 0xfec3f9f4
     31  1.1  christos 	test_h_gr  r1, 0x55667787
     32  1.1  christos 	test_h_gr  r2, 0x12345678
     33  1.1  christos 	test_h_gr  r3, 0x9abcdef0
     34  1.1  christos 
     35  1.1  christos 	pass
     36