September 2017 Update

2017-09-23 10:01:46 +02:00 · 2017-09-23 10:01:46 +02:00 · ba8067c3b7
commit ba8067c3b7
parent bba7bfd280
14570 changed files with 153136 additions and 63871 deletions
--- a/Task/Arithmetic-evaluation/Racket/arithmetic-evaluation.rkt
+++ b/Task/Arithmetic-evaluation/Racket/arithmetic-evaluation.rkt
@ -12,7 +12,7 @@
         [(~or "+" "-" "*" "/") (string->symbol lexeme)]
         ["(" 'OPEN]
         [")" 'CLOSE]
-         [(~: (~+ numeric) (~? #\. (~* numeric)))
+         [(~: (~+ numeric) (~? (~: #\. (~* numeric))))
          (token-NUM (string->number lexeme))]))

 (define parse