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

Change local variable name to avoid warnings for shadowing.

Browse Source 
modified:   inc/arith.h
This commit is contained in:
Nick Briggs
2020-12-09 18:23:16 -08:00
parent 9b12db45be
commit 5c8fb47005
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
inc/arith.h
View File

@@ -174,11 +174,11 @@
return(S_POSITIVE | arg); \
case 0xFFFF0000: \
return(S_NEGATIVE | (0xFFFF & arg)); \
default:{register LispPTR *wordp; \
default:{register LispPTR *fixpp; \
/* arg is FIXP, call createcell */ \
wordp = (LispPTR *) createcell68k(TYPE_FIXP); \
*((int *)wordp) = arg; \
return(LADDR_from_68k(wordp)); \
fixpp = (LispPTR *) createcell68k(TYPE_FIXP); \
*((int *)fixpp) = arg; \
return(LADDR_from_68k(fixpp)); \
} \
}