apps/ex8.mu

   1 # Demo of floating-point support.
   2 #
   3 # To build a disk image:
   4 #   ./translate apps/ex8.mu        # emits code.img
   5 # To run:
   6 #   qemu-system-i386 code.img
   7 # You shouldn't see any exceptions.
   8
   9 fn main screen: (addr screen), keyboard: (addr keyboard), data-disk: (addr disk) {
  10   var n/eax: int <- copy 0
  11   var result/xmm0: float <- convert n
  12 }