--- a/BufferedValueHolder.st Mon Jan 26 14:32:50 1998 +0100
+++ b/BufferedValueHolder.st Tue Jan 27 12:12:49 1998 +0100
@@ -208,8 +208,19 @@
bufferedValue := NotYetAssigned
! !
+!BufferedValueHolder methodsFor:'queries'!
+
+isBuffering
+ "return true, if the receiver is currently buffering something
+ (i.e. its value has been assigned)"
+
+ ^ bufferedValue ~~ NotYetAssigned
+
+ "Modified: / 27.1.1998 / 12:09:46 / cg"
+! !
+
!BufferedValueHolder class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/BufferedValueHolder.st,v 1.12 1997-11-02 17:09:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/BufferedValueHolder.st,v 1.13 1998-01-27 11:12:49 cg Exp $'
! !