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

fix warning: result of the left shift is undefined because the left operand is negative (#91)

Browse Source 
There is no functional difference between the old and new code, but we avoid
complaints from code analysis tools such as clang-tidy
This commit is contained in:
Nick Briggs 2020-12-17 08:25:27 -08:00 committed by GitHub
parent fe0f9fff2c
commit 26e67a513e
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
inc/inlineC.h
View File

@ -399,8 +399,8 @@ register char *buff68k; /* pointer to BUFF */ \
}
#define BIND {register int byte = Get_BYTE_PCMAC1; \
register int n1; \
register int n2; \
register unsigned n1; \
register unsigned n2; \
register LispPTR *ppvar; \
register int i; \
n1 = byte >> 4; \
@ -413,8 +413,7 @@ register char *buff68k; /* pointer to BUFF */ \
*--ppvar = TOPOFSTACK; \
for(i=1; i<n2; i++) { *--ppvar = *(--CSTKPTRL); } \
} \
i = ~(n1 + n2); \
TOPOFSTACK = (i<<16) | (Get_BYTE_PCMAC2<<1); \
TOPOFSTACK = ((~(n1 + n2))<<16) | (Get_BYTE_PCMAC2<<1); \
nextop3; \
}