still compiling after refactoring field types

hs/RegFiles.hs

@@ -13,6 +13,8 @@
 --  * Counter/Timer Registers for time/cycle counting.
 --  * Hypervisor Registers (HPR) for guest virtualization.
 module RegFiles(
+    RegFileIdx,
+    RegVal(..),
     GPR,
     FPR,
     CSR,
@@ -23,6 +25,12 @@ module RegFiles(
 
 import Clash.Prelude
 import Util((|>))
+import Types(DoubleWord)
+
+type RegFileIdx = Unsigned 5
+data RegVal = Value RegFileIdx DoubleWord
+            | Unpopulated RegFileIdx
+            deriving (Generic, Show, Eq, NFDataX)
 
 type GPR = Vec 32 (Unsigned 64) -- General Purpose Registers
 type FPR = Vec 32 (Unsigned 64) -- Floating Point Registers