class: RegressionTests::SnapshotRestartTests
authorJan Vrany <jan.vrany@fit.cvut.cz>
Fri, 13 Sep 2013 13:56:24 +0200
changeset 1000 0856cdcc7674
parent 999 8626f0850709
child 1001 9478e093ee77
class: RegressionTests::SnapshotRestartTests changed: #runTestsOnFreshImage #runTestsOnRestartedImage Oops, on Windows filenames cannot have colon in their name...
RegressionTests__SnapshotRestartTests.st
--- a/RegressionTests__SnapshotRestartTests.st	Fri Sep 13 13:07:43 2013 +0200
+++ b/RegressionTests__SnapshotRestartTests.st	Fri Sep 13 13:56:24 2013 +0200
@@ -67,7 +67,7 @@
 
     script := pkgdir / 'run-ToRunOnFreshAndRestartedSnapshotTests-tests.st'.
     self assert: script exists.
-    log := FileStream newTemporaryIn: Filename currentDirectory nameTemplate: (self class name , '-' , testSelector , '%1-%2.log').
+    log := FileStream newTemporaryIn: Filename currentDirectory nameTemplate: ('RegressionTests__SnapshotRestartTests-' , testSelector , '%1-%2.log').
     logfile := log fileName.
     [
         OperatingSystem executeCommand: ('%1 --execute %2' bindWith: exe with: script asAbsoluteFilename pathName) outputTo: log errorTo: log inDirectory: tmpdir pathName.
@@ -78,13 +78,13 @@
     self assertAllTestsPassed: logfile.
 
     "Created: / 14-08-2013 / 20:06:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 13-09-2013 / 12:03:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 13-09-2013 / 12:54:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 runTestsOnRestartedImage
     |  log logfile |
 
-    log := FileStream newTemporaryIn: Filename currentDirectory nameTemplate: (self class name , '-' , testSelector , '%1-%2.log').
+    log := FileStream newTemporaryIn: Filename currentDirectory nameTemplate: ('RegressionTests__SnapshotRestartTests-' , testSelector , '%1-%2.log').
     logfile := log fileName.
     [
         OperatingSystem executeCommand: ('%1 -i %2' bindWith: exe with: (tmpdir / 'restart.img') pathName ) outputTo: log errorTo: log inDirectory: tmpdir pathName
@@ -94,7 +94,7 @@
     self assertAllTestsPassed: logfile.
 
     "Created: / 14-08-2013 / 20:10:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 13-09-2013 / 12:03:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 13-09-2013 / 12:54:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 setUp