moved char->number to common.scm
This commit is contained in:
@@ -2,10 +2,6 @@
|
||||
|
||||
(load "../common.scm")
|
||||
|
||||
; returns numbers 0 to 9 from ascii character
|
||||
(define (char->number c)
|
||||
(- (char->integer c) 48)) ; 48 is ASCII's number zero
|
||||
|
||||
; returns a number from two characters
|
||||
; ex: '0' and '9' => 9
|
||||
; ' ' and '6' => 6
|
||||
|
||||
Reference in New Issue
Block a user