function sc_multi() {
    var product = 1;
    for (var i = 0; i < arguments.length; i++)
	product *= arguments[i];
    return product;
}
META ((export * *fx *fl)
           (peephole (infix 0 #f "*" "1")))