Changeset 2007 in Sophya

Timestamp:

May 16, 2002, 12:44:51 AM (23 years ago)

Author:

ansari

Message:

correction petit bug flag TOISrc - Reza 15/5/2002

File:

• trunk/ArchTOIPipe/ProcWSophya/simtoipr.cc (modified) (2 diffs)

trunk/ArchTOIPipe/ProcWSophya/simtoipr.cc

@@ -3 +3 @@
 //                               Christophe Magneville
 //                               Reza Ansari
-// $Id: simtoipr.cc,v 1.18 2002-05-13 15:50:50 ansari Exp $
+// $Id: simtoipr.cc,v 1.19 2002-05-15 22:44:51 ansari Exp $
 
 #include "config.h"
@@ -279 +279 @@
           }  // - Fin de detection de glitch
           else {  // Trop long ou trop court - ce n'est pas un glitch ...
-            for(ii=kgl; ii<k; ii++) {
-              if (k-kgl > maxpoints)  // Si trop long
-                putData(0, ii+snb, vin(ii%wsize), vfg(ii%wsize)|FlgToiSource);
-              else  // Trop court 
-                putData(0, ii+snb, vin(ii%wsize), vfg(ii%wsize));
-            }
+            uint_8 flg_src = 0;
+            if (k-kgl > maxpoints)  flg_src = FlgToiSource; // Si trop long
+            for(ii=kgl; ii<k; ii++) 
+              putData(0, ii+snb, vin(ii%wsize), vfg(ii%wsize)|flg_src);
+            
             lastput = snb+k-1;  
-          } 
+          }
         }
         putData(0, k+snb, vin(k%wsize), vfg(k%wsize));