inc-calcul.php3 inc-compilo.php3 1.112 1.23 1.113 1.24

Notifications Commit Core
1

Update of /home/spip-cvs/spip
In directory alan:/tmp/cvs-serv23760

Modified Files:
  inc-calcul.php3 inc-compilo.php3
Log Message:
simplifions un peu et unifions

Index: inc-calcul.php3

RCS file: /home/spip-cvs/spip/inc-calcul.php3,v
retrieving revision 1.112
retrieving revision 1.113
diff -u -d -r1.112 -r1.113
--- inc-calcul.php3 21 Sep 2004 22:23:25 -0000 1.112
+++ inc-calcul.php3 22 Sep 2004 08:02:40 -0000 1.113
@@ -59,14 +59,15 @@
   $sourcefile = $squelette . ".$ext";

   // le squelette est-il deja en memoire (<inclure> a repetition)
- if (function_exists($nom)) return $nom;
+ if (function_exists($nom))
+ return $nom;

   $phpfile = 'CACHE/skel_' . $nom . '.php';

   // le squelette est-il deja compile et perenne ?
   if (!squelette_obsolete($phpfile, $sourcefile)
- AND lire_fichier ($phpfile, $contenu,
- array('critique' => 'oui', 'phpcheck' => 'oui')))
+ AND lire_fichier ($phpfile, $contenu,
+ array('critique' => 'oui', 'phpcheck' => 'oui')))
     eval('?'.'>'.$contenu);

   // sinon, charger le compilateur et verifier que le source est lisible
@@ -81,31 +82,28 @@
   // Le point 1 exige qu'il soit lu dans tous les cas.
   // Le point 2 exige qu'il soit lu apres inc-compilo
   // (car celui-ci initialise $tables_principales) mais avant la compil
-
   $f = $squelette . '_fonctions.php3';
   if (file_exists($f)) include($f);

- if (function_exists($nom)) return $nom;
+ // A quoi sert ce test ???
+ if (function_exists($nom)) return $nom;

   $skel_code = calculer_squelette($skel, $nom, $ext, $sourcefile);

   // Tester si le compilateur renvoie une erreur
-
- if (!is_array($skel_code)) {
-// Parler au debugguer
- $skel_php = "<"."?php\n" . $skel_code ."\n?".">";
- if ($GLOBALS['var_debug'] AND
- $GLOBALS['debug_objet'] == $nom AND
- $GLOBALS['debug_affiche'] == 'code')
- debug_dumpfile ($skel_php);
- eval($skel_code);
+ if (is_array($skel_code))
+ erreur_squelette($skel_code[0], $skel_code[1]);
+ else {
+ if ($GLOBALS['var_debug']
+ AND $GLOBALS['debug_objet'] == $nom
+ AND $GLOBALS['debug_affiche'] == 'code')
+ debug_dumpfile ($skel_code);
+ eval('?'.'>'.$skel_code);
     if (function_exists($nom)) {
- ecrire_fichier ($phpfile, $skel_php);
- return $nom;
+ ecrire_fichier ($phpfile, $skel_code);
+ return $nom;
     }
   }
- erreur_squelette($skel_code[0], $skel_code[1]) ;
- return '';
}

# Provoque la recherche du squelette $fond d'une $lang donnee,

Index: inc-compilo.php3

RCS file: /home/spip-cvs/spip/inc-compilo.php3,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -d -r1.23 -r1.24
--- inc-compilo.php3 21 Sep 2004 19:40:08 -0000 1.23
+++ inc-compilo.php3 22 Sep 2004 08:02:40 -0000 1.24
@@ -646,7 +646,7 @@
   else
     $aff_boucles = "pas de boucle";

- $squelette_compile = "
+ $squelette_compile = "<"."?php
/*
  * Squelette : $sourcefile
  * Date : ".http_gmoddate(@filemtime($sourcefile))." GMT
@@ -668,7 +668,8 @@
     'invalideurs' => \$Cache
   );
}
-";
+
+?".">";

   if ($GLOBALS['var_debug'])
     squelette_debug_compile($nom, $sourcefile, $squelette_compile);

2

Le 22 sept. 04, à 10:02, Fil-commit a écrit :

+ // A quoi sert ce test ???
+ if (function_exists($nom)) return $nom;

C'est le cas où le squelette est déjà compilé mais vient seulement d'être chargé par le eval au-dessus:
on a besoin, avant de faire le return, de charger le fichier squelette_fontions.php3 lequel doit etre chargé après le chargement du compilo lequel n'est chargé que si le squelette n'est pas déjà compilé (tu suis toujours ?) d'où une petite redondance de test. On aurait pu aussi avoir le structure "si compilé charger le fichier de fonctions,
sinon charger le compîlo, le fichier de fonction et lancer la compil".

Au prochain commit, je vire ton commentaire :slight_smile:

      Emmanuel

3

Au prochain commit, je vire ton commentaire :slight_smile:

tu en ajouteras un autre, alors, plus clair j'espère (et sans accents !)

-- Fil