From 0a01dd30e1c36f93f6d554a88b0def66e122a4a5 Mon Sep 17 00:00:00 2001
From: Karol Stasiak <karol.m.stasiak@gmail.com>
Date: Fri, 3 Aug 2018 11:11:03 +0200
Subject: [PATCH] 6502: Fix zeropage register if larger than 2 bytes

---
 src/main/scala/millfork/env/Environment.scala | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/main/scala/millfork/env/Environment.scala b/src/main/scala/millfork/env/Environment.scala
index 71de7dc9..e6bc935a 100644
--- a/src/main/scala/millfork/env/Environment.scala
+++ b/src/main/scala/millfork/env/Environment.scala
@@ -1093,6 +1093,11 @@ class Environment(val parent: Option[Environment], val prefix: String, val cpuFa
   def getSubvariables(typ: Type): List[(String, Int, VariableType)] = {
     val b = get[VariableType]("byte")
     val w = get[VariableType]("word")
+    if (typ.name == "__reg$type") {
+      return (".lo", 0, b) ::
+        (".hi", 1, b) ::
+        List.tabulate(typ.size) { i => (".b" + i, i, b) }
+    }
     typ match {
       case _: PlainType => typ.size match {
         case 2 => List(