From 16853e969d1c77e0dec876b6f8d281d6d3a702bf Mon Sep 17 00:00:00 2001
From: crc <>
Date: Tue, 21 Nov 2023 18:04:53 +0000
Subject: [PATCH] nga-c: remove another no longer needed variable

FossilOrigin-Name: f619915689a54a7fe00c2566e7c9f71dfdca657486b042df9ddc01e91dc4d877
---
 vm/nga-c/retro.c | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/vm/nga-c/retro.c b/vm/nga-c/retro.c
index a6376d6..258292c 100644
--- a/vm/nga-c/retro.c
+++ b/vm/nga-c/retro.c
@@ -640,17 +640,12 @@ void invalid_opcode(NgaState *vm, CELL opcode) {
 }
 
 void execute(NgaState *vm, CELL cell) {
-  CELL token;
   CELL opcode;
   if (ACTIVE.rp == 0)
     ACTIVE.rp = 1;
   ACTIVE.ip = cell;
-  token = TIB;
   while (ACTIVE.ip < IMAGE_SIZE) {
     if (vm->perform_abort == 0) {
-      if (ACTIVE.ip == vm->interpret) {
-        token = TOS;
-      }
       opcode = vm->memory[ACTIVE.ip];
       if (validate_opcode_bundle(opcode) != 0) {
         process_opcode_bundle(vm, opcode);