Remove debugging statement

This commit is contained in:
Christopher Lam 2020-11-15 18:37:17 +08:00
parent 3e2be271fc
commit ea78fa5516

View File

@ -410,7 +410,6 @@
#\, #\.)) #\, #\.))
((integer) filtered-string))) ((integer) filtered-string)))
(num (or (string->number (string-append "#e" read-string)) 0))) (num (or (string->number (string-append "#e" read-string)) 0)))
(pk value-string has-minus? filtered-string read-string num)
(if has-minus? (- num) num))) (if has-minus? (- num) num)))
;; input: list of numstrings eg "10.50" "20.54" ;; input: list of numstrings eg "10.50" "20.54"