Skip to content

Commit 34afbd1

Browse files
committed
revert SETUPEXCHANGE changes
1 parent abaee7c commit 34afbd1

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

win32/perlhost.h

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -2143,11 +2143,11 @@ CPerlHost::CPerlHost(void)
21432143
#define SETUPEXCHANGE(xptr, iptr, table) \
21442144
STMT_START { \
21452145
if (xptr) { \
2146-
*(void**)&iptr = (void*)xptr; \
2147-
*(void**)&xptr = (void*)&table; \
2146+
iptr = *xptr; \
2147+
*xptr = &table; \
21482148
} \
21492149
else { \
2150-
*(void**)&iptr = (void*)&table; \
2150+
iptr = &table; \
21512151
} \
21522152
} STMT_END
21532153

0 commit comments

Comments
 (0)