Clean (programming language)

Clean is a general-purpose purely functional programming language. Originally called the Concurrent Clean System<ref>{{#invoke:citation/CS1|citation |CitationClass=web }}</ref> or the Clean System,<ref>{{#invoke:citation/CS1|citation |CitationClass=web }}</ref><ref>{{#invoke:citation/CS1|citation |CitationClass=web }}</ref> it has been developed by a group of researchers from the Radboud University in Nijmegen since 1987.<ref>{{#invoke:citation/CS1|citation |CitationClass=web }}</ref><ref>{{#invoke:citation/CS1|citation |CitationClass=web }}</ref> Although development of the language has slowed, some researchers are still working in the language.<ref>{{#invoke:citation/CS1|citation |CitationClass=web }}</ref> In 2018, a spin-off company was founded that uses Clean.<ref>{{#invoke:citation/CS1|citation |CitationClass=web }}</ref>

Features

Clean shares many properties and syntax with a younger sibling language, Haskell: referential transparency, list comprehension, guards, garbage collection, higher order functions, currying, and lazy evaluation. However, Clean deals with mutable state and input/output (I/O) through a uniqueness type system, in contrast to Haskell's use of monads. The compiler takes advantage of the uniqueness type system to generate more efficient code, because it knows that at any point during the execution of the program, only one reference can exist to a value with a unique type. Therefore, a unique value can be changed in place.<ref name="CleanHaskellGuide">Template:Cite FTP</ref>

An integrated development environment (IDE) for Microsoft Windows is included in the Clean distribution.

Examples

Hello world: <syntaxhighlight lang="clean">

Start = "Hello, world!"

</syntaxhighlight> Factorial:

<syntaxhighlight lang="clean"> fac :: Int -> Int fac 0 = 1 fac n = n * fac (n-1) Start = fac 10 </syntaxhighlight>

<syntaxhighlight lang="clean"> fac :: Int -> Int fac n = prod [1..n] // The product of the numbers 1 to n Start = fac 10 </syntaxhighlight>

Fibonacci sequence:

<syntaxhighlight lang="clean"> fib :: Int -> Int fib 0 = 1 fib 1 = 1 fib n = fib (n - 2) + fib (n - 1) Start = fib 7 </syntaxhighlight>

<syntaxhighlight lang="clean"> fibs :: Int Int -> [Int] fibs x_2 x_1 = [x_2:fibs x_1 (x_2 + x_1)] fib :: Int -> Int fib n = (fibs 1 1) !! n Start = fib 7 </syntaxhighlight>

Infix operator: <syntaxhighlight lang="clean"> (^) infixr 8 :: Int Int -> Int (^) x 0 = 1 (^) x n = x * x ^ (n-1) </syntaxhighlight> The type declaration states that the function is a right associative infix operator with priority 8: this states that x*x^(n-1) is equivalent to x*(x^(n-1)) as opposed to (x*x)^(n-1). This operator is pre-defined in StdEnv, the Clean standard library.

How Clean works

Computing is based on graph rewriting and reduction. Constants such as numbers are graphs and functions are graph rewriting formulas. This, combined with compiling to native code, makes Clean programs which use high abstraction run relatively fast according to The Computer Language Benchmarks Game.<ref name="benchmarks">{{#invoke:citation/CS1|citation |CitationClass=web }}</ref> A 2008 benchmark showed that Clean native code performs similarly to the Glasgow Haskell Compiler (GHC), depending on the benchmark.<ref>Template:Cite FTP</ref>

Compiling

Compilation of Clean to machine code is performed as follows:

1. Source files (.icl) and definition files (.dcl) are translated into Core Clean, a basic variant of Clean, by the compiler frontend written in Clean.
2. Core clean is converted into Clean's platform-independent intermediate language (.abc), by the compiler backend written in Clean and C.
3. Intermediate ABC code is converted to object code (.o) by the code generator written in C.
4. Object code is linked with other files in the module and the runtime system and converted into a normal executable using the system linker (when available) or a dedicated linker written in Clean on Windows.

Earlier versions of the Clean compiler were written completely in C, thus avoiding bootstrapping issues.

The ABC machine

The ABC code mentioned above is an intermediate representation for an abstract machine. Because machine code generation for ABC code is relatively straightforward, it is easy to support new architectures. The ABC machine is an imperative abstract graph rewriting machine.<ref>Template:Cite thesis</ref> It consists of a graph store to hold the Clean graph that is being rewritten and three stacks:

• The A(rgument)-stack holds arguments that refer to nodes in the graph store.
• The B(asic value)-stack holds basic values (integers, characters, reals, etc.). Although these values could be nodes in the graph store, a separate stack is used for efficiency.
• The C(ontrol)-stack holds return addresses for flow control.

The runtime system, which is linked into every executable, builds a Start node in the graph store and pushes it on the A-stack. It then begins printing it, evaluating it as needed.

Running Clean in the browser

Although Clean is typically used to generate native executables, several projects have enabled applications in web browsers. The now abandoned SAPL project compiled Core Clean to JavaScript and did not use ABC code. Since 2019, an interpreter for ABC code, written in WebAssembly, is used instead.<ref>{{#invoke:citation/CS1|citation |CitationClass=web }}</ref><ref>Template:Cite book</ref>

Platforms

Clean is available for Microsoft Windows (IA-32 and X86-64), macOS (X86-64), and Linux (IA-32, X86-64, and AArch64).Template:Citation needed

Some libraries are not available on all platforms, like ObjectIO which is only available on Windows. Also the feature to write dynamics to files is only available on Windows.Template:Citation needed

The availability of Clean per platform varies with each version:<ref>{{#invoke:citation/CS1|citation |CitationClass=web }}</ref><ref>{{#invoke:citation/CS1|citation |CitationClass=web }}</ref>

Version	Date	Linux			macOS			Oracle Solaris	Windows		Miscellaneous
		IA-32	x86-64	AArch64	Motorola 68040	PowerPC	x86-64	SPARC	IA-32	x86-64
3.1	Template:Date table sorting	Template:Yes	Template:Yes	Template:Yes	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes
3.0	Template:Date table sorting	Template:Yes	Template:Yes	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes
2.4	Template:Date table sorting	Template:Yes	Template:Yes	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes
2.3	Template:Date table sorting	Template:Yes	Template:Yes	Template:No	Template:No	Template:No	Template:No	Template:No	Template:Yes	Template:Yes
2.2	Template:Date table sorting	Template:Yes	Template:Yes	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes	Template:Yes
2.1.1	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes	Template:No
2.1.0	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes	Template:No
2.0.2	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes	Template:No
2.0.1	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes	Template:No
2.0	Template:Date table sorting	Template:No	Template:No	Template:No	Template:No	Template:No	Template:No	Template:No	Template:Yes	Template:No
1.3.3	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes	Template:No
1.3.2	Template:Date table sorting	Template:No	Template:No	Template:No	Template:Yes	Template:Yes	Template:No	Template:Yes	Template:Yes	Template:No
1.3.1	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes	Template:No
1.3	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:Yes	Template:Yes	Template:No
1.2.4	Template:Date table sorting	Template:No	Template:No	Template:No	Template:Yes	Template:Yes	Template:No	Template:No	Template:Yes	Template:No
1.2.3	Template:Date table sorting	Template:No	Template:No	Template:No	Template:Yes	Template:Yes	Template:No	Template:No	Template:Yes	Template:No
1.2	Template:Date table sorting	Template:No	Template:No	Template:No	Template:Yes	Template:Yes	Template:No	Template:No	Template:No	Template:No
1.1.3	Template:Date table sorting	Template:No	Template:No	Template:No	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:No	OS/2 (i80386)
1.1.2	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:No	SunOS 4 (SPARC)
1.1	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:Yes	Template:No	Template:No	Template:No	Template:No	Template:No
1.0.2	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:Yes	Template:No	Template:No	Template:Yes	Template:No	Template:No	OS/2 (i80386); SunOS 4 (SPARC)
1.0	Template:Date table sorting	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:No	Template:No	Template:No	Template:No	OS/2 (i80386)
0.8.4	Template:Date table sorting	Template:Yes	Template:No	Template:No	Template:Yes	Template:No	Template:No	Template:No	Template:No	Template:No	Experimental T800 transputer release
0.8.3	Template:Date table sorting	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:No	Template:No	Template:No	Template:No
0.8.1	Template:Date table sorting	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:No	Template:No	Template:No	Template:No
0.8	Template:Date table sorting	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:No	Template:No	Template:No	Template:No	OS/2 (i80386); SunOS 3–4 (SPARC)
0.7	Template:Date table sorting	Template:No	Template:No	Template:No	Template:Yes	Template:No	Template:No	Template:No	Template:No	Template:No	SunOS 3–4 (SPARC)

Comparison to Haskell

The syntax of Clean is very similar to that of Haskell, with some notable differences. In general, Haskell has introduced more syntactic sugar than Clean:<ref name="CleanHaskellGuide" />

Haskell	Clean	Remarks
x <- [1..10] , isOdd x]</syntaxhighlight>	isOdd x]</syntaxhighlight>	list comprehension
<syntaxhighlight lang="haskell">x:xs</syntaxhighlight>	<syntaxhighlight lang="clean">[x:xs]</syntaxhighlight>	cons operator
<syntaxhighlight lang="haskell"> data Tree a = Empty	Node (Tree a) a (Tree a) </syntaxhighlight>	<syntaxhighlight lang="clean"> Tree a = Empty	Node (Tree a) a (Tree a) </syntaxhighlight>	algebraic data type
<syntaxhighlight lang="haskell">(Eq a, Eq b) => ...</syntaxhighlight>	Eq a & Eq b</syntaxhighlight>	class assertions and contexts
<syntaxhighlight lang="haskell">fun t@(Node l x r) = ...</syntaxhighlight>	<syntaxhighlight lang="clean">fun t=:(Node l x r) = ...</syntaxhighlight>	as-patterns
<syntaxhighlight lang="haskell">if x > 10 then 10 else x</syntaxhighlight>	<syntaxhighlight lang="clean">if (x > 10) 10 x</syntaxhighlight>	if

External links

• Clean Wiki
• clean-lang.org: public registry with Clean packages
• cloogle.org: a search engine to search in Clean packages