github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-02-03 07:10:39 +00:00
Code Issues Projects Releases Wiki Activity

Fix missing return types on functions, convert some functions with always ignored results to void.

Browse Source
This commit is contained in:
Nick Briggs
2017-05-28 15:08:42 -07:00
parent 65ddb5a968
commit 691645d048
83 changed files with 587 additions and 549 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
src/unixcomm.c
View File

@@ -187,7 +187,7 @@ int find_process_slot(register int pid)
/* */
/************************************************************************/
wait_for_comm_processes(void)
void wait_for_comm_processes(void)
{
int pid;
int slot;
@@ -274,7 +274,7 @@ int desc;
/************************************************************************/
close_unix_descriptors(void) /* Get ready to shut Maiko down */
void close_unix_descriptors(void) /* Get ready to shut Maiko down */
{
int slot;
@@ -331,7 +331,7 @@ close_unix_descriptors(void) /* Get ready to shut Maiko down */
/* */
/************************************************************************/
FindUnixPipes(void)
int FindUnixPipes(void)
{
char *envtmp, *getenv(const char *);
register int i;
@@ -398,7 +398,7 @@ FindUnixPipes(void)
/* Find the first PTY pair that is not in use */
FindAvailablePty(char *Master, char *Slave)
int FindAvailablePty(char *Master, char *Slave)
{
int res, flags;
char *let, *num;
@@ -447,11 +447,7 @@ FindAvailablePty(char *Master, char *Slave)
return(-1);
}
void WriteLispStringToPipe (LispPTR lispstr);
/************************************************************************/
/* */
@@ -495,7 +491,7 @@ FindAvailablePty(char *Master, char *Slave)
/************************************************************************/
Unix_handlecomm(LispPTR *args)
LispPTR Unix_handlecomm(LispPTR *args)
{
int command,c, dest, PID, i, slot, sock, res;
LispPTR retval;
@@ -1221,7 +1217,7 @@ printf("Shell job %d, PID = %d\n", slot, UJ[slot].PID);
/* */
/************************************************************************/
WriteLispStringToPipe (LispPTR lispstr)
void WriteLispStringToPipe (LispPTR lispstr)
{ unsigned short len;
LispStringToCString(lispstr, shcom, 2048);
/* Write string length, then string */