diff options
| author | Richard M. Stallman | 1996-08-16 19:08:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-08-16 19:08:24 +0000 |
| commit | eb086ca7485319721d1a7c8f2c54a2360fb0eab3 (patch) | |
| tree | 0055bba90c8e0b9575584a4a6ee45a80eb03ba6f /src | |
| parent | da61a64091aa869699b8d1054263bc2c57546a99 (diff) | |
| download | emacs-eb086ca7485319721d1a7c8f2c54a2360fb0eab3.tar.gz emacs-eb086ca7485319721d1a7c8f2c54a2360fb0eab3.zip | |
(Fbyte_code): For relative gotos, force signed arithmetic.
Diffstat (limited to 'src')
| -rw-r--r-- | src/bytecode.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/bytecode.c b/src/bytecode.c index 3221970ccac..4fb6d86bb69 100644 --- a/src/bytecode.c +++ b/src/bytecode.c | |||
| @@ -475,14 +475,14 @@ If the third argument is incorrect, Emacs may crash.") | |||
| 475 | 475 | ||
| 476 | case BRgoto: | 476 | case BRgoto: |
| 477 | QUIT; | 477 | QUIT; |
| 478 | pc += *pc - 127; | 478 | pc += (int) *pc - 127; |
| 479 | break; | 479 | break; |
| 480 | 480 | ||
| 481 | case BRgotoifnil: | 481 | case BRgotoifnil: |
| 482 | if (NILP (POP)) | 482 | if (NILP (POP)) |
| 483 | { | 483 | { |
| 484 | QUIT; | 484 | QUIT; |
| 485 | pc += *pc - 128; | 485 | pc += (int) *pc - 128; |
| 486 | } | 486 | } |
| 487 | pc++; | 487 | pc++; |
| 488 | break; | 488 | break; |
| @@ -491,7 +491,7 @@ If the third argument is incorrect, Emacs may crash.") | |||
| 491 | if (!NILP (POP)) | 491 | if (!NILP (POP)) |
| 492 | { | 492 | { |
| 493 | QUIT; | 493 | QUIT; |
| 494 | pc += *pc - 128; | 494 | pc += (int) *pc - 128; |
| 495 | } | 495 | } |
| 496 | pc++; | 496 | pc++; |
| 497 | break; | 497 | break; |