In the parsing process, the check for invalid data on the end of the clause
happens first. The search for the matching control structure doesn't happen
until a correctly formed instruction is available.

Rick

On Mon, Jul 25, 2022 at 8:58 AM Mike Cowlishaw <[email protected]> wrote:

> Well, Walter, if you knew what the problem was ...
>
> It seems perfectly reasonable to be for the interpreter to treat 'call'
> there as the name of a control variable (as that's all that is allowed
> there).  But in this case I suppose "loop has no control variable but one
> is specified" might be more accurate -- but perhaps is just as confusing?
>
> Mike
>
>
>
>
> ------------------------------
> *From:* WalterPachl via Oorexx-devel [mailto:
> [email protected]]
> *Sent:* 25 July 2022 11:47
> *To:* Open Object Rexx Developer Mailing List
> *Cc:* WalterPachl
> *Subject:* Re: [Oorexx-devel] suboptimal error diagnostic
>
> *I know what the problem is:* the comma after the End.
> I consider your diagnostic no better. There is no control variable.
> Anyway: the diagnostic in context is what I consider suboptimal!
> See my first posting on that matter
> Thanks anyway
> Walter
>
> Rick McGuire <[email protected]> hat am 25.07.2022 12:03 geschrieben:
>
>
> I get a different result on the current build,
>
>     29 *-* End ,Call lineout oid
>      1 *-* call merge
> Error 21 running E:\ORexxDev\builds\oorexx\merge.rex line 29:  Invalid
> data on end of clause.
> Error 21.909:  Data must not follow the END control variable name; found
> "LINEOUT".
>
> you do have a dangling continuation character after the END.
>
> Rick
>
> On Mon, Jul 25, 2022 at 5:55 AM WalterPachl via Oorexx-devel <
> [email protected]> wrote:
>
> H:\_tri>rexx merge
> REXX-ooRexx_5.0.0(MT)_64-bit 6.05 21 Apr 2022
> H:\_tri\.html konnte nicht gefunden werden
> H:\_tri>rexx merge
> 29 *-* End ,Call lineout oid
> Error 21 running H:\_tri\merge.rex line 29: Invalid data on end of clause.
> Error 21.909: Data must not follow the END control variable name; found
> "LINEOUT".
>
> Parse Arg pn
> Parse Var pn name '_'
> frame='7.html'
> data=name'_html.data'
> oid=name'.html'; 'erase' oid
> Do While lines(data)>0
> dl=linein(data)
> Do While lines(frame)>0
> fl=linein(frame)
> If left(fl,4)='<img' Then Do
> Parse Var fl aaa "'" p "." bbb
> Call o aaa"'"pn"."bbb
> Iterate
> End
> If left(fl,2)=left(dl,2) Then Do
> Call o dl'<br>'
> Leave
> End
> call o fl
> End
> End
> Do While lines(frame)>0
> fl=linein(frame)
> If left(fl,4)='<p>D' Then Do
> Parse Var fl aaa ':'
> fl=aaa':' date() time()
> End
> call o fl
> End ,
> Call lineout oid
> Exit
> o: Return lineout(oid,arg(1))
>
> Rick McGuire <[email protected]> hat am 25.07.2022 11:22 geschrieben:
>
>
> Without being able to see merge.rex, it's pretty much impossible to give
> you an answer. Also, which version of oorexx are you using?
>
> Rick
>
> On Mon, Jul 25, 2022 at 2:28 AM WalterPachl via Oorexx-devel <
> [email protected]> wrote:
>
> A phenomenon:
> A rather large program of mine ends as follows:
>
> H:\_tri>rexx trid test
> Syntax raised in line 219
> Call merge pn
> rc=21 (Invalid data on end of clause.)
>
> The problem lies in merge.rex as shown by this snippet:
>
> H:\_tri>rexx good
> We call bad
> 27 *-* End , call o fl
> 2 *-* Call merge
> Error 21 running H:\_tri\merge.rex line 27: Invalid data on end of clause.
> Error 21.909: Data must not follow the END control variable name; found
> "O".
>
> Any idea?
> Regards
> Walter
>
> PS There is no "END control variable name" in merge.rex
> _______________________________________________
> Oorexx-devel mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>
> _______________________________________________
> Oorexx-devel mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>
>
>
> _______________________________________________
> Oorexx-devel mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>
> _______________________________________________
> Oorexx-devel mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>
>
> LG
>
> Walter
>
> _______________________________________________
> Oorexx-devel mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>
_______________________________________________
Oorexx-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/oorexx-devel

Reply via email to