p4raw-id: //depot/perl@16098
str = (char*)SSPOPPTR;
ptr = SSPOPPTR;
if (*(char**)ptr != str) {
- #ifdef NETWARE
+#ifdef NETWARE
PerlMem_free(*(char**)ptr);
- #else
+#else
PerlMemShared_free(*(char**)ptr);
- #endif
+#endif
*(char**)ptr = str;
}
break;