Mercurial > repos > tabletprog

view samples/fib.tp @ 204:a8dffa4d4b54

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add support for the rest of the instructions currently defined in the il module in the x86 module
author Mike Pavone <pavone@retrodev.com>
date Wed, 28 Aug 2013 21:50:22 -0700
parents 3a169ebb3224
children
line wrap: on
line source

#{
fib <- :n {
  if: n < 2 {
    1
  } else: {
    (fib: n-1) + (fib: n-2)
  }
}

main <- {
  print: (string: (fib: 30)) . "\n"
}

}