Finalement, plusieurs criteres doublons ca peut etre utile d'apres FIl. Le...

Finalement, plusieurs criteres doublons ca peut etre utile d'apres FIl. Le premier qui comprend ce code a gagne le droit de corriger le prochain bug.

inc-compilo.php3

@@ -125,8 +125,10 @@ function calculer_boucle($id_boucle, &$boucles) {
 		    ")")) .
 		  "] = 1; // invalideurs\n";
 
+	// faudrait expanser le foreach a la compil, car y en a souvent qu'un 
+	// et puis faire un [] plutot qu'un "','."
 	if ($boucle->doublons)
-		$corps .= "		\$doublons[".$boucle->doublons."] .= ','. " .
+		$corps .= "		foreach(" . $boucle->doublons . ' as $k) $doublons[$k]= "," . ' .
 		index_pile($id_boucle, $primary, $boucles)
 		. "; // doublons\n";
 

inc-criteres.php3

@@ -55,8 +55,8 @@ function critere_doublons_dist($idb, &$boucles, $crit) {
 	  "calcul_mysql_in('".$boucle->id_table . '.' . $boucle->primary .
 	  "', " .
 	  '"0".$doublons[' . 
-	  $boucle->doublons .
-	  " = ('" .
+	  ($crit->not ? '' : ($boucle->doublons . "[]= ")) .
+	  "('" .
 	  $boucle->type_requete . 
 	  "' . " .
 	  calculer_liste($crit->param[0], array(), $boucles, $boucles[$idb]->id_parent) .

inc-html-squel.php3

@@ -335,7 +335,7 @@ function phraser_criteres($params, &$result) {
 
 	$args = array();
 	$type = $result->type_requete;
-	$doublons = "";
+	$doublons = array();
 	foreach($params as $v) {
 		$var = $v[1][0];
 		$param = ($var->type != 'texte') ? "" : $var->texte;
@@ -440,11 +440,8 @@ function phraser_criteres($params, &$result) {
 			  }
 			  if ((!ereg('^!?doublons *', $param)) || $crit->not)
 			    $args[] = $crit;
-			  elseif (!$doublons)
-			    $doublons = $crit;
 			  else 
-			    erreur_squelette(_T('zbug_critere_inconnu',
-						array('critere' => '2 doublons')));
+			    $doublons[] = $crit;
 			}
 		  }
 		}
@@ -452,7 +449,7 @@ function phraser_criteres($params, &$result) {
 	// les doublons non nies doivent etre le dernier critere
 	// pour que la variable $doublon_index ait la bonne valeur
 	// cf critere_doublon
-	if ($doublons) $args[] = $doublons;
+	if ($doublons) $args= array_merge($args, $doublons);
 	$result->criteres = $args;
 }