Reorganizing extension.

2022-01-28 15:33:05 -05:00 · 2022-01-28 15:33:05 -05:00 · 05ea5bfa3f
parent 0def1b82e2
commit 05ea5bfa3f
1 changed files with 8 additions and 0 deletions
--- a/repository/Grafoscopio-Utils/LePage.extension.st
+++ b/repository/Grafoscopio-Utils/LePage.extension.st
@ -52,3 +52,11 @@ LePage >> metadata [
 LePage >> options [
 	^ options
 ]
+
+{ #category : #'*Grafoscopio-Utils-Core' }
+LePage >> preorderTraversal [
+	| output |
+	output := OrderedCollection new.
+	self withDeepCollect: [:each | each allChildrenBreadthFirstDo: [:child | output add: child ] ].
+	^ output.
+]