X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fruntime%2Fx86-assem.S;h=e3032e28f1f53cf4149b4f4856b1ffd57f8ad87d;hb=4fcb3af93227cd8c35aba48f6e18834753c9e0f6;hp=0deae4f381350445a3c2d966d6c2bdd0b14ce69e;hpb=5de74c72e5a9522c7fdd3dbb31a39641e9de8877;p=sbcl.git diff --git a/src/runtime/x86-assem.S b/src/runtime/x86-assem.S index 0deae4f..e3032e2 100644 --- a/src/runtime/x86-assem.S +++ b/src/runtime/x86-assem.S @@ -37,18 +37,6 @@ #define GNAME(var) _##var #endif -#if defined __linux__ || defined __FreeBSD__ || defined __NetBSD__ || defined __OpenBSD__ || defined __sun -#define GNAMEDOLLAR(var) $##var -#else -#define GNAMEDOLLAR(var) $_##var -#endif - -#if defined __linux__ || defined __FreeBSD__ || defined __NetBSD__ || defined __OpenBSD__ || defined __sun -#define DOLLARLITERAL(var) $##var -#else -#define DOLLARLITERAL(var) $##(var) -#endif - /* Get the right type of alignment. Linux, FreeBSD and NetBSD (but not OpenBSD) * want alignment in bytes. * @@ -209,7 +197,7 @@ GNAME(call_into_lisp_first_time): movl THREAD_CONTROL_STACK_START_OFFSET(%eax) ,%esp /* don't think too hard about what happens if we get interrupted * here */ - addl DOLLARLITERAL(THREAD_CONTROL_STACK_SIZE),%esp + addl $(THREAD_CONTROL_STACK_SIZE),%esp #else /* Win32 -really- doesn't like you switching stacks out from under it. */ movl GNAME(all_threads),%eax @@ -388,8 +376,8 @@ GNAME(fun_end_breakpoint_guts): movl %esp,%ebx # Setup ebx - the ofp. subl $4,%esp # Allocate one stack slot for the return value movl $4,%ecx # Setup ecx for one return value. - movl DOLLARLITERAL(NIL),%edi # default second value - movl DOLLARLITERAL(NIL),%esi # default third value + movl $(NIL),%edi # default second value + movl $(NIL),%esi # default third value multiple_value_return: @@ -937,10 +925,10 @@ GNAME(fast_bzero_detect): * for all non-SSE2 processors. */ Lbase: - movl GNAMEDOLLAR(fast_bzero_base), GNAME(fast_bzero_pointer) + movl $(GNAME(fast_bzero_base)), GNAME(fast_bzero_pointer) jmp Lrestore Lsse2: - movl GNAMEDOLLAR(fast_bzero_sse), GNAME(fast_bzero_pointer) + movl $(GNAME(fast_bzero_sse)), GNAME(fast_bzero_pointer) jmp Lrestore Lrestore: