diff --git a/sys/arch/mac68k/mac68k/macromasm.s b/sys/arch/mac68k/mac68k/macromasm.s index 4627a3b1fbff..b9f568fb0644 100644 --- a/sys/arch/mac68k/mac68k/macromasm.s +++ b/sys/arch/mac68k/mac68k/macromasm.s @@ -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 /*