Added context fingerprint implementation. But not using it for the mo…

…ment because a recursion problem with method proxies
jordanmontt · Feb 2, 2024 · 2c9f8d8 · 2c9f8d8
1 parent 9b18da0
commit 2c9f8d8
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 8 deletions.
diff --git a/src/IllimaniProfiler/AllocationSiteInfoModel.class.st b/src/IllimaniProfiler/AllocationSiteInfoModel.class.st
@@ -57,7 +57,7 @@ AllocationSiteInfoModel >> contextFingerprint [
 { #category : 'accessing' }
 AllocationSiteInfoModel >> contextFingerprint: aContext [
 
-	contextFingerprint := self getContextFingerprint: aContext
+	contextFingerprint := String streamContents: [ :stream | aContext debugStack: 5 on: stream ]
 ]
 
 { #category : 'accessing' }
@@ -66,12 +66,6 @@ AllocationSiteInfoModel >> fullMethodName [
 	^ allocatorMethod name
 ]
 
-{ #category : 'initialization' }
-AllocationSiteInfoModel >> getContextFingerprint: aContext [
-
-	^ "String streamContents: [ :stream | aContext debugStack: 2 on: stream ]" aContext asString
-]
-
 { #category : 'inspector - extensions' }
 AllocationSiteInfoModel >> inspectableAssociations [
 

diff --git a/src/IllimaniProfiler/IllAllocationProfiler.class.st b/src/IllimaniProfiler/IllAllocationProfiler.class.st
@@ -146,7 +146,7 @@ IllAllocationProfiler >> internalRegisterAllocation: newlyAllocatedObject [
 		allocatorClass: filteredContext receiver class;
 		allocatorMethod: filteredContext compiledCode method;
 		allocatedObjectClass: newlyAllocatedObject class;
-		contextFingerprint: filteredContext;
+		"contextFingerprint: filteredContext;"
 		sizeInBytes: newlyAllocatedObject sizeInMemory;
 		initializationTime: Time primUTCMicrosecondsClock.