fix tiny typo in arith.rkt
in racket guide
This commit is contained in:
parent
2e48112cdb
commit
fbb6ae98b9
|
@ -40,9 +40,9 @@
|
|||
(define op (to-syntax (string->symbol op-str)
|
||||
(+ delta a-len) op-str))
|
||||
(to-syntax (list op a b) delta s)]
|
||||
[else (to-syntax (or (string->number s)
|
||||
(string->symbol s))
|
||||
delta s)]))
|
||||
[_ (to-syntax (or (string->number s)
|
||||
(string->symbol s))
|
||||
delta s)]))
|
||||
|
||||
(unless expr-match
|
||||
(raise-read-error "bad arithmetic syntax"
|
||||
|
|
Loading…
Reference in New Issue
Block a user