RegressionTests__SnapshotRestartTests.st
branchjv
changeset 1600 4c5ad11437f1
parent 1599 ad563876d688
child 1601 3952a8200e70
--- a/RegressionTests__SnapshotRestartTests.st	Fri Mar 03 21:13:26 2017 +0000
+++ b/RegressionTests__SnapshotRestartTests.st	Sat Mar 04 12:21:29 2017 +0000
@@ -17,40 +17,6 @@
 !
 
 
-!SnapshotRestartTests methodsFor:'accessing'!
-
-timeout
-    "Returns a default timeout (sec) for the test.
-     If nil is returned, no timeout enforced."
-
-    "/ Due to some bug in I/O processing on Windows,
-    "/ if there's no display connection (i.e., St/X
-    "/ is running under non-interactive window station).
-    "/ Thus, depending on a load of machine, 60secs may not
-    "/ be enough to finish the test. In that case, increase
-    "/ the limit 10 times. Sigh, what a hack!!
-    "/ 
-    "/ See https://swing.fit.cvut.cz/projects/stx-jv/ticket/121#ticket
-
-    | timeout |
-
-    timeout := super timeout.
-    OperatingSystem isMSWINDOWSlike ifTrue:[ 
-        "/ Try to open display first...
-        Display isNil ifTrue:[ 
-            Smalltalk openDisplay.
-        ].
-        "/ if it fails, increase the limit (sigh)"
-        Display isNil ifTrue:[ 
-            timeout := timeout * 10.
-        ].
-    ].
-    ^ timeout
-
-    "Created: / 03-03-2017 / 08:27:50 / jv"
-    "Modified (comment): / 03-03-2017 / 21:12:16 / jv"
-! !
-
 !SnapshotRestartTests methodsFor:'compilation'!
 
 make