Commit 8687594f0f116c82ce8cc39f15ea91381a31df0d - cafeobj - Codebase list

Codebase list cafeobj / 8687594

Fixed degraded term memoization in rewriting. tswd 8 years ago

1 changed file(s) with 4 addition(s) and 1 deletion(s). Raw diff Collapse all Expand all

+4

-1

chaos/cafein/rengine.lisp less more

976	976	;; compute the normal form of "term"
977	977	(reduce-term term strategy)
978	978	(setq normal-form term)
	979	#\|
979	980	(unless (= rule-count (number-rewritings))
980	981	(when memo-debug
981	982	(when (term-equational-equal term-nu normal-form)

986	987	(format t "~%(~d) new = " (number-rewritings))
987	988	(term-print-with-sort normal-form))))
988	989	;; store the normal form
989		(set-hashed-term term-nu term-memo-table normal-form))))
	990	(set-hashed-term term-nu term-memo-table normal-form))
	991	\|#
	992	(set-hashed-term term-nu term-memo-table normal-form)))
990	993	normal-form))
991	994
992	995	(defmacro check-closed-world-assumption (?term)