richter 2002/06/18 21:22:45
Modified: . Tag: Embperl2c ep.h epdat.h epdat2.h epdom.c
epinit.c epmain.c
Log:
MDEBUG
Revision Changes Path
No revision
No revision
1.27.4.47 +1 -1 embperl/ep.h
Index: ep.h
===================================================================
RCS file: /home/cvs/embperl/ep.h,v
retrieving revision 1.27.4.46
retrieving revision 1.27.4.47
diff -u -r1.27.4.46 -r1.27.4.47
--- ep.h 23 May 2002 07:54:48 -0000 1.27.4.46
+++ ep.h 19 Jun 2002 04:22:43 -0000 1.27.4.47
@@ -168,7 +168,7 @@
#include "epnames.h"
-#if defined (_DEBUG) && defined (WIN32)
+#if defined (_MDEBUG) && defined (WIN32)
#define _CRTDBG_MAP_ALLOC
#undef malloc
#undef calloc
1.20.4.40 +2 -2 embperl/epdat.h
Index: epdat.h
===================================================================
RCS file: /home/cvs/embperl/epdat.h,v
retrieving revision 1.20.4.39
retrieving revision 1.20.4.40
diff -u -r1.20.4.39 -r1.20.4.40
--- epdat.h 17 Dec 2001 15:37:41 -0000 1.20.4.39
+++ epdat.h 19 Jun 2002 04:22:43 -0000 1.20.4.40
@@ -589,7 +589,7 @@
SV * pCodeSV ; /* contains currently compiled line */
#endif
-#if defined (_DEBUG) && defined (WIN32)
+#if defined (_MDEBUG) && defined (WIN32)
_CrtMemState MemCheckpoint ; /* memory leak debugging */
#endif
1.1.2.35 +2 -2 embperl/Attic/epdat2.h
Index: epdat2.h
===================================================================
RCS file: /home/cvs/embperl/Attic/epdat2.h,v
retrieving revision 1.1.2.34
retrieving revision 1.1.2.35
diff -u -r1.1.2.34 -r1.1.2.35
--- epdat2.h 1 Jun 2002 23:44:25 -0000 1.1.2.34
+++ epdat2.h 19 Jun 2002 04:22:43 -0000 1.1.2.35
@@ -407,7 +407,7 @@
clock_t startclock ;
I32 stsv_count ;
-#if defined (_DEBUG) && defined (WIN32)
+#if defined (_MDEBUG) && defined (WIN32)
_CrtMemState MemCheckpoint ; /* memory leak debugging */
#endif
1.4.2.95 +2 -2 embperl/Attic/epdom.c
Index: epdom.c
===================================================================
RCS file: /home/cvs/embperl/Attic/epdom.c,v
retrieving revision 1.4.2.94
retrieving revision 1.4.2.95
diff -u -r1.4.2.94 -r1.4.2.95
--- epdom.c 19 Jun 2002 04:19:14 -0000 1.4.2.94
+++ epdom.c 19 Jun 2002 04:22:43 -0000 1.4.2.95
@@ -1218,7 +1218,7 @@
pDomTree -> xNdx = 0 ;
pFreeDomTrees[xNdx] = xDomTree ;
-#if defined (_DEBUG) && defined (WIN32)
+#if defined (_MDEBUG) && defined (WIN32)
_ASSERTE( _CrtCheckMemory( ) );
#endif
1.1.2.57 +4 -4 embperl/Attic/epinit.c
Index: epinit.c
===================================================================
RCS file: /home/cvs/embperl/Attic/epinit.c,v
retrieving revision 1.1.2.56
retrieving revision 1.1.2.57
diff -u -r1.1.2.56 -r1.1.2.57
--- epinit.c 1 Jun 2002 23:44:25 -0000 1.1.2.56
+++ epinit.c 19 Jun 2002 04:22:43 -0000 1.1.2.57
@@ -756,7 +756,7 @@
if (bInitDone)
return ok ; /* the rest needs to be done only once per process */
-#if defined (_DEBUG) && defined (WIN32)
+#if defined (_MDEBUG) && defined (WIN32)
_CrtSetReportHook( EmbperlCRTDebugOutput );
#endif
@@ -1208,7 +1208,7 @@
r -> pPerlTHX = aTHX ;
#endif
-#if defined (_DEBUG) && defined (WIN32)
+#if defined (_MDEBUG) && defined (WIN32)
_CrtMemCheckpoint(&r -> MemCheckpoint);
#endif
#ifdef DMALLOC
@@ -1624,7 +1624,7 @@
ep_destroy_pool (r -> pPool) ;
sv_setpv(ERRSV,"");
-#if defined (_DEBUG) && defined (WIN32)
+#if defined (_MDEBUG) && defined (WIN32)
_CrtMemDumpAllObjectsSince(&r -> MemCheckpoint);
#endif
#ifdef DMALLOC
1.75.4.124 +4 -5 embperl/epmain.c
Index: epmain.c
===================================================================
RCS file: /home/cvs/embperl/epmain.c,v
retrieving revision 1.75.4.123
retrieving revision 1.75.4.124
diff -u -r1.75.4.123 -r1.75.4.124
--- epmain.c 18 Jun 2002 06:27:34 -0000 1.75.4.123
+++ epmain.c 19 Jun 2002 04:22:43 -0000 1.75.4.124
@@ -348,12 +348,11 @@
}
-
-#if defined (_DEBUG) && defined (WIN32)
+#if defined (_MDEBUG) && defined (WIN32)
static int EmbperlCRTDebugOutput( int reportType, char *userMessage, int *retVal )
{
- lprintf (pCurrReq, "[%d]CRTDBG: %s\n", pCurrReq -> nPid, userMessage) ;
+ lprintf (CurrReq, "[%d]CRTDBG: %s\n", pCurrReq -> nPid, userMessage) ;
return TRUE ;
}
@@ -1339,7 +1338,7 @@
if ((rc = ResetRequest (r, sInputfile)) != ok)
LogError (r, rc) ;
-#if defined (_DEBUG) && defined (WIN32)
+#if defined (_MDEBUG) && defined (WIN32)
_ASSERTE( _CrtCheckMemory( ) );
#endif
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
