From 0480fee86c62afda08914c90f959c45ffae2f1d9 Mon Sep 17 00:00:00 2001
From: Bruce Mitchener <bruce.mitchener@gmail.com>
Date: Sat, 30 Jan 2021 13:46:24 +0700
Subject: [PATCH] Move opcode_table into read-only storage. (#322)

---
 src/testtool.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/testtool.c b/src/testtool.c
index a218bcc..cc8975d 100644
--- a/src/testtool.c
+++ b/src/testtool.c
@@ -418,7 +418,8 @@ void dump_fnobj(LispPTR index)
 /************************************************************************/
 
 /* Opcode names, by opcode */
-char *opcode_table[256] = {"-X-",
+static const char *opcode_table[256] = {
+                           "-X-",
                            "CAR",
                            "CDR",
                            "LISTP",