Merge pull request #917 from pharo-spec/dev-2.0

fix a baseline problem
pharo-spec · Dec 3, 2024 · 8e80184 · 8e80184
2 parents 2b0c908 + 0ccb49e
commit 8e80184
Show file tree

Hide file tree

Showing 2 changed files with 26 additions and 1 deletion.
diff --git a/src/BaselineOfNewTools/BaselineOfNewTools.class.st b/src/BaselineOfNewTools/BaselineOfNewTools.class.st
@@ -156,7 +156,8 @@ BaselineOfNewTools >> baseline: spec [
 						'NewTools-DebuggerSelector'
 				   		'NewTools-DebuggerSelector-Tests' );
 			group: 'FileBrowser' with: #( 
-						'NewTools-FileBrowser' 
+						'NewTools-FileBrowser'
+						'NewTools-FileBrowser-Morphic'
 						'NewTools-FileBrowser-Tests' );
       			group: 'RewriterTools' with: #(
 				    		'NewTools-RewriterTools-Backend'

diff --git a/src/NewTools-Inspector-Extensions/WaitfreeQueue.extension.st b/src/NewTools-Inspector-Extensions/WaitfreeQueue.extension.st
@@ -0,0 +1,24 @@
+Extension { #name : 'WaitfreeQueue' }
+
+{ #category : '*NewTools-Inspector-Extensions' }
+WaitfreeQueue >> inspectionItemsOn: builder [
+	<inspectorPresentationOrder: 910 title: 'Items'>
+	| items |
+
+	items := 	Array streamContents: [ :stream |
+		| item count |
+
+		item := dummy.
+		count := 0.
+		[ 
+			item := item next. 
+			item == dummy 
+				ifFalse: [ stream nextPut: item object ]. 
+			item isCircular 
+		] whileFalse 
+	].
+
+	^ builder newList  
+		items: items;
+		yourself
+]