Racket UTF support

#lang racket
(define (🔊 ❔)
  (cond [ (equal? ❔ '🐱) "ニャー" ]
        [ (equal? ❔ '🐶) "ワン" ]
        [ (equal? ❔ '🐮) "もー" ]
        [ (equal? ❔ '🐭) "チュー" ]
        [ (equal? ❔ '🦊) "コン" ]
        [ (equal? ❔ '🐺) "ワオーン" ]
        [ (equal? ❔ '🐰) "ピョン" ]
        [ (equal? ❔ '🐹) "ガオー" ]
        [ else "鳴く" ]))
(map 🔊 '(🐱 🐶 🐮 🐭 🦊 🐺 🐰 🐹))