# New Ticket Created by Jerry Gay
# Please include the string: [perl #45413]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=45413 >
in r21233, on win32 with msvc, tcl fails to build:
..\..\parrot.exe --output=runtime\tcllib.pbc runtime\tcllib.pir
NMAKE : fatal error U1077: '..\..\parrot.exe' : return code '0xc0000005'
the error occurs at src/dynext.c, line 238 (shown here with context,
marked with /***/):
/*
* and on windows strip a leading "lib"
* [shouldn't this happen in Parrot_locate_runtime_file instead?]
*/
#ifdef WIN32
if (memcmp(lib->strstart, "lib", 3) == 0) { /***/
*handle = Parrot_dlopen((char*)lib->strstart + 3);
if (*handle) {
path = string_substr(interp, lib, 3, lib->strlen - 3, NULL, 0);
return path;
}
}
#endif
lib->strstart is not valid. the comment above the code paragraph
suggests this particular platform-specific bit may belong somewhere
else, anyway. since it's not working where it is, it's definitely time
for a refactor.
~jerry
