Skip to main content
Hi rocket-mvbasic team,

Thank you for your great job. 

I'll put a feed back about a syntax which is not recognized by the language server' which have two troubles : 
1/ the formatter makes bad indent 
2/ the problems view report errors 

here is the sample I'm used to code . 
     open 'accumulator' to F.accumulator else stop
     open 'datafile' to F.datafile else stop
     //* take the next accumulator 
     readu accumulator from F.accumulator, 'accu1' else accumulator = 1
     loop while read dummy from F.datafile,accumulator do accumulator+=1 repeat 
     write accumulator on F.accumulator, 'accu1'
     //* loop on all record of a file
     select F.datafile to s
     loop while readnext k from s do
          read record from F.datafile, k else continue
          * ...
     repeat
​

here is the trouble, the system return / format

it seems, the system do not know we can use then/else statemens

------------------------------
Manu Fernandes
------------------------------
Hi rocket-mvbasic team,

Thank you for your great job. 

I'll put a feed back about a syntax which is not recognized by the language server' which have two troubles : 
1/ the formatter makes bad indent 
2/ the problems view report errors 

here is the sample I'm used to code . 
     open 'accumulator' to F.accumulator else stop
     open 'datafile' to F.datafile else stop
     //* take the next accumulator 
     readu accumulator from F.accumulator, 'accu1' else accumulator = 1
     loop while read dummy from F.datafile,accumulator do accumulator+=1 repeat 
     write accumulator on F.accumulator, 'accu1'
     //* loop on all record of a file
     select F.datafile to s
     loop while readnext k from s do
          read record from F.datafile, k else continue
          * ...
     repeat
​

here is the trouble, the system return / format

it seems, the system do not know we can use then/else statemens

------------------------------
Manu Fernandes
------------------------------
Manu,
Good find. I have logged an engineering ticket with reference MVVS-446

Thank you.

------------------------------
Christian Bristow
TSE
Rocket Software Inc
Waltham MA United States
------------------------------