diff options
author | ths <ths@c046a42c-6fe2-441c-8c8c-71466251a162> | 2007-10-29 14:39:49 +0000 |
---|---|---|
committer | ths <ths@c046a42c-6fe2-441c-8c8c-71466251a162> | 2007-10-29 14:39:49 +0000 |
commit | 273af66025e8cc6982febfb4a74a8d9106a92440 (patch) | |
tree | 9e82d63fb3e399c63db425ab6908ce71001bade9 /target-alpha | |
parent | b50a6563d8590675905b730d32f17fa119664e0e (diff) | |
download | hqemu-273af66025e8cc6982febfb4a74a8d9106a92440.zip hqemu-273af66025e8cc6982febfb4a74a8d9106a92440.tar.gz |
Adjust s390 addresses (the MSB is defined as "to be ignored").
git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@3486 c046a42c-6fe2-441c-8c8c-71466251a162
Diffstat (limited to 'target-alpha')
-rw-r--r-- | target-alpha/op_helper.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/target-alpha/op_helper.c b/target-alpha/op_helper.c index ae8470b..fa1e6ac 100644 --- a/target-alpha/op_helper.c +++ b/target-alpha/op_helper.c @@ -1076,7 +1076,11 @@ void helper_mtpr (int iprn) /* Softmmu support */ #if !defined (CONFIG_USER_ONLY) -#define GETPC() (__builtin_return_address(0)) +#ifdef __s390__ +# define GETPC() ((void*)((unsigned long)__builtin_return_address(0) & 0x7fffffffUL)) +#else +# define GETPC() (__builtin_return_address(0)) +#endif /* XXX: the two following helpers are pure hacks. * Hopefully, we emulate the PALcode, then we should never see |