--- a/RegressionTests__OperatingSystemTest.st Wed Jun 29 21:40:53 2016 +0100
+++ b/RegressionTests__OperatingSystemTest.st Thu Jun 30 09:02:08 2016 +0100
@@ -30,13 +30,13 @@
outStr nextPutLineBlock:[:line | Transcript bold; showCR:line ].
OperatingSystem
- executeCommand:'ls'
- inputFrom:nil
- outputTo:outStr
- errorTo:errStr
- inDirectory:nil
- lineWise:true
- onError:[:status | exitStatus := status].
+ executeCommand:'ls'
+ inputFrom:nil
+ outputTo:outStr
+ errorTo:errStr
+ inDirectory:nil
+ lineWise:true
+ onError:[:status | exitStatus := status].
"
self new testActorStream
@@ -51,17 +51,17 @@
1 to:50 do:[:counter |
"/ Transcript show:counter; showCR:':'.
- outStr := '' writeStream.
- errStr := '' writeStream.
- OperatingSystem
- executeCommand:'ls'
- inputFrom:nil
- outputTo:outStr
- errorTo:errStr
- onError:[:status | exitStatus := status].
- self assert:(outStr contents = expected).
- self assert:(errStr contents isEmpty).
- self assert:(exitStatus isNil).
+ outStr := '' writeStream.
+ errStr := '' writeStream.
+ OperatingSystem
+ executeCommand:'ls'
+ inputFrom:nil
+ outputTo:outStr
+ errorTo:errStr
+ onError:[:status | exitStatus := status].
+ self assert:(outStr contents = expected).
+ self assert:(errStr contents isEmpty).
+ self assert:(exitStatus isNil).
].
"
@@ -74,19 +74,19 @@
1 to:50 do:[:counter |
"/ Transcript show:counter; showCR:':'.
- outStr := '' writeStream.
- errStr := '' writeStream.
- OperatingSystem
- executeCommand:'ls /fooBar'
- inputFrom:nil
- outputTo:outStr
- errorTo:errStr
- onError:[:status | exitStatus := status].
- self assert:(outStr contents isEmpty).
- self assert:(errStr contents notEmpty).
- self assert:(exitStatus success not).
- self assert:(exitStatus stillAlive not).
- self assert:(exitStatus couldNotExecute not).
+ outStr := '' writeStream.
+ errStr := '' writeStream.
+ OperatingSystem
+ executeCommand:'ls /fooBar'
+ inputFrom:nil
+ outputTo:outStr
+ errorTo:errStr
+ onError:[:status | exitStatus := status].
+ self assert:(outStr contents isEmpty).
+ self assert:(errStr contents notEmpty).
+ self assert:(exitStatus success not).
+ self assert:(exitStatus stillAlive not).
+ self assert:(exitStatus couldNotExecute not).
].
"
@@ -99,19 +99,19 @@
1 to:50 do:[:counter |
"/ Transcript show:counter; showCR:':'.
- outStr := '' writeStream.
- errStr := '' writeStream.
- OperatingSystem
- executeCommand:'blabla /fooBar'
- inputFrom:nil
- outputTo:outStr
- errorTo:errStr
- onError:[:status | exitStatus := status].
- self assert:(exitStatus success not).
- self assert:(exitStatus stillAlive not).
- self assert:(exitStatus couldNotExecute).
- self assert:(outStr contents isEmpty).
- self assert:(errStr contents notEmpty).
+ outStr := '' writeStream.
+ errStr := '' writeStream.
+ OperatingSystem
+ executeCommand:'blabla /fooBar'
+ inputFrom:nil
+ outputTo:outStr
+ errorTo:errStr
+ onError:[:status | exitStatus := status].
+ self assert:(exitStatus success not).
+ self assert:(exitStatus stillAlive not).
+ self assert:(exitStatus couldNotExecute).
+ self assert:(outStr contents isEmpty).
+ self assert:(errStr contents notEmpty).
].
"