1
0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-28 04:38:00 +00:00

fix signedness issue in N_OP_bind(unused), matching correction made in inlineC.h BIND in 26e67a51

This commit is contained in:
Nick Briggs
2022-12-25 12:37:23 -08:00
parent 5c81ca3f41
commit 960baf9b96
2 changed files with 4 additions and 4 deletions

View File

@@ -29,9 +29,9 @@ N_OP_bind(stack_pointer, tos, n1, n2)
***************************************************/
LispPTR *N_OP_bind(LispPTR *stack_pointer, LispPTR tos, int byte1, int byte2) {
int n1; /* # slots to bind to NIL (0, 0) */
int n2; /* # slots to bind to value in stack */
LispPTR *N_OP_bind(LispPTR *stack_pointer, LispPTR tos, unsigned byte1, unsigned byte2) {
unsigned n1; /* # slots to bind to NIL (0, 0) */
unsigned n2; /* # slots to bind to value in stack */
LispPTR *ppvar; /* pointer to argued slot in Pvar area */
unsigned i; /* temporary for control */