pkgsrc/devel/florist/patches/patch-ah

13 lines
486 B
Text

$NetBSD: patch-ah,v 1.1 2005/10/20 17:43:29 wiz Exp $
--- posix-process_identification.gpb.orig 2002-10-24 02:03:52.000000000 -0600
+++ posix-process_identification.gpb
@@ -213,7 +213,7 @@ package body POSIX.Process_Identificatio
Name_Ptr : char_ptr;
begin
Name_Ptr := getlogin;
- if (Name_Ptr = null) then Raise_POSIX_Error; end if;
+ if Name_Ptr = null then Raise_POSIX_Error; end if;
return Form_POSIX_String (Name_Ptr);
end Get_Login_Name;