diff --git a/ChangeLog b/ChangeLog
index 22a5a6388..8986ecf09 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2004-02-25  David Ayers  <d.ayers@inode.at>
+
+	* Headers/Additions/GNUstepBase/GSCategories.h:
+	* Source/Additions/GSCompatibility.m (GSCurrentThread) Implement 
+	and declare for non *-gnu-*.
+
 2004-02-24 Fred Kiefer <FredKiefer@gmx.de>
 
 	* Headers/Foundation/NSDictionary.h: 
diff --git a/Headers/Additions/GNUstepBase/GSCategories.h b/Headers/Additions/GNUstepBase/GSCategories.h
index a8d81b6d1..591ee7003 100644
--- a/Headers/Additions/GNUstepBase/GSCategories.h
+++ b/Headers/Additions/GNUstepBase/GSCategories.h
@@ -310,6 +310,7 @@ GS_EXPORT BOOL GSDebugSet(NSString *level);
 GS_EXPORT NSString *GetEncodingName(NSStringEncoding availableEncodingValue);
 GS_EXPORT NSString *GSEncodingName(NSStringEncoding availableEncodingValue);
 
+GS_EXPORT NSThread *GSCurrentThread(void);
 GS_EXPORT NSMutableDictionary *GSCurrentThreadDictionary(void);
 
 GS_EXPORT NSString *GSDebugMethodMsg(id obj, SEL sel, const char *file, 
diff --git a/Source/Additions/GSCompatibility.m b/Source/Additions/GSCompatibility.m
index 397dbc0d2..895f61ee1 100644
--- a/Source/Additions/GSCompatibility.m
+++ b/Source/Additions/GSCompatibility.m
@@ -38,6 +38,11 @@ NSString *GSEncodingName(NSStringEncoding availableEncodingValue)
   return (NSString *)CFStringGetNameOfEncoding(CFStringConvertNSStringEncodingToEncoding(availableEncodingValue));
 }
 
+NSThread *GSCurrentThread()
+{
+  return [NSThread currentThread];
+}
+
 NSMutableDictionary *GSCurrentThreadDictionary()
 {
   return [[NSThread currentThread] threadDictionary];