pike.git
/
src
/
modules
/
Image
/
colors.c
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/modules/Image/colors.c:1:
/* **! module Image **! note
-
**! $Id: colors.c,v 1.
12
1999/04/
13
12
:
32
:
12
mirar Exp $
+
**! $Id: colors.c,v 1.
13
1999/04/
18
22
:
05
:
16
mirar Exp $
**! submodule Color **! **! This module keeps names and easy handling **! for easy color support. It gives you an easy **! way to get colors from names. **! **! A color is here an object, containing color **! information and methods for conversion, see below. **! **! <ref>Image.Color</ref> can be called to make a color object.
pike.git/src/modules/Image/colors.c:90:
**! This is the color object. It has six readable variables, **! <tt>r</tt>, <tt>g</tt>, <tt>b</tt>, for the <i>red</i>, **! <i>green</i> and <i>blue</i> values, **! and <tt>h</tt>, <tt>s</tt>, <tt>v</tt>, for **! the <i>hue</i>, <i>saturation</i> anv <i>value</i> values. */ #include "global.h" #include <config.h>
-
RCSID("$Id: colors.c,v 1.
12
1999/04/
13
12
:
32
:
12
mirar Exp $");
+
RCSID("$Id: colors.c,v 1.
13
1999/04/
18
22
:
05
:
16
mirar Exp $");
#include "config.h" #include <math.h> #include "stralloc.h" #include "pike_macros.h" #include "object.h" #include "constants.h" #include "interpret.h"
pike.git/src/modules/Image/colors.c:938:
pop_stack(); return 1; } pop_stack(); } return 0; } int image_color_arg(INT32 args,rgb_group *rgb) {
-
if (args
<
=0) return 0;
-
return image_color_svalue(
sp-args
,rgb);
+
if (args
>
=0) return 0;
+
return image_color_svalue(
sp+args
,rgb);
} static void image_color_add(INT32 args) { rgb_group rgb;
-
if (!image_color_arg(args,&rgb))
-
error
("Image.Color.Color->`+
: Illegal argument(s)
");
+
if (!image_color_arg(
-
args,&rgb))
+
SIMPLE_BAD_ARG_ERROR
("Image.Color.Color->`+"
,1,"Color"
);
pop_n_elems(args); _image_make_rgb_color((int)(THIS->rgb.r+rgb.r), (int)(THIS->rgb.g+rgb.g), (int)(THIS->rgb.b+rgb.b)); } #define HEXTONUM(C) \