From b92047ed10c4da784c296dfcf09da250b7b637c7 Mon Sep 17 00:00:00 2001
From: Sergey Poznyakoff <gray@gnu.org>
Date: Fri, 11 Nov 2016 18:52:16 +0200
Subject: Bugfix

* src/parser.c (tokdel): Fix amount of memory to move.
* THANKS: Niklas Angebrand
---
 src/parser.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/parser.c b/src/parser.c
index d2832a1..e5114dc 100644
--- a/src/parser.c
+++ b/src/parser.c
@@ -236,7 +236,7 @@ tokdel(int beg, int end)
      if (end >= beg) {
 	  if (end < tos)
 	       memmove(token_stack + beg, token_stack + end + 1,
-		       (end - beg + 1) * sizeof(token_stack[0]));
+		       (tos - end - 1) * sizeof(token_stack[0]));
 	  tos -= (end - beg + 1);
      }
 }
-- 
cgit v1.2.1