From f8fe128b46ad65b185a49247e2f5513ccd8f19a9 Mon Sep 17 00:00:00 2001
From: Yuxiao Mao <yuxiao.mao@outlook.com>
Date: Tue, 23 Jul 2024 11:44:19 +0200
Subject: [PATCH] Allow array access byte in hl.Bytes

---
 hld/Eval.hx | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/hld/Eval.hx b/hld/Eval.hx
index d0a83f5..7e42ea7 100644
--- a/hld/Eval.hx
+++ b/hld/Eval.hx
@@ -223,6 +223,9 @@ class Eval {
 			case VBytes(len, read, _):
 				var i = toInt(i);
 				return i < 0 || i >= len ? { v : VUndef, t : HUi8 } : { v : VInt(read(i)), t : HUi8 };
+			case VString(_, p) if( v.t.match(HBytes) ):
+				var i = toInt(i);
+				return i < 0 ? { v : VUndef, t : HUi8 } : { v : VInt(readByte(p.offset(i))), t : HUi8 };
 			default:
 			}
 			throw "Can't access " + valueStr(v) + "[" + valueStr(i) + "]";