无法更新 CLIPS 中的对象，在剪辑中出现编译时错误

Question

 (bind ?existing_total_count (nth$ 2 (send ?INSTANCE ?get-INTS)))
 (send (nth$ 2 (send ?INSTANCE put-INTS)) (+ ?total_count ?existing_total_count))

第一行编译正常，但第二行抛出错误函数发送预期参数 #2 为类型符号

我无法找出问题所在。我正在尝试更新插槽 INTS 中的第二个条目。

Answer 1

CLIPS> 
(defclass A
   (is-a USER)
   (multislot INTS))
CLIPS> (make-instance [a] of A (INTS 1 2 3))
[a]
CLIPS> (send [a] print)
[a] of A
(INTS 1 2 3)
CLIPS> (bind ?INSTANCE [a])
[a]
CLIPS> (bind ?existing_total_count (nth$ 2 (send ?INSTANCE get-INTS)))
2
CLIPS> (bind ?total_count 3)
3
CLIPS> (slot-replace$ ?INSTANCE INTS 2 2 (+ ?total_count ?existing_total_count))
(1 5 3)
CLIPS> (send [a] print)
[a] of A
(INTS 1 5 3)
CLIPS> (bind ?total_count 5)
5
CLIPS> (send ?INSTANCE put-INTS (replace$ (send ?INSTANCE get-INTS) 2 2 (+ ?total_count ?existing_total_count)))
(1 7 3)
CLIPS> (send [a] print)
[a] of A
(INTS 1 7 3)
CLIPS>

无法更新 CLIPS 中的对象，在剪辑中出现编译时错误

cannot update the object in CLIPS, getting compile time error in clips

clips