From 3f6a493b87dcfb9b49e22313fd5f7c321c3f77d1 Mon Sep 17 00:00:00 2001 From: Damien Doligez Date: Wed, 5 Apr 2000 18:30:22 +0000 Subject: MacOS: ajout macosunix; portage bigarray et systhreads; tabs git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3042 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02 --- otherlibs/graph/draw.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'otherlibs/graph/draw.c') diff --git a/otherlibs/graph/draw.c b/otherlibs/graph/draw.c index 485e3828b..4fb46d758 100644 --- a/otherlibs/graph/draw.c +++ b/otherlibs/graph/draw.c @@ -56,7 +56,7 @@ value gr_lineto(value vx, value vy) grx, Bcvt(gry), x, Bcvt(y)); if(grdisplay_mode) { XDrawLine(grdisplay, grwindow.win, grwindow.gc, - grx, Wcvt(gry), x, Wcvt(y)); + grx, Wcvt(gry), x, Wcvt(y)); XFlush(grdisplay); } grx = x; @@ -98,7 +98,7 @@ value gr_draw_arc_nat(value vx, value vy, value vrx, value vry, value va1, value x - rx, Bcvt(y) - ry, rx * 2, ry * 2, a1 * 64, (a2 - a1) * 64); if(grdisplay_mode) { XDrawArc(grdisplay, grwindow.win, grwindow.gc, - x - rx, Wcvt(y) - ry, rx * 2, ry * 2, a1 * 64, (a2 - a1) * 64); + x - rx, Wcvt(y) - ry, rx * 2, ry * 2, a1 * 64, (a2 - a1) * 64); XFlush(grdisplay); } return Val_unit; -- cgit v1.2.3-70-g09d2