Fixed type. Added missing return.

Author: interkosmos

src/unix_macro.c

@@ -74,7 +74,7 @@ int c_scanf(const char *format, const char *arg)
 /* int uname(struct utsname *name) */
 int c_uname(struct utsname *name)
 {
-    uname(name);
+    return uname(name);
 }
 
 /* void syslog(int priority, const char *format, ...) */

src/unix_types.F90

@@ -55,7 +55,7 @@ module unix_types
     integer, parameter, public :: c_off_t       = c_int64_t
     integer, parameter, public :: c_pid_t       = c_int32_t
     integer, parameter, public :: c_socklen_t   = c_size_t
-    integer, parameter, public :: c_speed_t     = c_int
+    integer, parameter, public :: c_speed_t     = c_unsigned_int
     integer, parameter, public :: c_suseconds_t = c_long
     integer, parameter, public :: c_tcflag_t    = c_unsigned_int
     integer, parameter, public :: c_time_t      = c_int64_t