diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1997-10-29 16:45:26 -0500 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1997-11-26 01:36:39 +0000 |
commit | 0e4ced382cb959db083cda30b8dbdae68933842a (patch) | |
tree | cebaae20a96c0a02dffc215bcb995ff7f8fe7ae0 /XSUB.h | |
parent | e41fc98bd7f2023e39e515f98825ef0e1db2c6e4 (diff) | |
download | perl-0e4ced382cb959db083cda30b8dbdae68933842a.tar.gz |
[win32] Another trivial patch:
Message-Id: <199710300245.VAA04244@aatma.engin.umich.edu>
Subject: [PATCH] Re: Why doesn't XSRETURN have STMT_START/STMT_END brackets?
p4raw-id: //depot/win32/perl@310
Diffstat (limited to 'XSUB.h')
-rw-r--r-- | XSUB.h | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -15,7 +15,11 @@ #define dXSI32 I32 ix = XSANY.any_i32 -#define XSRETURN(off) stack_sp = stack_base + ax + ((off) - 1); return +#define XSRETURN(off) \ + STMT_START { \ + stack_sp = stack_base + ax + ((off) - 1); \ + return; \ + } STMT_END /* Simple macros to put new mortal values onto the stack. */ /* Typically used to return values from XS functions. */ |