diff options
Diffstat (limited to 'otherlibs/labltk/builtin/builtini_palette.ml')
| -rw-r--r-- | otherlibs/labltk/builtin/builtini_palette.ml | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/otherlibs/labltk/builtin/builtini_palette.ml b/otherlibs/labltk/builtin/builtini_palette.ml deleted file mode 100644 index e1fe37dbe4..0000000000 --- a/otherlibs/labltk/builtin/builtini_palette.ml +++ /dev/null @@ -1,19 +0,0 @@ -##ifdef CAMLTK - -let cCAMLtoTKpaletteType = function - GrayShades (foo) -> TkToken (string_of_int foo) - | RGBShades (r,v,b) -> TkToken (string_of_int r^"/"^ - string_of_int v^"/"^ - string_of_int b) -;; - -##else - -let cCAMLtoTKpaletteType : paletteType -> tkArgs = function - | `Gray (foo) -> TkToken (string_of_int foo) - | `Rgb (r,v,b) -> TkToken (string_of_int r ^ "/" ^ - string_of_int v ^ "/" ^ - string_of_int b) -;; - -##endif |