diff --git a/repository/Grafoscopio/GrafoscopioNode.class.st b/repository/Grafoscopio/GrafoscopioNode.class.st
index 570fea2..9789f8b 100644
--- a/repository/Grafoscopio/GrafoscopioNode.class.st
+++ b/repository/Grafoscopio/GrafoscopioNode.class.st
@@ -126,14 +126,12 @@ GrafoscopioNode >> ancestors [
 	
 	currentNode := self.
 	ancestors := OrderedCollection new.
-	[currentNode level > 0] 
+	[ currentNode parent notNil and: [ currentNode level > 0 ] ]
 		whileTrue: [ 
 			ancestors add: currentNode parent.
-			currentNode := currentNode parent.].
+			currentNode := currentNode parent].
 	ancestors := ancestors reversed.
-   ^ ancestors 	
-	
-
+   ^ ancestors 
 ]
 
 { #category : #accessing }