Hi Lucien,

Am 22.06.22 um 14:36 schrieb Lucien Mathay:
> Hello all,
>
> I am back already.  I found a bug similar to the bug reported
> previously with "If...then...else" followed by a comment.
>
> In the present case, the bug concerns a Label "exitfunction" that
> follows a line "if...then Resume" ; here is the code :
>
>    Function EffacerFichier(nom As String, msg As String) As Boolean
>         Dim nb As Long
>       On Error GoTo erreur
>        EffacerFichier = True
>    GoTo exitfunction
>    erreur:
>       nb = nb + 1
>       If nb<3 Then Resume
>    exitfunction:
>    End Function
>
> The error message states : "Label 'exitfunction' undefined.
>
> However when inserting a blank line just before the label
> 'exitfunction', the compiler parses OK.
>
> I tested it on both OO4.1.6 and OO4.1.12, both fail.
>
> Sorry for that,

No need to apologize! ;-)

If the label is recognized with an empty line before, it is clearly a bug.

Since you are on Windows, you might also want to test on my personal
builds of AOO42X:

https://home.apache.org/~mseidel/AOO-builds/AOO-420-Test/Full%20Installation/

Regards,

   Matthias

> Lucien.
>
>
>

Attachment: smime.p7s
Description: S/MIME Cryptographic Signature

Reply via email to