--- a/OrderedDictionary.st	Thu Aug 09 05:45:19 2012 +0200
+++ b/OrderedDictionary.st	Mon Aug 13 13:15:08 2012 +0200
@@ -236,8 +236,11 @@
     "Return the first association of the receiver.  
      Provide an error notification if the receiver contains no elements."
 
-    order emptyCheck.
     ^ self associationAt: (order first)
+
+    "
+        OrderedDictionary new first
+    "
 !
 
 keyAt:index
@@ -274,8 +277,11 @@
     "Return the last association of the receiver. 
      Provide an error notification if the receiver contains no elements."
 
-    order emptyCheck.
     ^ self associationAt: (order last)
+
+    "
+        OrderedDictionary new last
+    "
 !
 
 order
@@ -953,9 +959,9 @@
 !OrderedDictionary class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Attic/OrderedDictionary.st,v 1.34 2012-04-20 15:17:19 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Attic/OrderedDictionary.st,v 1.35 2012-08-13 11:15:08 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/Attic/OrderedDictionary.st,v 1.34 2012-04-20 15:17:19 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Attic/OrderedDictionary.st,v 1.35 2012-08-13 11:15:08 stefan Exp $'
 ! !