RosettaCodeData/Task/Character-codes/Racket/character-codes.rkt
Ingy döt Net 6f050a029e update
2013-06-05 21:47:54 +00:00

11 lines
242 B
Racket

#lang racket
(define (code ch)
(printf "The unicode number for ~s is ~a\n" ch (char->integer ch)))
(code #\a)
(code #\λ)
(define (char n)
(printf "The unicode number ~a is the character ~s\n" n (integer->char n)))
(char 97)
(char 955)