--- a/Block.st	Mon Oct 03 10:30:36 2011 +0200
+++ b/Block.st	Tue Oct 04 14:56:53 2011 +0200
@@ -371,6 +371,7 @@
 ! !
 
 
+
 !Block methodsFor:'Compatibility-ANSI'!
 
 argumentCount
@@ -473,7 +474,19 @@
     "Compatibility method - do not use in new code.
      Dolphin's alias for futureValue"
 
-    ^ self futureValue
+    ^ Future new block:self
+
+    "Modified: / 04-10-2011 / 14:56:27 / cg"
+!
+
+deferredValueAt:priority
+    "Compatibility method - do not use in new code.
+     Dolphin's alias for futureValue"
+
+    ^ Future new 
+        priority:priority block:self
+
+    "Created: / 04-10-2011 / 14:55:56 / cg"
 ! !
 
 !Block methodsFor:'Compatibility-Squeak'!
@@ -2486,7 +2499,11 @@
      Starts the evaluation in parallel now, but synchronizes
      any access to wait until the result is computed."
     
-    ^ Future new block:self valueWithArguments:anArray
+    ^ Future new 
+        block:self 
+        valueWithArguments:anArray
+
+    "Modified (format): / 04-10-2011 / 14:55:40 / cg"
 !
 
 lazyValue
@@ -2951,11 +2968,11 @@
 !Block class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.185 2011-07-21 11:36:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.186 2011-10-04 12:56:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.185 2011-07-21 11:36:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.186 2011-10-04 12:56:53 cg Exp $'
 ! !
 
 Block initialize!