去引用SICStus Prolog 手册 https://sicstus.sics.se/sicstus/docs/3.12.9/html/sicstus/Occur.html:
逻辑编程背后的通常数学理论禁止
创建循环项,规定发生检查应该是
每次将变量与术语统一时完成。不幸的是,一个
发生检查会非常昂贵使 Prolog 变得不切实际作为
一种编程语言。
然而,我跑了这些基准 https://github.com/LogtalkDotOrg/logtalk3/tree/master/examples/bench(Prolog 的),并且在 SWI Prolog 中发生检查 (OC) 开启和关闭之间存在相当小的差异(小于 20%):
超频关闭::- set_prolog_flag(occurs_check, false).
in .swiplrc
(重新启动)
?- run_interleaved(10).
% 768,486,984 inferences, 91.483 CPU in 91.483 seconds (100% CPU, 8400298 Lips)
true.
?- run(1).
'Program' Time GC
================================
boyer 0.453 0.059
browse 0.395 0.000
chat_parser 0.693 0.000
crypt 0.481 0.000
fast_mu 0.628 0.000
flatten 0.584 0.000
meta_qsort 0.457 0.000
mu 0.523 0.000
nreverse 0.406 0.000
poly_10 0.512 0.000
prover 0.625 0.000
qsort 0.574 0.000
queens_8 0.473 0.000
query 0.494 0.000
reducer 0.595 0.000
sendmore 0.619 0.000
simple_analyzer 0.620 0.000
tak 0.486 0.000
zebra 0.529 0.000
average 0.534 0.003
true.
OC 已开启::- set_prolog_flag(occurs_check, true).
in .swiplrc
(重新启动)
?- run_interleaved(10).
% 853,189,814 inferences, 105.545 CPU in 105.580 seconds (100% CPU, 8083669 Lips)
true.
?- run(1).
'Program' Time GC
================================
boyer 0.572 0.060
browse 0.618 0.000
chat_parser 0.753 0.000
crypt 0.480 0.000
fast_mu 0.684 0.000
flatten 0.767 0.000
meta_qsort 0.659 0.000
mu 0.607 0.000
nreverse 0.547 0.000
poly_10 0.541 0.000
prover 0.705 0.000
qsort 0.660 0.000
queens_8 0.491 0.000
query 0.492 0.000
reducer 0.867 0.000
sendmore 0.629 0.000
simple_analyzer 0.757 0.000
tak 0.550 0.000
zebra 0.663 0.000
average 0.634 0.003
true.
这些基准测试不能代表现实世界的使用情况吗? (我记得在某处读到,它们被专门选择为“相当有代表性”)SWI Prolog 是否实施了一些 SICStus 人员不知道的优化技巧,从而使 OC 的成本较小?如果有,它们是否已出版? (我找到了很多90年代关于这个问题的论文,但我不知道它们是否是最先进的)