From a60d29a46828657d0c2f6a10fb8c3cf622816c1a Mon Sep 17 00:00:00 2001
From: jordanmontt <sebastianjmt@hotmail.com>
Date: Tue, 17 Dec 2024 14:21:39 +0100
Subject: [PATCH] Full senders chain for dev

---
 src/IllimaniProfiler/IllEphemeron.class.st | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/src/IllimaniProfiler/IllEphemeron.class.st b/src/IllimaniProfiler/IllEphemeron.class.st
index b1978e1..c9dc8ca 100644
--- a/src/IllimaniProfiler/IllEphemeron.class.st
+++ b/src/IllimaniProfiler/IllEphemeron.class.st
@@ -174,14 +174,16 @@ IllEphemeron >> sendersCallStack [
 { #category : 'accessing' }
 IllEphemeron >> sendersCallStack: aContext [
 
-	| sender |
-	senders := Array new: 10.
+	| sender i n |
+	n := 200.
+	senders := Array new: n.
+	i := 1.
 	sender := aContext.
-	1 to: 10 by: 2 do: [ :i |
-		sender ifNil: [ ^ self ].
+	[ sender isNil or: [ i > n ] ] whileFalse: [
 		senders at: i put: sender method.
 		senders at: i + 1 put: sender pc - 1.
-		sender := sender sender ]
+		sender := sender sender.
+		i := i + 2 ]
 ]
 
 { #category : 'accessing' }