finkel

by finkel-lang

finkel-lang / finkel

Haskell in S-expression

143 Stars 1 Forks Last release: Not found BSD 3-Clause "New" or "Revised" License 1.0K Commits 0 Releases

Available items

No Items, yet!

The developer of this repository has not created any items for sale yet. Need a bug fixed? Help with integration? A different license? Create a request here:

Finkel

Travis Documentation Codecov

Finkel is a statically typed, purely functional, non-strict-by-default dialect of the Lisp programming language.

Or in other words, Haskell in S-expression.

Features

  • Integration with existing Haskell modules.
  • Building Haskell-compatible Cabal packages.
  • Documentation generation with Haddock.
  • Lisp style macro system.
  • Tool executable, including interactive REPL.

Sample code

;;;; File: fib.fnk

(: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))))

Compiling an executable

$ finkel make -o fib fib.fnk
[1 of 1] Compiling Main             ( fib.fnk, fib.o )
Linking fib
$ ./fib 10
55

Running REPL

$ finkel repl
Hit `Ctrl-d' or type ,q to quit, type ,? for help.
> ,load fib.fnk
[1 of 1] Compiling Main             ( fib.fnk, interpreted )
; loaded fib.fnk
> ,info fib
fib :: Int -> Int       -- Defined at fib.fnk:16:11
> (map fib [1 .. 10])
[1,1,2,3,5,8,13,21,34,55]
> (System.Environment.withArgs ["10"] main)
55
> ,q

Further resources

See the documentation for more details.

Contributing

Contributions are welcome. Please see the CONTRIBUTING.md.

We use cookies. If you continue to browse the site, you agree to the use of cookies. For more information on our use of cookies please see our Privacy Policy.