--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/RegressionTests__WritingToTranscriptOrStdoutTest.st	Tue Aug 09 23:57:53 2011 +0200
@@ -0,0 +1,31 @@
+"{ Package: 'exept:regression' }"
+
+"{ NameSpace: RegressionTests }"
+
+TestCase subclass:#WritingToTranscriptOrStdoutTest
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'tests-Regression'
+!
+
+
+!WritingToTranscriptOrStdoutTest methodsFor:'tests'!
+
+test01_writeToStdout
+    Stdout nextPutLine:'hello world'.
+!
+
+test02_writeToTranscript
+    Transcript showCR:'hello world'.
+! !
+
+!WritingToTranscriptOrStdoutTest class methodsFor:'documentation'!
+
+version
+    ^ '$Header$'
+!
+
+version_CVS
+    ^ '$Header$'
+! !