diff options
Diffstat (limited to 'rts/Interpreter.c')
| -rw-r--r-- | rts/Interpreter.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/Interpreter.c b/rts/Interpreter.c index 0e981007a3..7734aacd36 100644 --- a/rts/Interpreter.c +++ b/rts/Interpreter.c @@ -674,7 +674,7 @@ do_apply: // the appropriate info table in the gap. for (i = 0; i < arity; i++) { Sp[(int)i-1] = Sp[i]; - // ^^^^^ careful, i-1 might be negative, but i in unsigned + // ^^^^^ careful, i-1 might be negative, but i is unsigned } Sp[arity-1] = app_ptrs_itbl[n-arity-1]; Sp--; @@ -736,7 +736,7 @@ do_apply: // the appropriate info table in the gap. for (i = 0; i < arity; i++) { Sp[(int)i-1] = Sp[i]; - // ^^^^^ careful, i-1 might be negative, but i in unsigned + // ^^^^^ careful, i-1 might be negative, but i is unsigned } Sp[arity-1] = app_ptrs_itbl[n-arity-1]; Sp--; |