Refining Obelisk's Grammar yet more. Now there is no need for the type terminator #
So the function from last post would now be written.
// An accumulating implementation of the factorial function. Tail recursive.
(Int -> Int)
def factorial x
{
(fact 1 x)
}
where
{
(Int -> Int -> Int)
def fact acc i
{
if (i > 0)
// Recurse
{(fact (i * acc) (i - 1))}
// We've recursed enough. Return.
{acc}
}
}
After so much Haskell Programming, I'm liking the syntax without significant whitespace a lot.
30 July 2010
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment