remove useless characters + useless macros removed 35/3635/2
Sylvestre Ledru [Thu, 24 Mar 2011 20:57:17 +0000 (21:57 +0100)]
Change-Id: Iddbc55dcc3e21420f3eee141c516324c8a64d5e1

14 files changed:
scilab/modules/api_scilab/src/cpp/api_pointer.cpp
scilab/modules/call_scilab/src/c/SendScilabJobs.c
scilab/modules/core/src/c/intmacr2tree.c
scilab/modules/graphics/src/c/SetProperty.c
scilab/modules/gui/sci_gateway/c/sci_toolbar.c
scilab/modules/gui/src/cpp/displaytree.cpp
scilab/modules/interpolation/src/c/interpolation.c
scilab/modules/output_stream/src/c/do_xxprintf.c
scilab/modules/renderer/src/cpp/polylineDrawing/PolylineInterpColorDrawerJoGL.cpp
scilab/modules/scicos/src/scicos_sundials/src/cvode/cvode.c
scilab/modules/scicos/src/scicos_sundials/src/ida/ida.c
scilab/modules/scicos/src/scicos_sundials/src/ida/ida_ic.c
scilab/modules/scicos/src/scicos_sundials/src/kinsol/kinsol.c
scilab/modules/umfpack/src/c/taucs_scilab.c

index 0163084..855f8de 100644 (file)
@@ -93,7 +93,7 @@ SciErr allocPointer(void* _pvCtx, int _iVar, void** _pvPtr)
        sciErr = fillPointer(_pvCtx, piAddr, &pvPtr);
        if(sciErr.iErr)
        {
-               addErrorMessage(&sciErr, API_ERROR_ALLOC_POINTER, _("%s: Unable to create variable in Scilab memory"), "allocPointer");;
+               addErrorMessage(&sciErr, API_ERROR_ALLOC_POINTER, _("%s: Unable to create variable in Scilab memory"), "allocPointer");
                return sciErr;
        }
 
index 275ee8d..89cd687 100644 (file)
@@ -121,7 +121,7 @@ int SendScilabJob(char *job)
         retCode = (int)Err_Job;
 
         /* clear prev. Err , TMP_EXEC_STRING scilab variables */
-        C2F(scirun)(COMMAND_CLEAR, (long int)strlen(COMMAND_CLEAR));;
+        C2F(scirun)(COMMAND_CLEAR, (long int)strlen(COMMAND_CLEAR));
     }
     else
     {
index 5662aef..6291492 100644 (file)
@@ -472,7 +472,7 @@ static int GetInstruction(int *data,int *index2,int *nblines,int *addinstr)
     switch(data[*index2]) {
     case 0: /* Deleted operation */
         /* This code is ignored */
-        *index2 += data[*index2+1]-1;;
+        *index2 += data[*index2+1]-1;
         break;
     case 1: /* Stack put (Obsolete) */
         CreateEqualTList("code1",data,index2);
index 1c05419..4e390f2 100644 (file)
@@ -1093,7 +1093,7 @@ int sciInitFontBackground( sciPointObj * pobj, int colorindex )
     {
     case SCI_TEXT:
       (sciGetFontContext(pobj))->backgroundcolor =
-       Max (0, Min (colorindex - 1, sciGetNumColors (pobj) + 1));;
+       Max (0, Min (colorindex - 1, sciGetNumColors (pobj) + 1));
       break;
     case SCI_LEGEND:
       (sciGetFontContext(pobj))->backgroundcolor =
index ad51736..a28a8a0 100644 (file)
@@ -36,7 +36,7 @@ int sci_toolbar(char *fname,unsigned long l)
   
   int figNum = -2;
 
-  sciPointObj *pObj = NULL;;
+  sciPointObj *pObj = NULL;
 
   CheckRhs(1,2);
   CheckLhs(0,1);
index f94a939..c1f2637 100644 (file)
@@ -78,7 +78,7 @@ bool bParseListItem(int _iVar, int *_piCurrentItem, vector<string> *_pvStructLis
                szCurLvl += ".";
                std::ostringstream out;
                out << i-1;
-               szCurLvl += out.str();;
+               szCurLvl += out.str();
 
                _pvStructList->push_back(szCurLvl);
 
index 7c829b3..2357c07 100644 (file)
@@ -88,7 +88,7 @@ int get_rhs_real_hmat(int num, RealHyperMat *H)
 
   /*  get the 3d field */
   if ( !( *istk(il3) == 1 && *istk(il3+3)==0) )
-    goto err;;
+    goto err;
 
   H->size = (*istk(il3+1))*(*istk(il3+2));
   H->R = stk(sadr(il3+4));
index 398d26d..7ee137c 100644 (file)
@@ -542,7 +542,7 @@ static char* readNextUTFChar(char* utfstream,int* size)
        {/* three bytes UTF-8*/
                UTFChar[0]=*utfstream;
                UTFChar[1]=*(utfstream+1);
-               UTFChar[2]=*(utfstream+2);;
+               UTFChar[2]=*(utfstream+2);
                UTFChar[3]='\0';
                *size=3;
        }
index 2faad4c..2ed92c7 100644 (file)
@@ -54,7 +54,7 @@ void PolylineInterpColorDrawerJoGL::drawPolyline( void )
     xCoords = new double[nbVertices];
     yCoords = new double[nbVertices];
     zCoords = new double[nbVertices];
-    colors  = new int[nbVertices];;
+    colors  = new int[nbVertices];
   }
   catch (const std::exception& e)
   {
index ac0a0b9..dd8af42 100644 (file)
 #include "sundials_extension.h"
 
 /*=================================================================*/
-/*             Macros                                              */
-/*=================================================================*/
-
-/* Macro: loop */
-#define loop for(;;)
-
-/*=================================================================*/
 /*             CVODE Private Constants                             */
 /*=================================================================*/
 
@@ -1552,7 +1545,7 @@ int CVode(void *cvode_mem, realtype tout, N_Vector yout,
    */
 
   nstloc = 0;
-  loop {
+  for(;;) {
    
     next_h = h;
     next_q = q;
@@ -2284,7 +2277,7 @@ static int CVStep(CVodeMem cv_mem)
   if ((nst > 0) && (hprime != h)) CVAdjustParams(cv_mem);
   
   /* Looping point for attempts to take a step */
-  loop {  
+  for(;;) {  
 
     CVPredict(cv_mem);  
     CVSet(cv_mem);
@@ -2848,7 +2841,7 @@ static int CVNlsFunctional(CVodeMem cv_mem)
 
   /* Loop until convergence; accumulate corrections in acor */
 
-  loop {
+  for(;;) {
 
     nni++;
 
@@ -2932,7 +2925,7 @@ static int CVNlsNewton(CVodeMem cv_mem, int nflag)
      Evaluate f at the predicted y, call lsetup if indicated, and
      call CVNewtonIteration for the Newton iteration itself.      */
   
-  loop {
+  for(;;) {
 
     retval = f(tn, zn[0], ftemp, f_data);
     nfe++; 
@@ -2994,7 +2987,7 @@ static int CVNewtonIteration(CVodeMem cv_mem)
   del = delp = ZERO;
 
   /* Looping point for Newton iteration */
-  loop {
+  for(;;) {
 
     /* Evaluate the residual of the nonlinear system*/
     N_VLinearSum(rl1, zn[1], ONE, acor, tempv);
@@ -4151,7 +4144,7 @@ static int CVRootfindStd(CVodeMem cv_mem)
   /* A sign change was found.  Loop to locate nearest root. */
 
   side = 0;  sideprev = -1;
-  loop {                                    /* Looping point */
+  for(;;) {                                    /* Looping point */
 
     /* Set weight alpha.
        On the first two passes, set alpha = 1.  Thereafter, reset alpha
@@ -4663,7 +4656,7 @@ static int CVRootfindExt(CVodeMem cv_mem)
        /* A sign change was found.  Loop to locate nearest root. */
 
        side = 0;  sideprev = -1;
-       loop {                                    /* Looping point */
+       for(;;) {                                    /* Looping point */
 
                /* Set weight alpha.
                On the first two passes, set alpha = 1.  Thereafter, reset alpha
index a34b074..62eb3b8 100644 (file)
 
 /* 
  * =================================================================
- * MACRO DEFINITIONS
- * =================================================================
- */
-
-/* Macro: loop */
-#define loop for(;;)
-
-/* 
- * =================================================================
  * IDAS PRIVATE CONSTANTS
  * =================================================================
  */
@@ -1431,7 +1422,7 @@ int IDASolve(void *ida_mem, realtype tout, realtype *tret,
 
   /* Looping point for internal steps. */
 
-  loop {
+  for(;;) {
    
     /* Check for too many steps taken. */
     
@@ -2460,7 +2451,7 @@ static int IDAStep(IDAMem IDA_mem)
 
   /* Looping point for attempts to take a step */
 
-  loop {  
+  for(;;) {  
 
     /*-----------------------
       Set method coefficients
@@ -2651,7 +2642,7 @@ static int IDANls(IDAMem IDA_mem)
   /* Begin the main loop. This loop is traversed at most twice. 
      The second pass only occurs when the first pass had a recoverable
      failure with old Jacobian data */
-  loop{
+  for(;;){
 
     /* Compute predicted values for yy and yp, and compute residual there. */
     IDAPredict(IDA_mem);
@@ -2776,7 +2767,7 @@ static int IDANewtonIter(IDAMem IDA_mem)
   oldnrm = ZERO;
 
   /* Looping point for Newton iteration.  Break out on any error. */
-  loop {
+  for(;;) {
 
     nni++;
 
@@ -3479,7 +3470,7 @@ static int IDARootfindStd(IDAMem IDA_mem)
   /* A sign change was found.  Loop to locate nearest root. */
 
   side = 0;  sideprev = -1;
-  loop {                                    /* Looping point */
+  for(;;) {                                    /* Looping point */
 
     /* Set weight alph.
        On the first two passes, set alph = 1.  Thereafter, reset alph
@@ -3802,7 +3793,7 @@ static int IDARootfindExt(IDAMem IDA_mem)
        /* A sign change was found.  Loop to locate nearest root. */
 
        side = 0;  sideprev = -1;
-       loop {                                    /* Looping point */
+       for(;;) {                                    /* Looping point */
 
                /* Set weight alph.
                On the first two passes, set alph = 1.  Thereafter, reset alph
index ea5ce55..8534dc0 100644 (file)
@@ -24,9 +24,6 @@
 /* SUNDIALS EXTENSION */
 #include "sundials_extension.h"
 
-/* Macro: loop */
-#define loop for(;;)
-
 /*
  * =================================================================
  * IDA Constants 
@@ -548,7 +545,7 @@ static int IDALineSrch(IDAMem IDA_mem, realtype *delnorm, realtype *fnorm)
 
   /* Loop on linesearch variable lambda. */
 
-  loop {
+  for(;;) {
 
     /* Get new (y,y') = (ynew,ypnew) and norm of new function value. */
     IDANewyyp(IDA_mem, lambda);
index 41fe803..95b65a5 100644 (file)
 
 #include "kinsol_impl.h"
 #include <sundials/sundials_math.h>
-
-/* 
- * =================================================================
- * MACRO DEFINITIONS
- * =================================================================
- */
-
-/* Macro: loop */
-#define loop for(;;)
-
 /* 
  * =================================================================
  * KINSOL PRIVATE CONSTANTS
@@ -500,7 +490,7 @@ int KINSol(void *kinmem, N_Vector u, int strategy,
 
   if (inexact_ls && !noMinEps) epsmin = POINT01 * fnormtol;
 
-  loop{
+  for(;;){
 
     retry_nni = FALSE;
 
@@ -587,7 +577,7 @@ int KINSol(void *kinmem, N_Vector u, int strategy,
 
     fflush(errfp);
     
-  }  /* end of loop; return */
+  }  /* end of for(;;); return */
 
   if (printfl > 0)
     KINPrintInfo(kin_mem, PRNT_RETVAL, "KINSOL", "KINSol", INFO_RETVAL, ret);
@@ -974,7 +964,7 @@ static int KINLinSolDrv(KINMem kin_mem)
     update_fnorm_sub = TRUE;
   }
 
-  loop{
+  for(;;){
 
     jacCurrent = FALSE;
 
@@ -1255,7 +1245,7 @@ static int KINLineSearch(KINMem kin_mem, realtype *fnormp, realtype *f1normp,
 
   /* Loop until the ALPHA condition is satisfied. Terminate if rl becomes too small */
 
-  loop {
+  for(;;) {
     
     /* Evaluate test quantity */
 
index 5ba56c0..f39dbb6 100644 (file)
@@ -256,7 +256,7 @@ taucs_ccs_create(int m, int n, int nnz)
        sciprint(_("%s: No more memory.\n"),"taucs_ccs_create");
     return NULL; 
   }
-  matrix->flags = 0;;
+  matrix->flags = 0;
   matrix->n = n;
   matrix->m = m;
   matrix->colptr = (int*)    MALLOC((n+1) * sizeof(int));