5 files changed, 82 insertions, 0 deletions

diff --git a/math/scilab/files/patch-Makefile.OBJ.in b/math/scilab/files/patch-Makefile.OBJ.in
new file mode 100644
index 000000000000..5c3ddedc9f86
--- /dev/null
+++ b/math/scilab/files/patch-Makefile.OBJ.in
@@ -0,0 +1,11 @@
+--- Makefile.OBJ.in.orig	Tue Mar 21 15:35:41 2006
++++ Makefile.OBJ.in	Tue Mar 21 15:37:45 2006
+@@ -2,7 +2,7 @@
+ ATLASDIR=@ATLAS_DIR@
+ 
+ STD_BLAS=$(SCIDIR)/libs/blas.a  
+-ATLAS_LAPACKBLAS= $(ATLASDIR)/liblapack.a $(ATLASDIR)/libcblas.a $(ATLASDIR)/libf77blas.a $(ATLASDIR)/libatlas.a
++ATLAS_LAPACKBLAS= -L$(ATLASDIR) -lalapack -lcblas -lf77blas -latlas
+ 
+ BLAS=$(@WHICH_BLAS@) 
+ 
diff --git a/math/scilab/files/patch-routines__graphics__periFig.c b/math/scilab/files/patch-routines__graphics__periFig.c
new file mode 100644
index 000000000000..0013ab14d7b6
--- /dev/null
+++ b/math/scilab/files/patch-routines__graphics__periFig.c
@@ -0,0 +1,18 @@
+--- ./routines/graphics/periFig.c.orig	Tue Mar 21 19:22:44 2006
++++ ./routines/graphics/periFig.c	Tue Mar 21 19:22:57 2006
+@@ -1176,6 +1176,7 @@
+   integer rect[4], font=-1,font_flag=2;
+   integer verbose=0,Dnarg,Dvalue1[10];
+   int pen_color;
++  int alloc;
+ 
+   if ( ScilabGCXfig_is_initialized == FALSE ) {
+     sciprint("xinit must be called before any action \r\n");
+@@ -1183,7 +1184,6 @@
+   }
+ 
+ #ifdef WITH_GTK
+-  int alloc;
+   string = sci_convert_from_utf8(string, &alloc,NULL);
+ #endif 
+   C2F(boundingboxXfig)(string,x,y,rect,PI0,PI0,PI0,PD0,PD0,PD0,PD0);
diff --git a/math/scilab/files/patch-routines__graphics__periGtk.c b/math/scilab/files/patch-routines__graphics__periGtk.c
new file mode 100644
index 000000000000..dc285691beb8
--- /dev/null
+++ b/math/scilab/files/patch-routines__graphics__periGtk.c
@@ -0,0 +1,12 @@
+--- routines/graphics/periGtk.c.orig	Tue Mar 21 18:51:59 2006
++++ routines/graphics/periGtk.c	Tue Mar 21 18:52:33 2006
+@@ -862,8 +862,8 @@
+ static void xset_curwin(integer *intnum, integer *v2, integer *v3, integer *v4)
+ { 
+   struct BCG *bcgk;
+-  bcgk =  ScilabXgc ;
+   integer ierr;
++  bcgk =  ScilabXgc ;
+   /** send info to menu **/
+   if (v2 != (integer *) 0) MenuFixCurrentWin(*intnum);
+   if ( ScilabXgc == (struct BCG *) 0 ) 
diff --git a/math/scilab/files/patch-routines__graphics__periPos.c b/math/scilab/files/patch-routines__graphics__periPos.c
new file mode 100644
index 000000000000..4f1067180c02
--- /dev/null
+++ b/math/scilab/files/patch-routines__graphics__periPos.c
@@ -0,0 +1,18 @@
+--- ./routines/graphics/periPos.c.orig	Tue Mar 21 19:07:20 2006
++++ ./routines/graphics/periPos.c	Tue Mar 21 19:07:46 2006
+@@ -1225,6 +1225,7 @@
+ {     
+   integer i,rect[4] ;
+   int yn = (int) (*y + ascentPos());
++  int alloc;
+ 
+   if ( ScilabGCPos_is_initialized == FALSE ) {
+     sciprint("xinit must be called before any action \r\n");
+@@ -1232,7 +1233,6 @@
+   }
+   
+ #ifdef WITH_GTK
+-  int alloc;
+   /* we expect iso-latin1 in postscript */
+   string = sci_convert_from_utf8(string, &alloc,NULL);
+ #endif 
diff --git a/math/scilab/files/patch-routines__gtksci__x_main.c b/math/scilab/files/patch-routines__gtksci__x_main.c
new file mode 100644
index 000000000000..57337e371256
--- /dev/null
+++ b/math/scilab/files/patch-routines__gtksci__x_main.c
@@ -0,0 +1,23 @@
+--- ./routines/gtksci/x_main.c.orig	Tue Mar 21 19:50:48 2006
++++ ./routines/gtksci/x_main.c	Tue Mar 21 19:51:50 2006
+@@ -655,8 +655,8 @@
+   /* sciprint("GetScreenProperty not implemented in gtk 1\r\n"); */
+   return -1;
+ #else 
+-  start_sci_gtk();
+   GdkScreen *screen =  gdk_screen_get_default();
++  start_sci_gtk();
+   
+   if(!strcmp(prop,"screensize_px"))
+     {
+@@ -714,9 +714,9 @@
+   *iyres = 96;
+   return 0;
+ #else 
+-  start_sci_gtk();
+   GdkScreen *screen =  gdk_screen_get_default();
+   double xres, yres;
++  start_sci_gtk();
+   
+   /*
+    * there are 2.54 centimeters to an inch; so there are 25.4 millimeters.