On 02/22/12 18:01, Mattias Gaertner wrote:
> On Wed, 22 Feb 2012 12:06:08 -0500
> I tried with only 500 files and it worked. That means I get a help and
> it finds files. But choosing a page just shows black. And after that
> any page is black.
> Note: If I don't use the search but the Index, then I see the pages.
>
> I compiled the chm units with -Criot and found various range check
> errors and uninitialized variables which I can fix myself. But then I
> came to a point where don't know what to do:
>
> chmfiftimain.pas(361,49) Warning: Constructing a class "TLeafNode" with
> abstract method "ChildIsFull"
> chmfiftimain.pas(72,15) Hint: Found abstract method:
> TFIftiNode.ChildIsFull(<TFIftiNode>,AnsiString,LongWord);
>
> And I get an exception in:
> #5 0x00000000005552aa in CHILDISFULL (this=0x415906,
> AWORD=0x409d0c
> "\311\303f\220H\203\354(H\211\\$\bL\211d$\020L\211l$\030L\211t$
> I\211\376I\211\365f\211\323L\211\350H\203", <incomplete sequence \370>,
> ANODEOFFSET=8234056) at chmfiftimain.pas:688
> #6 0x00000000005552aa in CHILDISFULL (this=0x7fffdd9a0b40, AWORD=0x0,
> ANODEOFFSET=3579960) at chmfiftimain.pas:688
>
>
Not sure about this exception but I found an error in TLeafNode.AddWord.
It could possibly cause memory corruption and cause your error....
Replace the line
FBlockStream.Write(NewWord[1], Length(Trim(NewWord)));
with
if Length(NewWord) > 0 then
FBlockStream.Write(NewWord[1], Length(Trim(NewWord)));
The same word can exists twice, once for title results and once for body
results. NewWord is the difference between the last word and the new
word. So it's length could be 0.
I compiled a chm using the lcl html docs in a folder. Compiled with
-Criot I am able to build it with a search index with no exceptions.
Andrew
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
