--- a/ReturnNode.st	Sat Feb 10 17:15:59 2007 +0100
+++ b/ReturnNode.st	Sat Feb 10 17:17:33 2007 +0100
@@ -1,6 +1,6 @@
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
+              All Rights Reserved
 
  This software is furnished under a license and may be used
  only in accordance with the terms of that license and with the
@@ -12,10 +12,10 @@
 "{ Package: 'stx:libcomp' }"
 
 StatementNode subclass:#ReturnNode
-	instanceVariableNames:'myHome blockHome'
-	classVariableNames:''
-	poolDictionaries:''
-	category:'System-Compiler-Support'
+        instanceVariableNames:'myHome blockHome'
+        classVariableNames:''
+        poolDictionaries:''
+        category:'System-Compiler-Support'
 !
 
 !ReturnNode class methodsFor:'documentation'!
@@ -23,7 +23,7 @@
 copyright
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
-	      All Rights Reserved
+              All Rights Reserved
 
  This software is furnished under a license and may be used
  only in accordance with the terms of that license and with the
@@ -125,19 +125,17 @@
 !
 
 codeOn:aStream inBlock:b for:aCompiler
-false ifTrue:[
-    aCompiler parserFlags allowPossibleSTCCompilationProblems ifFalse:[
-        aCompiler 
-            parseError:'stc will not compile return within a return'
-            line:lineNr.
-    ] ifTrue:[
-        aCompiler parserFlags warnAboutPossibleSTCCompilationProblems ifTrue:[
-            aCompiler 
-                warning:'stc will not compile return within a return'
-                line:lineNr.
-        ].
-    ].
-].
+"/    aCompiler parserFlags allowPossibleSTCCompilationProblems ifFalse:[
+"/        aCompiler 
+"/            parseError:'stc will not compile return within a return'
+"/            line:lineNr.
+"/    ] ifTrue:[
+"/        aCompiler parserFlags warnAboutPossibleSTCCompilationProblems ifTrue:[
+"/            aCompiler 
+"/                warning:'stc will not compile return within a return'
+"/                line:lineNr.
+"/        ].
+"/    ].
     self basicCodeOn:aStream inBlock:b for:aCompiler
 
     "Modified: / 16-11-2006 / 14:34:15 / cg"
@@ -189,5 +187,5 @@
 !ReturnNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ReturnNode.st,v 1.36 2007-02-07 10:53:20 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ReturnNode.st,v 1.37 2007-02-10 16:17:33 cg Exp $'
 ! !