Index: VisualSwapcodes/Unit1.pas
===================================================================
--- VisualSwapcodes/Unit1.pas	(revision 99)
+++ VisualSwapcodes/Unit1.pas	(revision 100)
@@ -212,5 +212,8 @@
 begin
   if Self.name = 'SWAPC_FIXARR_S' then
-    Self.size := Self.size * Self.count
+  begin
+    Self.size := Self.size * Self.count;
+    Self.parent.size := Self.parent.size + Self.size;
+  end
   else
     Self.size := Self.count;