Support ARM SOFTFP ABI for saxpy, sdot, snrm2, sscal, sgemv, sger.

2017-03-20 17:39:25 +08:00
parent 90e02ccf68
commit b5c96fcfcd
5 changed files with 69 additions and 4 deletions
@@ -38,12 +38,25 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

 #define STACKSIZE 256

+#ifndef ARM_SOFTFP_ABI
+//hard abi	
 #define	OLD_LDA		[fp, #0 ]
 #define	X		[fp, #4 ]
 #define	OLD_INC_X	[fp, #8 ]
 #define	Y		[fp, #12 ]
 #define	OLD_INC_Y	[fp, #16 ]
 #define OLD_A		r3
+#else
+#define OLD_A_SOFTFP	[fp, #0 ]
+#define	OLD_LDA		[fp, #4 ]
+#define	X		[fp, #8 ]
+#define	OLD_INC_X	[fp, #12 ]
+#define	Y		[fp, #16 ]
+#define	OLD_INC_Y	[fp, #20 ]
+#define OLD_ALPHA	r3
+#define OLD_A		r3
+#endif
+
 #define	OLD_N		r1

 #define M	r0
@@ -505,6 +518,13 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 	cmp	OLD_N, #0
 	ble	gemvt_kernel_L999

+#ifndef DOUBLE
+#ifdef ARM_SOFTFP_ABI
+	vmov	s0,	OLD_ALPHA
+	ldr	OLD_A,	OLD_A_SOFTFP
+#endif
+#endif
+
 	str	OLD_A, A
 	str	OLD_N, N