spip / SPIP

 * @return Champ

 *     Pile complétée par le code à générer

 **/

function balise_SET_dist($p) {

	$_nom = interprete_argument_balise(1, $p);

	$_val = interprete_argument_balise(2, $p);

	if (!$_nom or !$_val) {

		$err_b_s_a = array('zbug_balise_sans_argument', array('balise' => 'SET'));

		erreur_squelette($err_b_s_a, $p);

	}

	// affectation $_zzz inutile, mais permet de contourner un bug OpCode cache sous PHP 5.5.4

	// cf https://bugs.php.net/bug.php?id=65845

	else {

		$p->code = "vide(\$Pile['vars'][\$_zzz=(string)$_nom] = $_val)";

	}

	$p->interdire_scripts = false; // la balise ne renvoie rien

 * @return Champ

 *     Pile complétée par le code à générer

 **/

function balise_PIPELINE_dist($p) {

	$_pipe = interprete_argument_balise(1, $p);

	if (!$_pipe) {

		$err_b_s_a = array('zbug_balise_sans_argument', array('balise' => 'PIPELINE'));

		erreur_squelette($err_b_s_a, $p);

	} else {

		$_flux = interprete_argument_balise(2, $p);

		$_flux = $_flux ? $_flux : "''";

		$p->code = "pipeline( $_pipe , $_flux )";

		$p->interdire_scripts = false;

	}

	return $p;

}