diff --git a/ChangeLog b/ChangeLog
index 5addf54cb..da913ac90 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2000-03-18  Richard Frith-Macdonald <rfm@gnu.org>
+
+	* Source/NSNumber.m: Added private methods from concrete class.
+
 2000-03-17  Adam Fedor  <fedor@gnu.org>
 
 	* Documentation/coding-standards.tmpl.texi: Update
diff --git a/Source/NSNumber.m b/Source/NSNumber.m
index d8e2c5ab9..58e1c2436 100644
--- a/Source/NSNumber.m
+++ b/Source/NSNumber.m
@@ -31,6 +31,12 @@
 #include <Foundation/NSConcreteNumber.h>
 #include <Foundation/NSCoder.h>
 
+@interface NSNumber (Private)
+- (int)_nextOrder;
+- (NSComparisonResult) _promotedCompare: (NSNumber*)other;
+- (int)_typeOrder;
+@end
+
 @implementation NSNumber
 
 static Class	abstractClass;
@@ -524,4 +530,25 @@ static Class	doubleNumberClass;
   return nil;
 }
 
+- (int)_nextOrder
+{
+  return 12;
+}
+- (NSComparisonResult) _promotedCompare: (NSNumber*)other
+{
+  double	v0, v1;
+
+  v0 = [self doubleValue];
+  v1 = [other doubleValue];
+
+  if (v0 == v1)
+    return NSOrderedSame;
+  else
+    return (v0 < v1) ?  NSOrderedAscending : NSOrderedDescending;
+}
+- (int)_typeOrder
+{
+  return 12;
+}
+
 @end