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

Add braces to suppress dangling else warning.

Browse Source 
modified:   vars3.c
This commit is contained in:
Nick Briggs 2017-06-07 20:54:52 -07:00
parent 3d47027d31
commit 2c3fb229d1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/vars3.c
View File

@ -45,7 +45,7 @@ struct cadr_cell cadr(LispPTR cell_adr)
struct cadr_cell cadr1; /* return value */
short offset;
if (Listp(cell_adr) == NIL)
if (Listp(cell_adr) == NIL) {
if (cell_adr == NIL) {
cadr1.car_cell = 0;
cadr1.cdr_cell = 0;
@ -55,7 +55,7 @@ struct cadr_cell cadr(LispPTR cell_adr)
cadr1.cdr_cell = cdr(cell_adr);
return (cadr1);
}
}
pcons = (ConsCell *)Addr68k_from_LADDR(cell_adr);
while (pcons->cdr_code == CDR_INDIRECT) {
/* CDR indirect */