test/bitwise.voo

   1 #### Test bitwise operators
   2
   3 section data
   4 format:
   5 string "%08x\n\x00"
   6
   7 section functions
   8 import printf
   9 export main
  10
  11 main:
  12 function argc argv
  13     let oddbits 1431655765
  14     let evenbits 2863311530
  15
  16     let x not 0
  17     call printf format x
  18     set x xor x 1431655765
  19     call printf format x
  20     set x xor x evenbits
  21     call printf format x
  22
  23     let y or x oddbits
  24     call printf format y
  25     set y or y 2863311530
  26     call printf format y
  27
  28     set x and y 2863311530
  29     call printf format x
  30     set x and -1 1431655765
  31     call printf format x
  32
  33     return 0
  34 end function