pythoncapi
diff --git a/‎Misc/NEWS‎
Lines changed: 3 additions & 0 deletions b/‎Misc/NEWS‎
Lines changed: 3 additions & 0 deletions
diff --git a/‎Modules/_lsprof.c‎
Lines changed: 6 additions & 1 deletion b/‎Modules/_lsprof.c‎
Lines changed: 6 additions & 1 deletion
@@ -268,6 +268,9 @@ C-API
 Library
 -------
 
+- Issue #7494: fix a crash in _lsprof (cProfile) after clearing the profiler,
+  reset also the pointer to the current pointer context.
+
 - Issue #7232: Add support for the context manager protocol to the TarFile
   class.
 
 
@@ -303,12 +303,17 @@ static void clearEntries(ProfilerObject *pObj)
 {
 	RotatingTree_Enum(pObj->profilerEntries, freeEntry, NULL);
 	pObj->profilerEntries = EMPTY_ROTATING_TREE;
-	/* release the memory hold by the free list of ProfilerContexts */
+	/* release the memory hold by the ProfilerContexts */
+	if (pObj->currentProfilerContext) {
+		free(pObj->currentProfilerContext);
+		pObj->currentProfilerContext = NULL;
+	}
 	while (pObj->freelistProfilerContext) {
 		ProfilerContext *c = pObj->freelistProfilerContext;
 		pObj->freelistProfilerContext = c->previous;
 		free(c);
 	}
+	pObj->freelistProfilerContext = NULL;
 }
 
 static void
Original file line number	Diff line number	Diff line change
`@@ -303,12 +303,17 @@ static void clearEntries(ProfilerObject *pObj)`
`303`	`303`	`{`
`304`	`304`	`RotatingTree_Enum(pObj->profilerEntries, freeEntry, NULL);`
`305`	`305`	`pObj->profilerEntries = EMPTY_ROTATING_TREE;`
`306`		`- /* release the memory hold by the free list of ProfilerContexts */`
	`306`	`+ /* release the memory hold by the ProfilerContexts */`
	`307`	`+ if (pObj->currentProfilerContext) {`
	`308`	`+ free(pObj->currentProfilerContext);`
	`309`	`+ pObj->currentProfilerContext = NULL;`
	`310`	`+ }`
`307`	`311`	`while (pObj->freelistProfilerContext) {`
`308`	`312`	`ProfilerContext *c = pObj->freelistProfilerContext;`
`309`	`313`	`pObj->freelistProfilerContext = c->previous;`
`310`	`314`	`free(c);`
`311`	`315`	`}`
	`316`	`+ pObj->freelistProfilerContext = NULL;`
`312`	`317`	`}`
`313`	`318`
`314`	`319`	`static void`