在 common lisp 中为哈希表自动生成键

Question

我想生成可以跨多个哈希表使用的顺序键。我会称它们为 'id1'、'id2' 等。如果 ht 是我的哈希表，那么我想将字符串中的符号作为键。要将条目添加到哈希表中，我想这样做：

(setf (gethash (make-symbol "id1") ht) 1)

然后用

再次访问它

(gethash 'id1 ht)

我不认为 make-symbol 给了我我想要的东西，并且密钥 'id1' 没有被识别。

制作这把钥匙的最佳方法是什么？

Answer 1

错误：符号应该在一个包中并且需要正确的大小写

在你的情况下，我们有：

CL-USER 24 > (symbol-name (make-symbol "id0"))
"id0"

CL-USER 25 > (symbol-package (make-symbol "id0"))
NIL

请确保您考虑以下事项：

• 在包中实习符号
• 在正确的包中实习符号
• 确保符号名称正确且大小写正确
• 用您打算使用的大小写写符号，可能需要转义符号以保留大小写

示例：

大写符号和小写符号名称 -> 不是 eq

CL-USER 26 > (eq 'id0 (intern "id0" "CL-USER"))
NIL

大写符号和大写符号名->是eq

CL-USER 27 > (eq 'id0 (intern "ID0" "CL-USER"))
T

转义&小写符号和小写符号名称 -> 是 eq

CL-USER 28 > (eq '|id0| (intern "id0" "CL-USER"))
T

Answer 2

make-symbol 创建非驻留符号。这意味着您每次都会有一个独特的符号。要获取实习符号，请改用intern。