Declaration extern des variables globales

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1968 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02

2 files changed, 15 insertions, 7 deletions

diff --git a/otherlibs/graph/libgraph.h b/otherlibs/graph/libgraph.h
index 9c1428f2e..a1dcfac9e 100644
--- a/otherlibs/graph/libgraph.h
+++ b/otherlibs/graph/libgraph.h
@@ -23,13 +23,13 @@ struct canvas {
 };
 
 extern Display * grdisplay;     /* The display connection */
-int grscreen;                   /* The screen number */
-Colormap grcolormap;            /* The color map */
-struct canvas grwindow;         /* The graphics window */
-struct canvas grbstore;         /* The pixmap used for backing store */
-int grwhite, grblack;           /* Black and white pixels */
-int grx, gry;                   /* Coordinates of the current point */
-unsigned long grcolor;          /* Current drawing color */
+extern int grscreen;            /* The screen number */
+extern Colormap grcolormap;     /* The color map */
+extern struct canvas grwindow;  /* The graphics window */
+extern struct canvas grbstore;  /* The pixmap used for backing store */
+extern int grwhite, grblack;    /* Black and white pixels */
+extern int grx, gry;            /* Coordinates of the current point */
+extern unsigned long grcolor;   /* Current drawing color */
 extern XFontStruct * grfont;    /* Current font */
 
 #define Wcvt(y) (grwindow.h - 1 - (y))
diff --git a/otherlibs/graph/open.c b/otherlibs/graph/open.c
index dc4b50d74..7b50bd1e0 100644
--- a/otherlibs/graph/open.c
+++ b/otherlibs/graph/open.c
@@ -23,6 +23,14 @@
 #endif
 
 Display * grdisplay = NULL;
+int grscreen;
+Colormap grcolormap;
+int grwhite, grblack;
+struct canvas grwindow;
+struct canvas grbstore;
+int grx, gry;
+unsigned long grcolor;
+extern XFontStruct * grfont;
 
 static Bool gr_initialized = False;