<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> <html> <head> <!-- Generated by HsColour, http://www.cs.york.ac.uk/fp/darcs/hscolour/ --> <title>Language/Haskell/HsColour/ColourHighlight.hs</title> <link type='text/css' rel='stylesheet' href='hscolour.css' /> </head> <body> <pre><a name="line-1"></a><span class='hs-keyword'>module</span> <span class='hs-conid'>Language</span><span class='hs-varop'>.</span><span class='hs-conid'>Haskell</span><span class='hs-varop'>.</span><span class='hs-conid'>HsColour</span><span class='hs-varop'>.</span><span class='hs-conid'>ColourHighlight</span> <a name="line-2"></a> <span class='hs-layout'>(</span> <span class='hs-conid'>Colour</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span> <a name="line-3"></a> <span class='hs-layout'>,</span> <span class='hs-conid'>Highlight</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span> <a name="line-4"></a> <span class='hs-layout'>)</span> <span class='hs-keyword'>where</span> <a name="line-5"></a> <a name="line-6"></a><a name="Colour"></a><span class='hs-comment'>-- | Colours supported by ANSI codes.</span> <a name="line-7"></a><a name="Colour"></a><span class='hs-keyword'>data</span> <span class='hs-conid'>Colour</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>Black</span> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Red</span> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Green</span> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Yellow</span> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Blue</span> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Magenta</span> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Cyan</span> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>White</span> <a name="line-8"></a> <span class='hs-keyword'>deriving</span> <span class='hs-layout'>(</span><span class='hs-conid'>Eq</span><span class='hs-layout'>,</span><span class='hs-conid'>Show</span><span class='hs-layout'>,</span><span class='hs-conid'>Read</span><span class='hs-layout'>,</span><span class='hs-conid'>Enum</span><span class='hs-layout'>)</span> <a name="line-9"></a> <a name="line-10"></a><a name="Highlight"></a><span class='hs-comment'>-- | Types of highlighting supported by ANSI codes (and some extra styles).</span> <a name="line-11"></a><a name="Highlight"></a><span class='hs-keyword'>data</span> <span class='hs-conid'>Highlight</span> <span class='hs-keyglyph'>=</span> <a name="line-12"></a> <span class='hs-conid'>Normal</span> <a name="line-13"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Bold</span> <a name="line-14"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Dim</span> <a name="line-15"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Underscore</span> <a name="line-16"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Blink</span> <a name="line-17"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>ReverseVideo</span> <a name="line-18"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Concealed</span> <a name="line-19"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Foreground</span> <span class='hs-conid'>Colour</span> <a name="line-20"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Background</span> <span class='hs-conid'>Colour</span> <a name="line-21"></a> <span class='hs-comment'>-- Above are ANSI-only. Below are extra styles.</span> <a name="line-22"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>Italic</span> <a name="line-23"></a> <span class='hs-keyword'>deriving</span> <span class='hs-layout'>(</span><span class='hs-conid'>Eq</span><span class='hs-layout'>,</span><span class='hs-conid'>Show</span><span class='hs-layout'>,</span><span class='hs-conid'>Read</span><span class='hs-layout'>)</span> <a name="line-24"></a> </pre></body> </html>