fix amd64 asm syntax for windows

JuliaMath · Mar 3, 2013 · 3c8738e · 3c8738e
1 parent 1b9b759
commit 3c8738e
Show file tree

Hide file tree

Showing 3 changed files with 18 additions and 11 deletions.
diff --git a/amd64/bsd_asm.h b/amd64/bsd_asm.h
@@ -62,8 +62,17 @@
 
 #define _START_ENTRY	.text; .p2align 4,0x90
 
+#if defined(__linux__) || defined(__FreeBSD__) || defined(__ELF__)
 #define _ENTRY(x)	_START_ENTRY; \
 			.globl CNAME(x); .type CNAME(x),@function; CNAME(x):
+#define	END(x)		.size x, . - x
+
+#elif defined(__WIN32__)
+#define _ENTRY(x)	_START_ENTRY; \
+			.globl CNAME(x); .def CNAME(x); .scl 2; .type 32; .endef; CNAME(x):
+#define END(x) .end
+
+#endif
 
 #ifdef PROF
 #define	ALTENTRY(x)	_ENTRY(x); \
@@ -81,7 +90,6 @@
 #define	ENTRY(x)	_ENTRY(x)
 #endif
 
-#define	END(x)		.size x, . - x
 
 #define RCSID(x)	.text; .asciz x
 

diff --git a/amd64/fenv.c b/amd64/fenv.c
@@ -97,7 +97,7 @@ fegetenv(fenv_t *envp)
 int
 feholdexcept(fenv_t *envp)
 {
-	__uint32_t mxcsr;
+	uint32_t mxcsr;
 
 	__stmxcsr(&mxcsr);
 	__fnstenv(&envp->__x87);
@@ -114,8 +114,8 @@ extern inline int fesetenv(const fenv_t *__envp);
 int
 feupdateenv(const fenv_t *envp)
 {
-	__uint32_t mxcsr;
-	__uint16_t status;
+	uint32_t mxcsr;
+	uint16_t status;
 
 	__fnstsw(&status);
 	__stmxcsr(&mxcsr);
@@ -127,8 +127,8 @@ feupdateenv(const fenv_t *envp)
 int
 __feenableexcept(int mask)
 {
-	__uint32_t mxcsr, omask;
-	__uint16_t control;
+	uint32_t mxcsr, omask;
+	uint16_t control;
 
 	mask &= FE_ALL_EXCEPT;
 	__fnstcw(&control);
@@ -144,8 +144,8 @@ __feenableexcept(int mask)
 int
 __fedisableexcept(int mask)
 {
-	__uint32_t mxcsr, omask;
-	__uint16_t control;
+	uint32_t mxcsr, omask;
+	uint16_t control;
 
 	mask &= FE_ALL_EXCEPT;
 	__fnstcw(&control);

diff --git a/i387/bsd_asm.h b/i387/bsd_asm.h
@@ -81,9 +81,8 @@
 #elif defined(__WIN32__)
 #define CNAME(csym)		_##csym
 #define HIDENAME(asmsym)	.asmsym
-#define _ENTRY(x) \
-	_START_ENTRY; .globl CNAME(x) ; .def CNAME(X);\
-	.scl	2;.type	32;.endef; CNAME(x):
+#define _ENTRY(x)   _START_ENTRY; \
+            .globl CNAME(x); .def CNAME(x); .scl 2; .type 32; .endef; CNAME(x):
 #define END(x) .end
 #endif