[Gambas-user] Statement separator in Gambas

[Szilard]

Is there another way to terminate a statement in Gambas, other than end 
of line? Visual basic and other classic basics support the : colon 
separator,
while C supports ; and ignores end of line. Is there a way I can put 
more than 1 short statement on a single line - I think it makes the code 
more readable:

For instance:

 IF BTst(datax[2], 0) THEN d2$ = d2$ & "MIN"
 IF BTst(datax[2], 1) THEN d2$ = d2$ & "REL"
 IF BTst(datax[2], 2) THEN d2$ = d2$ & "hFE"
 IF BTst(datax[2], 3) THEN d2$ = d2$ & "%"
 IF BTst(datax[2], 4) THEN d2$ = d2$ & "S"
 IF BTst(datax[2], 5) THEN d2$ = d2$ & "dBm"
 IF BTst(datax[2], 6) THEN d2$ = d2$ & "n" :  curexponent=-9 :  ENDIF
 IF BTst(datax[2], 7) THEN d2$ = d2$ & "u" :  curexponent=-6 :  ENDIF


 IF BTst(datax[1], 0) THEN d2$ = d2$ & "m":  curexponent = -3 : ENDIF
 IF BTst(datax[1], 1) THEN d2$ = d2$ & "V"
 IF BTst(datax[1], 2) THEN d2$ = d2$ & "A"
 IF BTst(datax[1], 3) THEN d2$ = d2$ & "F"
 IF BTst(datax[1], 4) THEN d2$ = d2$ & "M":  curexponent=6 :  ENDIF
 IF BTst(datax[1], 5) THEN d2$ = d2$ & "K":  curexponent=3 :  ENDIF
 IF BTst(datax[1], 6) THEN d2$ = d2$ & "Ohm"
 IF BTst(datax[1], 7) THEN d2$ = d2$ & "Hz"



compared to:

 IF BTst(datax[2], 0) THEN d2$ = d2$ & "MIN"
 IF BTst(datax[2], 1) THEN d2$ = d2$ & "REL"
 IF BTst(datax[2], 2) THEN d2$ = d2$ & "hFE"
 IF BTst(datax[2], 3) THEN d2$ = d2$ & "%"
 IF BTst(datax[2], 4) THEN d2$ = d2$ & "S"
 IF BTst(datax[2], 5) THEN d2$ = d2$ & "dBm"
 IF BTst(datax[2], 6) THEN
        d2$ = d2$ & "n"  
        curexponent=-9  
 END IF
 IF BTst(datax[2], 7) THEN
        d2$ = d2$ & "u"
        curexponent=-6
 ENDIF


 IF BTst(datax[1], 0) THEN
        d2$ = d2$ & "m"
        curexponent = -3
 ENDIF
 IF BTst(datax[1], 1) THEN d2$ = d2$ & "V"
 IF BTst(datax[1], 2) THEN d2$ = d2$ & "A"
 IF BTst(datax[1], 3) THEN d2$ = d2$ & "F"
 IF BTst(datax[1], 4) THEN
        d2$ = d2$ & "M"
        curexponent=6
 ENDIF
 IF BTst(datax[1], 5) THEN
        d2$ = d2$ & "K"
        curexponent=3
 ENDIF
 IF BTst(datax[1], 6) THEN d2$ = d2$ & "Ohm"
 IF BTst(datax[1], 7) THEN d2$ = d2$ & "Hz"















Also


SELECT CASE datax[i]
        CASE &HD7: d1$ = "0"
        CASE &H50: d1$ = "1"
        CASE &HB5: d1$ = "2"
        CASE &HF1: d1$ = "3"
        CASE &H72: d1$ = "4"
        CASE &HE3: d1$ = "5"
        CASE &HE7: d1$ = "6"
        CASE &H51: d1$ = "7"
        CASE &HF7: d1$ = "8"
        CASE &HF3: d1$ = "9"
        CASE &H87: d1$ = " C"
        CASE &H27: d1$ = " F"
        CASE &H37: d1$ = "P"
        CASE &HA7: d1$ = "E"
        CASE &H64: d1$ = "n"
       
        CASE ELSE: d1$ = " "
END SELECT


compared to


SELECT CASE datax[i]
        CASE &HD7
          d1$ = "0"
        CASE &H50
          d1$ = "1"
        CASE &HB5
          d1$ = "2"
        CASE &HF1
          d1$ = "3"
        CASE &H72
          d1$ = "4"
        CASE &HE3
          d1$ = "5"
        CASE &HE7
          d1$ = "6"
        CASE &H51
          d1$ = "7"
        CASE &HF7
          d1$ = "8"
        CASE &HF3
          d1$ = "9"
        CASE &H87
          d1$=" C"
        CASE &H27
          d1$=" F"
        CASE &H37
          d1$="P"
        CASE &HA7
          d1$="E"
        CASE &H64
          d1$="n"
        CASE ELSE
          d1$=" "
END SELECT