如何将符号a与字符a进行比较?

时间:2011-03-22 20:06:14

标签: scheme

我有一个包含字母的列表。 当我做(汽车'(a))它给我符号a。 如何将其与角色a进行比较?

我必须这样做(eq?(车清单)(车'(a))?

1 个答案:

答案 0 :(得分:4)

符号和字符是不同类型的数据。幸运的是,Scheme愿意让你几乎转换任何你想要的东西。例如,在Racket中:

#lang racket

;; the symbol a:
'a

;; the character a:
#\a

;; are they equal? no.
(equal? 'a #\a) ;; produces #f

;; converting a character to a symbol:
(define (char->symbol ch)
  (string->symbol (string ch)))

(char->symbol #\a) ;;=> produces 'a

;; converting a symbol to a character
(define (symbol->char sym)
  (match (string->list (symbol->string sym))
    [(list ch) ch]
    [other (error 'symbol->char 
                  "expected a one-character symbol, got: ~s" sym)])) 

(symbol->char 'a) ;; => produces #\a   

尽管如此,如果你正在做家庭作业,那么教练几乎肯定会为你准备一条更容易的道路。