concurrency: Rename wait-timeout to timed-out-error for clarity. Add the timer that timed out to the error tuple.

basis/concurrency/conditions/conditions.factor

@@ -20,7 +20,7 @@ IN: concurrency.conditions
         ]
     ] dip later ;
 
-ERROR: wait-timeout ;
+ERROR: timed-out-error timer ;
 
 : queue ( queue -- )
     [ self ] dip push-front ; inline
@@ -28,7 +28,7 @@ ERROR: wait-timeout ;
 : wait ( queue timeout status -- )
     over [
         [ queue-timeout ] dip suspend
-        [ wait-timeout ] [ stop-timer ] if
+        [ timed-out-error ] [ stop-timer ] if
     ] [
         [ drop queue ] dip suspend drop
     ] if ; inline

basis/concurrency/mailboxes/mailboxes-tests.factor

@@ -51,4 +51,4 @@ IN: concurrency.mailboxes.tests
 
 [
     <mailbox> 1 seconds mailbox-get-timeout
-] [ wait-timeout? ] must-fail-with
+] [ timed-out-error? ] must-fail-with