Source-Changes-HG archive

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Old Index]

[src/trunk]: src/sys/arch/mac68k/mac68k Make this work with an ISO C preproce...



details:   https://anonhg.NetBSD.org/src/rev/dbb93d377934
branches:  trunk
changeset: 532049:dbb93d377934
user:      thorpej <thorpej%NetBSD.org@localhost>
date:      Thu May 30 22:04:55 2002 +0000

description:
Make this work with an ISO C preprocessor.

diffstat:

 sys/arch/mac68k/mac68k/macromasm.s |  12 ++++++++++--
 1 files changed, 10 insertions(+), 2 deletions(-)

diffs (29 lines):

diff -r 619f26f437b7 -r dbb93d377934 sys/arch/mac68k/mac68k/macromasm.s
--- a/sys/arch/mac68k/mac68k/macromasm.s        Thu May 30 22:02:13 2002 +0000
+++ b/sys/arch/mac68k/mac68k/macromasm.s        Thu May 30 22:04:55 2002 +0000
@@ -1,4 +1,4 @@
-/*     $NetBSD: macromasm.s,v 1.19 2001/11/20 03:19:43 chs Exp $       */
+/*     $NetBSD: macromasm.s,v 1.20 2002/05/30 22:04:55 thorpej Exp $   */
 
 /*-
  * Copyright (C) 1994  Bradley A. Grantham
@@ -49,10 +49,18 @@
        /* Return from a pascal function; pop (pbytes) number of bytes */
        /*  passed as parameters.  Should have picked up "pascal" extension */
        /*  to GCC... */
+#ifdef __STDC__
+#define        IMMEDIATE       #
+#define pascalret(pbytes)      \
+       movl    %sp@+,%a1               /* get PC (I hate Pascal) */ ; \
+       addl    IMMEDIATE pbytes,%sp    /* pop params (I hate Pascal) */ ; \
+       jra     %a1@                    /* return (I hate Pascal) */
+#else
 #define pascalret(pbytes)      \
        movl    %sp@+,%a1               /* get PC (I hate Pascal) */ ; \
        addl    #pbytes,%sp             /* pop params (I hate Pascal) */ ; \
-       jra     %a1@                    /* return (I hate Pascal) */ ; \
+       jra     %a1@                    /* return (I hate Pascal) */
+#endif
 
 
 /*



Home | Main Index | Thread Index | Old Index