+ /*
+ TODO: this should be handled by side-position padding.
+ */
+ mol = Lookup::blank (Box (Interval (0,0),
+ Interval (0,0)));
+
+ for (int i = gh_scm2int (c); i--;)
+ {
+ d.translate_axis (2*dw,X_AXIS);
+ mol.add_at_edge (X_AXIS, RIGHT, d, dw, 0);
+ }
+ }
+ return mol.smobbed_copy ();