Haskell

Haskell

Paradigm	functional, non-strict, modular
First appeared	1990
Typing discipline	static, strong, inferred
Website	www.haskell.org
Major implementations
GHC, Hugs, NHC, JHC, Yhc
Dialects
Helium
Influenced by
Miranda, ML, Gofer
Influenced
Python

Haskell is a standardized purely functional programming language with non-strict semantics, named after the logician Haskell Curry. It is one of the more popular functional languages, and the lazy functional language on which the most research is being performed.

History

Following the publication of Miranda, in 1985, functional languages proliferated. By 1987, there existed more than a dozen competing non-strict, purely-functional programming languages. At the conference on Functional Programming Languages and Computer Architecture (FPCA '87) in Portland, Oregon, a meeting was held during which strong consensus was found among the participants that a committee should be formed to define an open standard for such languages. This would have the express purpose of consolidating the existing languages into a common one that would serve as a basis for future research in language design. The first version of Haskell ("Haskell 1.0") was defined in 1990. The committee's efforts resulted in a series of language definitions, which in late 1997, culminated in Haskell 98, intended to specify a stable, minimal, portable version of the language and an accompanying standard library for teaching, and as a base for future extensions. The committee expressly welcomed the creation of extensions and variants of Haskell 98 via adding and incorporating experimental features.

In January 1999, the Haskell 98 language standard was originally published as "The Haskell 98 Report". In January 2003, a revised version was published as "Haskell 98 Language and Libraries: The Revised Report". The language continues to evolve rapidly, with the Hugs and GHC implementation (see below) representing the current de facto standard. In early 2006, the process of defining a successor to the Haskell 98 standard, informally named Haskell′ ("Haskell Prime"), was begun. This process is intended to produce a minor revision of Haskell 98.

Features and extensions

Characteristic features of Haskell include pattern matching, currying, list comprehensions, guards, definable operators, and single assignment. The language also supports recursive functions and algebraic data types, as well as lazy evaluation. Unique concepts include monads, and type classes. The combination of such features can make functions which would be difficult to write in a procedural programming language almost trivial to implement in Haskell.

Several variants have been developed: parallelizable versions from MIT and Glasgow, both called Parallel Haskell; more parallel and distributed versions called Distributed Haskell (formerly Goffin) and Eden; a speculatively evaluating version called Eager Haskell and several object oriented versions: Haskell++, O'Haskell and Mondrian.

There is also a Haskell-like language that offers a new method of support for GUI development called Concurrent Clean. Its biggest deviations from Haskell are use of uniqueness types for input instead of monads.

Applications

Although Haskell has a comparatively small user community, its strengths have been well applied to a few projects. Audrey Tang's Pugs is an implementation for the forthcoming Perl 6 language with an interpreter and compilers that proved useful already after just a few months of its writing. Darcs is a revision control system, with several innovative features. Linspire GNU/Linux chose Haskell for system tools development.

Examples

A simple example that is often used to demonstrate the syntax of functional languages is the factorial function, shown in Haskell:

fac :: Integer -> Integer
fac 0 = 1
fac n | n > 0 = n * fac (n-1)

Or in one line:

fac n = if n > 0 then n * fac (n-1) else 1

This describes the factorial as a recursive function, with one terminating base case. It is similar to the descriptions of factorials found in mathematics textbooks. Much of Haskell code is similar to standard mathematical notation in facility and syntax.

The first line of the factorial function shown is optional, and describes the types of this function. It can be read as the function fac (fac) has type (::) from integer to integer (Integer -> Integer). That is, it takes an integer as an argument, and returns another integer. The type of a definition is inferred automatically if the programmer didn't supply a type annotation.

The second line relies on pattern matching, an important feature of Haskell. Note that parameters of a function are not in parentheses but separated by spaces. When the function's argument is 0 (zero) it will return the integer 1 (one). For all other cases the third line is tried. This is the recursion, and executes the function again until the base case is reached.

A guard protects the third line from negative numbers for which a factorial is undefined. Without the guard this function would recurse through all negative numbers without ever reaching the base case of 0. As it is, the pattern matching is not complete: if a negative integer is passed to the fac function as an argument, the program will fail with a runtime error. A final case could check for this error condition and print an appropriate error message instead.

The "Prelude" is a number of small functions analogous to C's standard library. Using the Prelude and writing in the point-free style of unspecified arguments, it becomes:

fac = product . enumFromTo 1

The above is close to mathematical definitions such as f = g o h (see function composition), and indeed, it is not an assignment of a value to a variable.

More complex examples

A simple RPN calculator expressed with a higher-order function whose argument f is defined in a where clause using pattern matching and the type class Read:

calc :: String -> [Float]
calc = foldl f [] . words
  where 
    f (x:y:zs) "+" = y+x:zs
    f (x:y:zs) "-" = y-x:zs
    f (x:y:zs) "*" = y*x:zs
    f (x:y:zs) "/" = y/x:zs
    f xs y = read y : xs

The empty list is the initial state, and f interprets one word at a time, either matching two numbers from the head of the list and pushing the result back in, or parsing the word as a floating-point number and prepending it to the list.

The following definition produces the list of Fibonacci numbers in linear time:

fibs = 0 : 1 : zipWith (+) fibs (tail fibs)

The infinite list is produced by corecursion — the latter values of the list are computed on demand starting from the initial two items 0 and 1. This kind of a definition is an instance of lazy evaluation and an important part of Haskell programming. For an example of how the evaluation evolves, the following illustrates the values of fibs and tail fibs after the computation of six items and shows how zipWith (+) has produced four items and proceeds to produce the next item:

fibs         = 0 : 1 : 1 : 2 : 3 : 5 : ...
               +   +   +   +   +   +
tail fibs    = 1 : 1 : 2 : 3 : 5 : ...
               =   =   =   =   =   =
zipWith ...  = 1 : 2 : 3 : 5 : 8 : ...
fibs = 0 : 1 : 1 : 2 : 3 : 5 : 8 : ...

An example of a function which takes an IO computation and either returns the result of the computation or Nothing, if it takes longer than limit microseconds to execute.

compute :: Int -> IO a -> IO (Maybe a)
compute limit computation = do
    result <- atomically newEmptyTMVar
    runner <- forkIO $ do c <- computation
                          atomically $ putTMVar result $ Just c
    reader <- forkIO $ do threadDelay limit
                          killThread runner
                          atomically $ putTMVar result Nothing  
    a <- atomically $ takeTMVar result
    killThread runner
    killThread reader
    return a

Real world Haskell code often makes heavy use of the IO, State, and ST monads to make the code more imperative.

See also wikibooks:Transwiki:List of hello world programs#Haskell for an example that prints text.

Criticism

Haskell has many advanced features not found in many other programming languages, but some of these features have been criticized as making the language too complex or difficult to understand. In particular, critiques of functional programming languages and non-mainstream programming languages apply to Haskell. In addition, there are complaints stemming from the purity of Haskell and its theoretical roots.

Jan-Willem Maessen in 2002 and Simon Peyton Jones in 2003 discussed problems associated with lazy evaluation whilst also acknowledging the theoretical motivation for it, in addition to purely practical considerations such as improved performance They note that, in addition to adding some performance overhead, laziness makes it more difficult for programmers to reason about the performance of their code (specifically space usage).

Bastiaan Heeren, Daan Leijen, and Arjan van IJzendoorn in 2003 also observed some stumbling blocks for Haskell learners, "The subtle syntax and sophisticated type system of Haskell are a double edged sword -- highly appreciated by experienced programmers but also a source of frustration among beginners, since the generality of Haskell often leads to cryptic error messages." To address these, they developed an advanced interpreter called Helium which improved the user-friendliness of error messages by limiting the generality of some Haskell features, and in particular removing support for type classes.

Implementations

The following all comply fully, or very nearly, with the Haskell 98 standard, and are distributed under open source licenses. There are currently no commercial Haskell implementations.

• The Glasgow Haskell Compiler compiles to native code on a number of different architectures—as well as to ANSI C—using C-- as an intermediate language. GHC is probably the most popular Haskell compiler, and there are quite a few useful libraries (e.g. bindings to OpenGL) that will only work with GHC.
• Gofer was an educational version of Haskell, developed by Mark Jones. It was supplanted by Hugs (see below).
• HBC is another native-code Haskell compiler. It has not been actively developed for some time, but is still usable.
• Helium is a newer dialect of Haskell. The focus is on making it easy to learn by providing clearer error messages. It currently lacks typeclasses, rendering it incompatible with many Haskell programs.
• Hugs, the Haskell User's Gofer System, is a bytecode interpreter. It offers fast compilation of programs and reasonable execution speed. It also comes with a simple graphics library. Hugs is good for people learning the basics of Haskell, but is by no means a "toy" implementation. It is the most portable and lightweight of the Haskell implementations.
• Jhc is a Haskell compiler written by John Meacham emphasising speed and efficiency of generated programs as well as exploration of new program transformations.
• nhc98 is another bytecode compiler, but the bytecode runs significantly faster than with Hugs. Nhc98 focuses on minimizing memory usage, and is a particularly good choice for older, slower machines.
• Yhc, the York Haskell Compiler is a fork of nhc98, with the goals of being simpler, more portable, more efficient and integrating support for Hat, the Haskell tracer.

See also

• O'Haskell is an extension of Haskell adding object-orientation and concurrent programming support.
• Pugs a compiler and interpreter for the Perl 6 programming language
• LOLITA and Darcs large applications written in Haskell

External links

• HaskellWiki - The Haskell Home Page
• A History of Haskell: being lazy with class - History of Haskell
• Haskell Humor
• Old HaWiki - Old discussions on various Haskell topics
• Haskell vs. Ada vs. C++ vs. Awk vs. ... An Experiment in Software Prototyping Productivity (a PostScript file)
• The Evolution of a Haskell Programmer - a slightly humorous overview of different programming styles available in Haskell
• An Online Bibliography of Haskell Research
• ePolyglot - combining Haskell, Python and Eiffel
• Haskell Libraries

Tutorials

• Programming in Haskell by Graham Hutton
• Yet Another Haskell Tutorial - a good Haskell tutorial by Hal Daume III; assumes much less prior knowledge than the official tutorial
• A Gentle Introduction to Haskell 98 (a more advanced tutorial, also available as pdf file)
• Haskell Tutorial for C Programmers by Eric Etheridge
• List of Tutorials at Haskell.org
• Haskell Idioms