fix infinite loop

moosetechnology · Jul 5, 2024 · 6fe4373 · 6fe4373
1 parent d88b0f9
commit 6fe4373
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/src/Famix-Value-Entities-Extensions/FamixValueOfClosure.extension.st b/src/Famix-Value-Entities-Extensions/FamixValueOfClosure.extension.st
@@ -0,0 +1,9 @@
+Extension { #name : #FamixValueOfClosure }
+
+{ #category : #'*Famix-Value-Entities-Extensions' }
+FamixValueOfClosure >> mooseNameOn: aStream [
+
+	sourceCode
+		ifNil: [ aStream nextPutAll: '<Closure>' ]
+		ifNotNil: [ aStream nextPutAll: sourceCode ]
+]