在Scheme中将String转换为整数

Question

如何将一串数字转换为整数？ 我希望将“365”转换为365。

我尝试过的， string-＆gt; list然后char-＆gt;整数，但这会返回该整数的ASCII值，我该如何获得该整数？

请帮忙。

Answer 1

尝试：string->number

> (string->number "1234")
1234

Answer 2

从字符串中解析整数的替代解决方案：

#lang typed/racket

(: numerical-char->integer (-> Char
                               Integer))
(define (numerical-char->integer char)
  (let ([num (- (char->integer char) 48)]) ; 48 = (char->integer #\0)
    (if
     (or (< num 0) (> num 9))
     (raise 'non-numerical-char #t)
     num)))

(: string->integer (-> String
                       Integer))
(define (string->integer str)
  (let ([char-list (string->list str)])
    (if (null? char-list)
        (raise 'empty-string #t)
        (foldl
         (λ([x : Integer] [y : Integer])
           (+ (* y 10) x))
         0
         (map numerical-char->integer char-list)))))