- SCM commands = scm_list_n (ly_symbol2scm ("moveto"),
- scm_from_double (top_curve.control_[0][X_AXIS]),
- scm_from_double (top_curve.control_[0][Y_AXIS]),
- ly_symbol2scm ("curveto"),
- scm_from_double (top_curve.control_[1][X_AXIS]),
- scm_from_double (top_curve.control_[1][Y_AXIS]),
- scm_from_double (top_curve.control_[2][X_AXIS]),
- scm_from_double (top_curve.control_[2][Y_AXIS]),
- scm_from_double (top_curve.control_[3][X_AXIS]),
- scm_from_double (top_curve.control_[3][Y_AXIS]),
- ly_symbol2scm ("curveto"),
- scm_from_double (bottom_curve.control_[2][X_AXIS]),
- scm_from_double (bottom_curve.control_[2][Y_AXIS]),
- scm_from_double (bottom_curve.control_[1][X_AXIS]),
- scm_from_double (bottom_curve.control_[1][Y_AXIS]),
- scm_from_double (bottom_curve.control_[0][X_AXIS]),
- scm_from_double (bottom_curve.control_[0][Y_AXIS]),
- ly_symbol2scm ("closepath"),
- SCM_UNDEFINED);
+ SCM commands = scm_list_n (ly_symbol2scm ("moveto"),
+ scm_from_double (top_curve.control_[0][X_AXIS]),
+ scm_from_double (top_curve.control_[0][Y_AXIS]),
+ ly_symbol2scm ("curveto"),
+ scm_from_double (top_curve.control_[1][X_AXIS]),
+ scm_from_double (top_curve.control_[1][Y_AXIS]),
+ scm_from_double (top_curve.control_[2][X_AXIS]),
+ scm_from_double (top_curve.control_[2][Y_AXIS]),
+ scm_from_double (top_curve.control_[3][X_AXIS]),
+ scm_from_double (top_curve.control_[3][Y_AXIS]),
+ ly_symbol2scm ("lineto"),
+ scm_from_double (bottom_curve.control_[3][X_AXIS]),
+ scm_from_double (bottom_curve.control_[3][Y_AXIS]),
+ ly_symbol2scm ("curveto"),
+ scm_from_double (bottom_curve.control_[2][X_AXIS]),
+ scm_from_double (bottom_curve.control_[2][Y_AXIS]),
+ scm_from_double (bottom_curve.control_[1][X_AXIS]),
+ scm_from_double (bottom_curve.control_[1][Y_AXIS]),
+ scm_from_double (bottom_curve.control_[0][X_AXIS]),
+ scm_from_double (bottom_curve.control_[0][Y_AXIS]),
+ ly_symbol2scm ("closepath"),
+ SCM_UNDEFINED);