ReturnNode.st
changeset 71 2aac7fbb5be0
parent 62 a8e1828867a8
child 102 77e4d1119ff2
--- a/ReturnNode.st	Fri Feb 24 16:21:56 1995 +0100
+++ b/ReturnNode.st	Fri Feb 24 16:22:33 1995 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libcomp/ReturnNode.st,v 1.7 1995-02-16 16:27:24 claus Exp $
+$Header: /cvs/stx/stx/libcomp/ReturnNode.st,v 1.8 1995-02-24 15:22:16 claus Exp $
 '!
 
 !ReturnNode class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libcomp/ReturnNode.st,v 1.7 1995-02-16 16:27:24 claus Exp $
+$Header: /cvs/stx/stx/libcomp/ReturnNode.st,v 1.8 1995-02-24 15:22:16 claus Exp $
 "
 !
 
@@ -61,6 +61,10 @@
 
 !ReturnNode methodsFor:'queries'!
 
+isConstant
+    ^ false
+!
+
 isReturnNode
     ^ true
 ! !