LazyMethod.st
changeset 1072 99bd12c0fe76
parent 1053 ecffa1f6ce6e
child 1083 c66b7d5dcc92
--- a/LazyMethod.st	Tue Aug 22 13:09:59 2000 +0200
+++ b/LazyMethod.st	Tue Aug 22 15:48:14 2000 +0200
@@ -171,6 +171,15 @@
     ^ true
 !
 
+literals
+    "cannot ask a lazyMethod for literals ..."
+
+    |m|
+
+    (m := self asExecutableMethod) notNil ifTrue:[^ m literals].
+    ^ #()
+!
+
 resources
     "cannot ask a lazyMethod for resources ..."
 
@@ -186,6 +195,6 @@
 !LazyMethod class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/LazyMethod.st,v 1.29 2000-07-18 11:40:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/LazyMethod.st,v 1.30 2000-08-22 13:48:14 cg Exp $'
 ! !
 LazyMethod initialize!