From 7dfbfae9c6a9c0d90fb1e44c84c20db5d69c1d99 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Thu, 4 Aug 2005 23:06:11 +0000 Subject: [PATCH] patch from Alex svn: r552 --- collects/plot/plplot.ss | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/collects/plot/plplot.ss b/collects/plot/plplot.ss index 2856eedbc3..71346f2785 100644 --- a/collects/plot/plplot.ss +++ b/collects/plot/plplot.ss @@ -37,10 +37,10 @@ (define* pl-setup-page (get-ffi-obj "c_plspage" libplplot - (_fun (xp : _plflt = 0.) - (yp : _plflt = 0.) - (xleng : _plflt) - (yleng : _plflt) + (_fun (xp : _plint = 0) + (yp : _plint = 0) + (xleng : _plint) + (yleng : _plint) (xoff : _plint = 0) (yoff : _plint = 0) -> _void))) @@ -116,7 +116,7 @@ (define* pl-fill (get-ffi-obj "c_plfill" libplplot - (_fun (n : _int = (length x-values)) + (_fun (n : _plint = (length x-values)) (x-values : (_list i _plflt)) (y-values : (_list i _plflt)) -> _void)))