# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 1460638547 -7200
# Node ID 8b7a610ea316e26b18b659de0e63b548b79d0bab
# Parent  2aab71e0f0b6fdfb74e29c2fe225b0bbcdf7ac77
#FEATURE by stefan
class: Collection
changed: #topologicalSortStable:
    add cycle chain to parameter when raising an error

diff -r 2aab71e0f0b6 -r 8b7a610ea316 Collection.st
--- a/Collection.st	Thu Apr 14 14:50:57 2016 +0200
+++ b/Collection.st	Thu Apr 14 14:55:47 2016 +0200
@@ -5370,7 +5370,9 @@
                 eachChild := graphEntry at:i.
                 (backTrace includesIdentical:eachChild) ifTrue:[
                     backTrace add:eachChild.
-                    self error:('cycle in ordering: %1' bindWith:backTrace reversed) mayProceed:true.
+                    ProceedableError
+                        raiseRequestWith:backTrace reversed
+                        errorString:('cycle in ordering: %1' bindWith:(backTrace reversed printStringWithSeparator:' -> ')).
                 ].
                 eachChildGraph := graph at:eachChild.
                 checkBlock value:eachChildGraph value:(backTrace copyWith:eachChild).
@@ -5875,6 +5877,7 @@
     ^ aVisitor visitCollection:self with:aParameter
 ! !
 
+
 !Collection class methodsFor:'documentation'!
 
 version