github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-27 04:12:51 +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

4
src/lowlev2.c
View File

@@ -80,7 +80,7 @@ LispPTR N_OP_addbase(register int base, register int offset)
***********************************************************/
N_OP_getbasebyte(register LispPTR base_addr, register int byteoffset)
LispPTR N_OP_getbasebyte(register LispPTR base_addr, register int byteoffset)
{
switch( (SEGMASK & byteoffset) ){
case S_POSITIVE:
@@ -115,7 +115,7 @@ N_OP_getbasebyte(register LispPTR base_addr, register int byteoffset)
***********************************************************/
N_OP_putbasebyte(register LispPTR base_addr, register int byteoffset, register int tos)
LispPTR N_OP_putbasebyte(register LispPTR base_addr, register int byteoffset, register int tos)
{
if(((SEGMASK & tos ) != S_POSITIVE) || ((unsigned short)tos >= 256))
ERROR_EXIT(tos);