[Gd-chatter] r11015 - trunk/libraries/packetizer

[hannes at gwydiondylan.org]

Author: hannes
Date: Fri Dec  1 03:47:28 2006
New Revision: 11015

Modified:
   trunk/libraries/packetizer/packetizer.dylan
Log:
Bug: 7299
*work around for repeated fields with translated frame-types

Modified: trunk/libraries/packetizer/packetizer.dylan
==============================================================================
--- trunk/libraries/packetizer/packetizer.dylan	(original)
+++ trunk/libraries/packetizer/packetizer.dylan	Fri Dec  1 03:47:28 2006
@@ -692,7 +692,12 @@
 end;
 
 define method get-field-size-aux (frame :: <container-frame>, field :: <repeated-field>)
-  reduce(\+, 0, map(frame-size, field.getter(frame)));
+  //XXX: refactor this whole crap
+  if (field-size(field.type))
+    field-size(field.type) * size(field.getter(frame))
+  else
+    reduce(\+, 0, map(frame-size, field.getter(frame)));
+  end;
 end;
 
 define method get-field-size-aux-aux (frame :: <frame>,