test/goto.voo

   1 #### Test program for goto
   2
   3 section data
   4 format:
   5 string "%d\x0a\x00"
   6
   7 section functions
   8 import printf
   9 export main
  10
  11 main:
  12 function argc argv
  13     let n 10
  14 lbl:
  15     call printf format n
  16     set n sub n 1
  17     ifgt n 0
  18         goto lbl
  19     end if
  20     return 0
  21 end function