github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-15 15:57:13 +00:00
Code Issues Projects Releases Wiki Activity

unixfork: read() returns ssize_t. (#77)

Browse Source 
We should do this more widely, but this will let us see if we
have any problems across platforms from making this change.
This commit is contained in:
Bruce Mitchener 2020-12-16 09:46:20 +07:00 committed by GitHub
parent a97b2a3501
commit ab7329d602
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/unixfork.c
View File

@ -57,10 +57,10 @@ char shcom[512]; /* Here because I'm suspicious of */
/* large allocations on the stack */
static __inline__ int
static __inline__ ssize_t
SAFEREAD(int f, char *b, int c)
{
int res;
ssize_t res;
loop:
res = read(f, b, c);
if ((res < 0)) {
@ -303,7 +303,7 @@ int fork_Unix() {
res = fcntl(LispPipeIn, F_SETFL, res);
while (1) {
int len;
ssize_t len;
len = 0;
while (len != 4) {
if ((len = SAFEREAD(LispPipeIn, IOBuf, 4)) < 0) { /* Get packet */