[Patch/base](HEAD & branch) NSDecimalFromComponents compatibility function

[David Ayers]

For GDL2 on OS X we needed a compatibility function for 
NSDecimalFromComponents().

2003-09-11  Philip Moetteli  <philip dot moetteli at tele2 dot ch>

      * Source/Additions/GSCompatibility.h
      * Source/Additions/GSCompatibility.m
      (NSDecimalFromComponents): Added compatibility function.

Committed to HEAD and the branch.

Thanks Philip!

Cheers,
David

Index: Source/Additions/GSCompatibility.h
===================================================================
RCS file: 
/cvsroot/gnustep/gnustep/core/base/Source/Additions/GSCompatibility.h,v
retrieving revision 1.14
diff -u -r1.14 GSCompatibility.h
--- Source/Additions/GSCompatibility.h  8 Sep 2003 02:36:49 -0000       1.14
+++ Source/Additions/GSCompatibility.h  11 Sep 2003 11:46:26 -0000
@@ -202,13 +202,18 @@
  */
 
 GS_EXPORT NSArray *NSStandardLibraryPaths();
+GS_EXPORT void NSDecimalFromComponents(NSDecimal *result, 
+                                      unsigned long long mantissa,
+                                      short exponent, BOOL negative);
 GS_EXPORT NSString *GetEncodingName(NSStringEncoding availableEncodingValue);
 GS_EXPORT NSString *GSEncodingName(NSStringEncoding availableEncodingValue);
 
 GS_EXPORT NSMutableDictionary *GSCurrentThreadDictionary();
 
-GS_EXPORT NSString *GSDebugMethodMsg(id obj, SEL sel, const char *file, int 
line, NSString *fmt);
-GS_EXPORT NSString *GSDebugFunctionMsg(const char *func, const char *file, int 
line, NSString *fmt);
+GS_EXPORT NSString *GSDebugMethodMsg(id obj, SEL sel, const char *file, 
+                                    int line, NSString *fmt);
+GS_EXPORT NSString *GSDebugFunctionMsg(const char *func, const char *file,
+                                      int line, NSString *fmt);
 
 #endif /* NexT_FOUNDATION_LIB */
 
Index: Source/Additions/GSCompatibility.m
===================================================================
RCS file: 
/cvsroot/gnustep/gnustep/core/base/Source/Additions/GSCompatibility.m,v
retrieving revision 1.12
diff -u -r1.12 GSCompatibility.m
--- Source/Additions/GSCompatibility.m  24 Aug 2003 23:07:41 -0000      1.12
+++ Source/Additions/GSCompatibility.m  11 Sep 2003 11:46:26 -0000
@@ -49,7 +49,18 @@
 
 NSArray *NSStandardLibraryPaths()
 {
-    return NSSearchPathForDirectoriesInDomains(NSAllLibrariesDirectory, 
NSAllDomainsMask, YES);
+    return NSSearchPathForDirectoriesInDomains(NSAllLibrariesDirectory,
+                                              NSAllDomainsMask, YES);
+}
+
+// Defined in NSDecimal.m
+void NSDecimalFromComponents(NSDecimal *result,
+                            unsigned long long mantissa,
+                            short exponent, BOOL negative)
+{
+  *result = [[NSDecimalNumber decimalNumberWithMantissa:mantissa 
+                             exponent:exponent
+                             isNegative:negative] decimalValue];
 }
 
 // Defined in NSDebug.m