Listing 3. sc_forward_row

XS(sc_forward_row)
{
 dXSARGS;
 if(items != 1) {
  XSRETURN_IV(1);
 }
 forwrow(SvIV(ST(0)));
}