function sc_string2integer(s, radix) {
    if (!radix) return +s;
    return parseInt(s, radix);
}
META ((export #t)
           (peephole (prefix "+" s)))
           ;; peephole will only apply if no radix is given.