Finkel is a statically typed, purely functional, and non-strict-by-default LISP flavored programming language.
Or in other words, Haskell in S-expression.
- Integration with existing Haskell modules.
- Building Haskell-compatible Cabal packages.
- Documentation generation with Haddock.
- Lisp style macro system.
- Tool executable, including interactive REPL.
;;;; File: fib.hs
(:doc "Simple example module to show fibonacci number.
The compiled executable takes an integer argument from command line
input and print the fibonacci number of the argument.")
(defmodule Main
(import
(System.Environment [getArgs])))
(defn (:: main (IO ()))
"The main entry point function."
(>>= getArgs (. print fib read head)))
(defn (:: fib (-> Int Int))
"Naive fibonacci function."
[0] 0
[1] 1
[n] (+ (fib (- n 1))
(fib (- n 2))))$ finkel make -o fib fib.hs
[1 of 1] Compiling Main ( fib.hs, fib.o )
Linking fib
$ ./fib 10
55$ finkel repl
Hit `Ctrl-d' or type ,q to quit, type ,? for help.
> ,load fib.hs
[1 of 1] Compiling Main ( fib.hs, interpreted )
; loaded fib.hs
> ,info fib
fib :: Int -> Int -- Defined at fib.hs:16:11
> (map fib [1 .. 10])
[1,1,2,3,5,8,13,21,34,55]
> (System.Environment.withArgs ["10"] main)
55
> ,qSee the documentation for more details.
Contributions are welcome. Please see the CONTRIBUTING.md.