--- a/RegressionTests__CompilerTest.st	Wed Sep 27 09:51:29 2000 +0200
+++ b/RegressionTests__CompilerTest.st	Sat Sep 30 23:00:15 2000 +0200
@@ -10,6 +10,40 @@
 !
 
 
+!CompilerTest class methodsFor:'tests argument passing'!
+
+ret0
+    ^ 0
+
+    "
+     self ret0
+    "
+!
+
+ret1
+    ^ 1
+
+    "
+     self ret1
+    "
+!
+
+retM1
+    ^ -1
+
+    "
+     self retM1
+    "
+!
+
+retSelf
+    ^ self
+
+    "
+     self retSelf
+    "
+! !
+
 !CompilerTest methodsFor:'helpers'!
 
 value:something