diff options
Diffstat (limited to 'src/process.c')
| -rw-r--r-- | src/process.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/process.c b/src/process.c index c6140083784..f6484d0370e 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -2989,7 +2989,7 @@ usage: (make-network-process &rest ARGS) */) | |||
| 2989 | address_un.sun_family = AF_LOCAL; | 2989 | address_un.sun_family = AF_LOCAL; |
| 2990 | if (sizeof address_un.sun_path <= SBYTES (service)) | 2990 | if (sizeof address_un.sun_path <= SBYTES (service)) |
| 2991 | error ("Service name too long"); | 2991 | error ("Service name too long"); |
| 2992 | lispstrcpy (address_un.sun_path, service); | 2992 | lispstpcpy (address_un.sun_path, service); |
| 2993 | ai.ai_addr = (struct sockaddr *) &address_un; | 2993 | ai.ai_addr = (struct sockaddr *) &address_un; |
| 2994 | ai.ai_addrlen = sizeof address_un; | 2994 | ai.ai_addrlen = sizeof address_un; |
| 2995 | goto open_socket; | 2995 | goto open_socket; |
| @@ -3680,7 +3680,7 @@ network_interface_info (Lisp_Object ifname) | |||
| 3680 | 3680 | ||
| 3681 | if (sizeof rq.ifr_name <= SBYTES (ifname)) | 3681 | if (sizeof rq.ifr_name <= SBYTES (ifname)) |
| 3682 | error ("interface name too long"); | 3682 | error ("interface name too long"); |
| 3683 | lispstrcpy (rq.ifr_name, ifname); | 3683 | lispstpcpy (rq.ifr_name, ifname); |
| 3684 | 3684 | ||
| 3685 | s = socket (AF_INET, SOCK_STREAM | SOCK_CLOEXEC, 0); | 3685 | s = socket (AF_INET, SOCK_STREAM | SOCK_CLOEXEC, 0); |
| 3686 | if (s < 0) | 3686 | if (s < 0) |