1e79e92 · opencog-atomspace-rocks · pear-git-v3

Overview Files Commits Issues Docs Releases Peers

opencog-atomspace-rocks commits / 1e79e92

Extract is no longer bundled with delete

1e79e920fa0bf1a5333a68490b43fbda509e9e94

by Linas Vepstas <linasvepstas@gmail.com> · 2025-12-08T20:29:43.000Z

Changed files (5) +6 -0

tests/persist/rocks/frame-progressive-test.scm +1 -0

…	…	@@ -49,6 +49,7 @@
49	49	(store-stuff N)
50	50	(cog-set-atomspace! (AtomSpace (cog-atomspace)))
51	51	(cog-delete-recursive! (Concept "bar"))
	52	(cog-extract-recursive! (Concept "bar"))
52	53	(cog-set-atomspace! (AtomSpace (cog-atomspace)))
53	54	(recompute (+ N 3) (- NLOOP 1)))
54	55	)

tests/persist/rocks/value-readd-test.scm +1 -0

…	…	@@ -40,6 +40,7 @@
40	40	; Delete it (which writes to DB),
41	41	; but then restore it (which writes again).
42	42	(cog-delete-recursive! (Concept "foo"))
	43	(cog-extract-recursive! (Concept "foo"))
43	44	(set-cnt! (Concept "foo") (FloatValue 1 0 6))
44	45	(store-atom (ListLink (Concept "foo") (Concept "faa")))
45	46

tests/persist/rocks/value-resave-test.scm +1 -0

…	…	@@ -40,6 +40,7 @@
40	40	; Delete it (which writes to DB),
41	41	; but then restore it (which writes again).
42	42	(cog-delete-recursive! (Concept "foo"))
	43	(cog-extract-recursive! (Concept "foo"))
43	44	(set-cnt! (Concept "foo") (FloatValue 1 0 6))
44	45	(store-atom (Concept "foo"))
45	46

tests/persist/rocks/value-reval-test.scm +1 -0

…	…	@@ -41,6 +41,7 @@
41	41	; but then restore it (which writes again).
42	42	; But it has no values. Next, write an explicit value.
43	43	(cog-delete-recursive! (Concept "foo"))
	44	(cog-extract-recursive! (Concept "foo"))
44	45	(store-atom (Concept "foo"))
45	46	(set-cnt! (Concept "foo") (FloatValue 1 0 6))
46	47	(store-value (Concept "foo") (Predicate "kayfabe"))

tests/persist/rocks/valueless-test.scm +2 -0

…	…	@@ -38,9 +38,11 @@
38	38
39	39	(cog-set-atomspace! mid2-space)
40	40	(cog-delete! (Concept "even"))
	41	(cog-extract! (Concept "even"))
41	42
42	43	(cog-set-atomspace! mid3-space)
43	44	(cog-delete! (Concept "odd"))
	45	(cog-extract! (Concept "odd"))
44	46
45	47	(cog-set-atomspace! mid4-space)
46	48	(store-atom (Concept "even"))