From 15381e761af769a02f426c14e74022e3836bde81 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sun, 16 Jan 2011 19:51:53 -0700 Subject: [PATCH] fix type mismatch in plot binding Closes PR 11613 --- collects/plot/plplot.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/plot/plplot.rkt b/collects/plot/plplot.rkt index 304b684334..fd065f6d20 100644 --- a/collects/plot/plplot.rkt +++ b/collects/plot/plplot.rkt @@ -384,9 +384,9 @@ (define set_width (function-ptr dc-set-width (_fun _pointer _int -> _void))) (define set_color (function-ptr dc-set-color - (_fun _pointer _int -> _void))) + (_fun _pointer _short -> _void))) (define set_color_rgb (function-ptr dc-set-color/rgb - (_fun _pointer _int _int _int -> _void))) + (_fun _pointer _short _short _short -> _void))) (define start_page (function-ptr dc-start-page (_fun _pointer -> _void))) (define end_page (function-ptr dc-end-page