add two structs for OP_TRANS

Originally, the op_pv of an OP_TRANS op pointed to a 256-slot array of
shorts, which contained the translations. However, in the presence of
tr///c, extra information needs to be stored to handle utf8 strings.
The 256 slot array was extended, with slot 0x100 holding a length,
and slots 0x101 holding some extra chars.

This has made things a bit messy, so this commit adds two structs,
one being an array of 256 shorts, and the other being the same but with
some extra fields. So for example tbl->[0x100] has been replaced with
tbl->excess_len.

This commit should make no functional difference, but will allow us
shortly to fix a bug by changing the type of the excess_len field from
short to something bigger, for example.

1 files changed, 17 insertions, 0 deletions

diff --git a/op.h b/op.h
index eb62c946fc..aeee339c14 100644
--- a/op.h
+++ b/op.h
@@ -627,6 +627,23 @@ typedef enum {
 #define ref(o, type) doref(o, type, TRUE)
 #endif
 
+
+/* basic and extended translation tables attached to OP_TRANS/OP_TRANSR ops */
+
+typedef struct {
+    short map[256];
+} OPtrans_map;
+
+/* used in the presence of tr///c to record any replacement chars that
+ * are paired with the implicit 0x100..0x7fffffff search chars */
+typedef struct {
+    short map[256];
+    short excess_len; /* number of entries in map_ex[] */
+    short repeat_char;
+    short map_ex[1];  /* Unwarranted chumminess */
+} OPtrans_map_ex;
+
+
 /*
 =head1 Optree Manipulation Functions