在Common Lisp中使用字符串对象作为哈希键

时间:2009-09-11 05:04:27

标签: hash dictionary lisp common-lisp

我正在尝试创建一个“字典”类型 - 即以字符串作为键的哈希表。这在Lisp中是可行的还是明智的?

我注意到这可以按预期工作:

> (setq table (make-hash-table))
#<HASH-TABLE :TEST EQL size 0/60 #x91AFA46>
> (setf (gethash 1 table) "one")
"one"
> (gethash 1 table)
"one"

但是,以下情况并非如此:

> (setq table (make-hash-table))
#<HASH-TABLE :TEST EQL size 0/60 #x91AFA0E>
> table
#<HASH-TABLE :TEST EQL size 0/60 #x91AFA0E>
> (setf (gethash "one" table) 1)
1
> (gethash "one" table)
NIL
NIL

1 个答案:

答案 0 :(得分:34)

你需要制作使用'相等而不是'eql的哈希表。 'eql不会将具有相同内容的两个字符串评估为't,而'等于。

以下是您的操作方法:

(make-hash-table :test 'equal)

正如skypher所说,如果你想要不区分大小写的字符串哈希,你也可以使用'equalp。