BerndGabriel/HtmlViewer

Compile errors using FPC 3.3.1 / Lazarus

donsiders opened this issue · 1 comments

I found and fixed a couple of errors when using FPC 3.3.1.

diff --recursive -d -w -a -b ../../usr/downloads/lazarus/HtmlViewer/source/HTMLSubs.pas HtmlViewer/source/HTMLSubs.pas
5755c5755
<       else if Self is TTableBlock and not TTableBlock(Self).Table.HeadOrFoot then {ordinary tables}
---
>       else if (Self is TTableBlock) and (not TTableBlock(Self).Table.HeadOrFoot) then {ordinary tables}
diff --recursive -d -w -a -b ../../usr/downloads/lazarus/HtmlViewer/source/htmlview.pas HtmlViewer/source/htmlview.pas
4511c4511
<   else if Sender is TFontObj and not NoJump then
---
>   else if (Sender is TFontObj) and (not NoJump) then

I was hoping you apply and submit an update for OPM.

Thanks in advance.

Don

Good catch Don. I think the brackets are not needed around e.g. (not jump), since "not" strictly applies only to the next symbol, with the highest level of operator precedence, but the other brackets ARE definitely needed!! Thanks and cheers.