Scheme 模块中的方案未绑定标识符错误:symbol<;?
代码中的下一行给出了一个未绑定标识符错误Scheme 模块中的方案未绑定标识符错误:symbol<;?,scheme,Scheme,代码中的下一行给出了一个未绑定标识符错误 ((symbol<? x (car l)) #f) ((symbol没有符号没有符号符号符号符号如何将其转换为字符串。符号如何将其转换为字符串。 ; tests membership in ordered list of symbols (define (member? x l) (cond ((null? l) #f) ((symbol=? x (car l)) #t) ((symbol<? x (car l))
((symbol<? x (car l)) #f)
((symbol没有符号没有符号符号符号符号如何将其转换为字符串。符号如何将其转换为字符串。
; tests membership in ordered list of symbols
(define (member? x l)
(cond
((null? l) #f)
((symbol=? x (car l)) #t)
((symbol<? x (car l)) #f)
(else (member? x (cdr l)))))
(define (symbol<? s1 s2)
(string<? (symbol->string s1)
(symbol->string s2)))
(define (symbol<? a b)
(string<? (symbol->string a)
(symbol->string b)))