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 | |
| 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
| -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. */ |