clarer debug log

gnustep · Jan 29, 2024 · 562ee46 · 562ee46
1 parent bad85d6
commit 562ee46
Showing 1 changed file with 11 additions and 3 deletions.
diff --git a/Source/GSSocketStream.m b/Source/GSSocketStream.m
@@ -460,12 +460,20 @@ - (void) stream: (NSStream*)stream issuer: (NSString*)i owner: (NSString*)o;
 #else
       errno = e;	// Not thread-safe
 #endif
-      NSDebugFLLog(@"NSStream", @"GSTLSPush to %p error %d (%s)",
+      NSDebugFLLog(@"NSStream", @"GSTLSPush write for %p error %d (%s)",
 	[tls ostream], e, strerror(e));
       return -1;
     }
-  NSDebugFLLog(@"NSStream", @"GSTLSPush to %p write %ld of %lu",
-    [tls ostream], (long)result, (unsigned long)len);
+  if (len != result)
+    {
+      NSDebugFLLog(@"NSStream", @"GSTLSPush write for %p of %ld (tried %lu)",
+	[tls ostream], (long)result, (unsigned long)len);
+    }
+  else
+    {
+      NSDebugFLLog(@"NSStream", @"GSTLSPush write for %p of %ld",
+	[tls ostream], (long)result);
+    }
   return result;
 }