Ajout du parsing de type de fonction polymorph.

neno

@@ -63,6 +63,9 @@ B<man>
 
 =cut
 
+exitcode=$1
+shift
+
 _tmp=$(mktemp -d /tmp/no-error.XXXXX)
 true >$_tmp/stdout 2>$_tmp/stderr
 # Open the tmp-files for reading on file descriptor 21+22
@@ -74,11 +77,11 @@ exec 21<$_tmp/stdout 22<$_tmp/stderr
     eval "$@"
 ) >$_tmp/stdout 2>$_tmp/stderr 
 _error=$?
-if [ $_error == 0 ] ; then
+if [ $_error == $exitcode ] ; then
     # skip
     true
 else
     cat 0<&21
     cat 0<&22 >&2
+    exit 1
 fi
-exit $_error