Source position: xforms.pp line 1106
procedure fl_point(
p1: TFL_Coord;
p2: TFL_Coord;
p3: TFL_COLOR
);