modules/nutools
10
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

renommer setx2() en setxx()

Browse Source 
ajout de setxp()
This commit is contained in:
Jephte CLAIN 2014-10-18 20:23:21 +04:00
parent 6070957240
commit 938b12245f
3 changed files with 15 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/ulib/.ulibver
View File

@ -1 +1 @@
004001000 004002000

1
lib/ulib/base.compat
View File

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

14
lib/ulib/base.core
View File

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