X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=mate.git;a=blobdiff_plain;f=Mate%2FTypes.hs;h=1f67aa6844cdedfeb69977f988407066af9c5dcb;hp=1978bb38fe3d8564b4ce87d2868015916239eaad;hb=03ddf0056a8ebae7ce10d694bbf906c276677a33;hpb=bc05c4601a08bc81f459b98ac54575fd4b56fb48

diff --git a/Mate/Types.hs b/Mate/Types.hs
index 1978bb3..1f67aa6 100644
--- a/Mate/Types.hs
+++ b/Mate/Types.hs
@@ -28,7 +28,8 @@ type MapBB = M.Map BlockID BasicBlock
 data RawMethod = RawMethod {
   rawMapBB :: MapBB,
   rawLocals :: Int,
-  rawStackSize :: Int }
+  rawStackSize :: Int,
+  rawArgCount :: Word32 }
 
 
 -- Word32 = point of method call in generated code