Re: [Tiny-cobol-users] [Fwd: Re: Sample for testing "backwards" perform thru (fwd)]

[David E. <de...@us...>]

David Essex wrote:
> Bill Gunshannon wrote:
> ... 
>> Not sure if you (or anyone over here) are in a position to look
>> at this or even care, but I gleaned this from comp.lang.cobol.
> 
> Thanks for the information Bill.
> 
> Unfortunately, there is no easy fix for this problem, as it would
> require some sort of a syntax tree. And TC does not use a syntax tree.
> 
> Actually, a lack of a syntax tree creates all sort of problems.
> 
> Frankly, I don't have the time, or inclination, to FIX this problem.

I have found a quick and easy fix which seams to work without any 
apparent problems.

I have uploaded this fix to SF CVS, version 0.64.3.

Sample program:
Program-ID. PERFTHRU.
Procedure Division.
Mainline.
  Display "In Mainline"
  Perform Para3 Thru Para1
  Display "After Perform"
  Stop Run.
Para1.
  Display "In para1".
Para2.
  Display "In Para2".
Para3.
  Display "In para3".
Para4.
  Display "In para4".
Alternate-End.
  Stop Run.

TC version 0.64:
In Mainline
In para3
After Perform

TC version 0.64.3:
In Mainline
In para3
In para4