Skip to content

M
mincss
Commit 28178a42 authored by Taddeüs Kroes's avatar Taddeüs Kroes
Browse files
Options

Removed some useless color transformations

parent 24707b18
Hide whitespace changes
Inline Side-by-side
Showing with 3 additions and 3 deletions
color_names.ml
View file @ 28178a42
...@@ -3,14 +3,14 @@ open Types ...@@ -3,14 +3,14 @@ open Types
let compress = function let compress = function
| Ident "aliceblue" -> Hexcolor "f0f8ff" | Ident "aliceblue" -> Hexcolor "f0f8ff"
| Ident "antiquewhite" -> Hexcolor "faebd7" | Ident "antiquewhite" -> Hexcolor "faebd7"
| Ident "aqua" -> Hexcolor "0ff" (*| Ident "aqua" -> Hexcolor "0ff"*)
| Ident "aquamarine" -> Hexcolor "7fffd4" | Ident "aquamarine" -> Hexcolor "7fffd4"
| Hexcolor "f0ffff" -> Ident "azure" | Hexcolor "f0ffff" -> Ident "azure"
| Hexcolor "f5f5dc" -> Ident "beige" | Hexcolor "f5f5dc" -> Ident "beige"
| Hexcolor "ffe4c4" -> Ident "bisque" | Hexcolor "ffe4c4" -> Ident "bisque"
| Ident "black" -> Hexcolor "000" | Ident "black" -> Hexcolor "000"
| Ident "blanchedalmond" -> Hexcolor "ffebcd" | Ident "blanchedalmond" -> Hexcolor "ffebcd"
| Ident "blue" -> Hexcolor "00f" (*| Ident "blue" -> Hexcolor "00f"*)
| Ident "blueviolet" -> Hexcolor "8a2be2" | Ident "blueviolet" -> Hexcolor "8a2be2"
| Hexcolor "a52a2a" -> Ident "brown" | Hexcolor "a52a2a" -> Ident "brown"
| Ident "burlywood" -> Hexcolor "deb887" | Ident "burlywood" -> Hexcolor "deb887"
...@@ -20,7 +20,7 @@ let compress = function ...@@ -20,7 +20,7 @@ let compress = function
| Hexcolor "ff7f50" -> Ident "coral" | Hexcolor "ff7f50" -> Ident "coral"
| Ident "cornflowerblue" -> Hexcolor "6495ed" | Ident "cornflowerblue" -> Hexcolor "6495ed"
| Ident "cornsilk" -> Hexcolor "fff8dc" | Ident "cornsilk" -> Hexcolor "fff8dc"
| Ident "cyan" -> Hexcolor "0ff" (*| Ident "cyan" -> Hexcolor "0ff"*)
| Ident "darkblue" -> Hexcolor "00008b" | Ident "darkblue" -> Hexcolor "00008b"
| Ident "darkcyan" -> Hexcolor "008b8b" | Ident "darkcyan" -> Hexcolor "008b8b"
| Ident "darkgoldenrod" -> Hexcolor "b8860b" | Ident "darkgoldenrod" -> Hexcolor "b8860b"
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment