Skip to content

R
riscv-gcc-1
Commit 014c9caa by Thomas Quinot Committed by Arnaud Charlet
Options

g-socthi-vxworks.adb (C_Gethostbyname): Fix wrong test for returned error status. 

2006-10-31  Thomas Quinot  <quinot@adacore.com>

	* g-socthi-vxworks.adb (C_Gethostbyname): Fix wrong test for returned
	error status.

From-SVN: r118233
parent aa180613
Showing with 2 additions and 2 deletions
gcc/ada/g-socthi-vxworks.adb
...@@ -6,7 +6,7 @@ ...@@ -6,7 +6,7 @@
-- -- -- --
-- B o d y -- -- B o d y --
-- -- -- --
-- Copyright (C) 2002-2005, AdaCore -- -- Copyright (C) 2002-2006, AdaCore --
-- -- -- --
-- GNAT is free software; you can redistribute it and/or modify it under -- -- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- -- -- terms of the GNU General Public License as published by the Free Soft- --
...@@ -302,7 +302,7 @@ package body GNAT.Sockets.Thin is ...@@ -302,7 +302,7 @@ package body GNAT.Sockets.Thin is
begin begin
Addr := VxWorks_hostGetByName (Name); Addr := VxWorks_hostGetByName (Name);
if Addr /= Constants.OK then if Addr = Constants.ERROR then
return null; return null;
end if; end if;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment