I think I get the ObjFun part in:
(de dbMap (ObjFun TreeFun)
(default ObjFun quote TreeFun quote)
(finally (mark 0)
(_dbMap *DB)
(dbMapT *DB) ) )
But what about the TreeFun?
Pretend I want to loop through all +FeedTags:
(class +FeedTag +Entity) #
(rel user (+Ref +Link) NIL
Hi Henrik,
I think I get the ObjFun part in:
(de dbMap (ObjFun TreeFun)
(default ObjFun quote TreeFun quote)
(finally (mark 0)
(_dbMap *DB)
(dbMapT *DB) ) )
But what about the TreeFun?
If you pass a 'TreeFun' argument, it should be a function that accepts a
tree.
On further inspection I noticed that it happened when accessing random
articles which could be fetched from any time period, including the
very beginning when corruptions could have arisen. At first I thought
it was new but that does not have to be the case.
I wiped everything and switched to
Hi Henrik,
I wiped everything and switched to 64bit, clean slate.
How would it be possible to walk through all relations in all classes
and delete objects referencing missing objects without breaking in the
process?
You mean, to repair the broken state (because otherwise missing objects
On Mon, Nov 21, 2011 at 08:05:13AM +0100, Alexander Burger wrote:
(dbMap '((Obj) (unless (ext? Obj) .. something is wrong ..)))
Of course, this is only half the cake. It won't detect situations where
a referred object was deleted and a new object created meanwhile
(possibly of another type).
Hi Henrik,
# ./p projects/rss-reader/main.l -go
!? (val Node)
{I-4FSO} -- Bad ID
This is definitely a corrupt database. Some index tree refers to an
object {I-4FSO}, but this is no legal object. Either it is deleted, or
it is not a header block (i.e. the ID points to some other node in the
