Source position: xforms.pp line 890
procedure fl_get_icm_color(
p1: TFL_COLOR;
p2: pointer;
p3: pointer;
p4: pointer
);