All pastes #931201 Raw Edit

Stuff

public text v1 · immutable
·published 2008-03-07 00:43 UTC
rendered paste body
(defun atoi (input, base)
  ((if ((empty? input) 0)
       (add (accum (* base (last input))
            (atoi (input minus the last char) (* base 10))...)