Usage grammar bug

[Marc Dzaebel]

Hi Kris,

following data items are not parsed correctly (Rev:169): ...

   77  REC1  PIC S9(9) VALUE ZERO COMP-4 SYNC.
   01  REC2.

Koopa shows REC2 greyed out. The problem is, that there is no whitespace after the first dot. It works, if there is a space after the dot! When would you have time to fix this issue as otherwise, I'd have to include a precompiler in my tool chain the next days?

Here is the complete reproducible sample:

   IDENTIFICATION DIVISION.                                         
   PROGRAM-ID.           USAGEBUG IS INITIAL PROGRAM.               
   ENVIRONMENT DIVISION.                                            
   CONFIGURATION SECTION.                                           
   SPECIAL-NAMES.                                                   
       DECIMAL-POINT  IS  COMMA.                                    
   DATA DIVISION.                                                   
   WORKING-STORAGE SECTION.                                         
   77  REC1  PIC S9(9) VALUE ZERO COMP-4 SYNC.
   01  REC2.                                                
   PROCEDURE DIVISION.

[KrisDS]

Hey Marc,

Can you check against the latest version ? I tried your example and it parses and highlights correctly (see attached screenshot).

Cheers,

Kris

[Marc Dzaebel]

Ki Kris,

even with the revision 174M, the problem persists. For safety, I attached the source.

Thanks, Marc

[KrisDS]

Yes, that exposed the bug. The fix wasn't too hard, and you can find it in the repo already.

Please let me know if the issue went away with that for you too.

Cheers,

Kris

[Marc Dzaebel]

Whooo, that's high speed! The issue is gone in both, the reduced reproducible UsageBug.cbl and all my original sources.

Thanks for this advanced Christmast present!

Marc

[KrisDS]

:-) You're welcome. :-)