diff --git a/backends/GenerateC.hs b/backends/GenerateC.hs
index 7f12477..bc991fc 100644
--- a/backends/GenerateC.hs
+++ b/backends/GenerateC.hs
@@ -364,6 +364,7 @@ cgenBytesIn m t v
       = do tell ["sizeof("]
            genType t
            tell [")"]
+    genBytesIn' (A.Mobile t@(A.Array {})) = genBytesIn' t
     genBytesIn' (A.Mobile _)
       = tell ["sizeof(void*)"]
     genBytesIn' (A.List _)