summaryrefslogtreecommitdiffstats
path: root/scilab/modules/scicos/src/c/slider.c
diff options
context:
space:
mode:
Diffstat (limited to 'scilab/modules/scicos/src/c/slider.c')
-rw-r--r--scilab/modules/scicos/src/c/slider.c7
1 files changed, 5 insertions, 2 deletions
diff --git a/scilab/modules/scicos/src/c/slider.c b/scilab/modules/scicos/src/c/slider.c
index 48d466b..60c517b 100644
--- a/scilab/modules/scicos/src/c/slider.c
+++ b/scilab/modules/scicos/src/c/slider.c
@@ -25,7 +25,8 @@
25#include "machine.h" 25#include "machine.h"
26#include "localization.h" 26#include "localization.h"
27/*--------------------------------------------------------------------------*/ 27/*--------------------------------------------------------------------------*/
28extern int C2F(getgeom)(double *); 28// fix for release 5.3.2
29//extern int C2F(getgeom)(double *);
29/*--------------------------------------------------------------------------*/ 30/*--------------------------------------------------------------------------*/
30/*---------------------------------------------------- 31/*----------------------------------------------------
31 * changes the current window to win 32 * changes the current window to win
@@ -106,7 +107,9 @@ void slider(int *flag, int *nevprt, double *t, double *xd,
106 case 4 : 107 case 4 :
107 /* initial case */ 108 /* initial case */
108 z[0]= 0.0; 109 z[0]= 0.0;
109 C2F(getgeom)(z+1); 110// fix for release 5.3.2
111 z[1] = 100.0;
112// C2F(getgeom)(z+1);
110 z[2] = z[2]+ t3d +th ; 113 z[2] = z[2]+ t3d +th ;
111 z[4] -= t3d + 2*th ; 114 z[4] -= t3d + 2*th ;
112 z[3] = z[3] + z[5] ; 115 z[3] = z[3] + z[5] ;