Change 16098 by jhi@alpha on 2002/04/23 02:18:10
# cpp commands must start in the first column.
Affected files ...
.... //depot/perl/scope.c#93 edit
Differences ...
==== //depot/perl/scope.c#93 (text) ====
Index: perl/scope.c
--- perl/scope.c.~1~ Mon Apr 22 20:30:06 2002
+++ perl/scope.c Mon Apr 22 20:30:06 2002
@@ -673,11 +673,11 @@
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;
End of Patch.