renommer setx2() en setxx()

ajout de setxp()

lib/ulib/.ulibver

@@ -1 +1 @@
-004001000
+004002000

lib/ulib/base.compat

@@ -11,6 +11,7 @@ urequire base.core base.num base.bool base.quote
 ## Fonctions obsolètes
 
 # base.core
+function setx2() { setxx "$@"; }
 function rawecho() { recho "$@"; }
 function rawecho_() { recho_ "$@"; }
 function quote_arg() { _qval "$@"; }

lib/ulib/base.core

@@ -210,7 +210,7 @@ function evalx() {
     [ -n "$__e_val" ] && echo "$__e_val"
     return $__e_r
 }
-function setx2() {
+function setxx() {
 # équivalent à setx $1 evalx $2..@
     local -a __s_args
     if [ "$1" == -a ]; then __s_args=(-a); shift; fi
@@ -249,6 +249,18 @@ function evalp() {
     done
     eval "$__e_cmd"
 }
+function setxp() {
+# équivalent à setx $1 evalp $2..@
+    local -a __s_args
+    if [ "$1" == -a ]; then __s_args=(-a); shift; fi
+    local __s_var="$1"; shift
+    if [[ "$__s_var" == *=* ]]; then
+        set -- "${__s_var#*=}" "$@"
+        __s_var="${__s_var%%=*}"
+    fi
+    __s_args=("${__s_args[@]}" "$__s_var")
+    setx "${__s_args[@]}" evalp "$@"
+}
 function testx() {
 # Faire un test unaire avec la commande [ sur une valeur calculée avec evalx.
 # Utiliser la syntaxe 'testx op cmds...' e.g.