classpool: copy field members refs from superclass

[mate.git] / Mate / Types.hs

diff --git a/Mate/Types.hs b/Mate/Types.hs
index 69180847de5bc8f16f6e8c894a42d24bf5c5afd9..130c2932d5b70548c4b3eca5a593965cd2cffe36 100644 (file)
--- a/Mate/Types.hs
+++ b/Mate/Types.hs
@@ -49,7 +49,7 @@ type FieldMap = M.Map B.ByteString Int32
 data ClassInfo = ClassInfo {
   clName :: B.ByteString,
   clFile :: Class Resolved,
-  clField :: Ptr Int32,
+  clFieldBase :: Ptr Int32,
   clFieldMap :: FieldMap }
 
 data MethodInfo = MethodInfo {