build log

environment (text/plain), 61.62 KB, created by Ricky Marshall on 2010-03-21 02:04:14 UTC

declare -x ABI="amd64"
declare -x ALSA_CARDS=""
declare -x ALSA_PCM_PLUGINS="adpcm alaw asym copy dmix dshare dsnoop empty extplug file hooks iec958 ioplug ladspa lfloat linear meter mmap_emul mulaw multi null plug rate route share shm softvol"
declare -x ANT_HOME="/usr/share/ant"
declare -x APACHE2_MODULES="actions alias auth_basic authn_alias authn_anon authn_dbm authn_default authn_file authz_dbm authz_default authz_groupfile authz_host authz_owner authz_user autoindex cache dav dav_fs dav_lock deflate dir disk_cache env expires ext_filter file_cache filter headers include info log_config logio mem_cache mime mime_magic negotiation rewrite setenvif speling status unique_id userdir usertrack vhost_alias"
declare -x ARCH="amd64"
declare -x ASFLAGS_x86="--32"
declare -- CABAL_FEATURES="bin"
declare -- CABAL_HAS_BINARIES="yes"
declare -- CABAL_MIN_VERSION="1.1.4"
declare -x CBUILD="x86_64-pc-linux-gnu"
declare -x CDEFINE_amd64="__x86_64__"
declare -x CDEFINE_default="__unix__"
declare -x CDEFINE_x86="__i386__"
declare -x CFLAGS="-march=k8 -O2 -pipe"
declare -x CFLAGS_default=""
declare -x CFLAGS_x86="-m32"
declare -x CG_COMPILER_EXE="/opt/bin/cgc"
declare -x CHOST="x86_64-pc-linux-gnu"
declare -x CHOST_amd64="x86_64-pc-linux-gnu"
declare -x CHOST_default="x86_64-pc-linux-gnu"
declare -x CHOST_x86="i686-pc-linux-gnu"
declare -x CROSSCOMPILE_OPTS=""
declare -x CTARGET_default="x86_64-pc-linux-gnu"
declare -x CVS_RSH="ssh"
declare -x CXXFLAGS="-march=k8 -O2 -pipe"
declare -x DCCC_PATH="/usr/lib64/distcc/bin"
declare -x DEFAULT_ABI="amd64"
declare -- DEFINED_PHASES=" compile install postinst prerm setup"
declare -- DEPEND=">=dev-lang/ghc-6.4
		 >=dev-haskell/cabal-1.8
		>=dev-haskell/http-4000.0.2
		dev-haskell/network
		>=dev-haskell/zlib-0.4
		>=dev-haskell/time-1.1   >=dev-haskell/cabal-1.1.4"
declare -- DESCRIPTION="The command-line interface for Cabal and Hackage."
declare -x DESTTREE="/usr"
declare -x DIROPTIONS="-m0755"
declare -x EAPI="0"
declare -x ELIBC="glibc"
declare -x EXEOPTIONS="-m0755"
declare -x FEATURES="assume-digests distlocks fixpackages news parallel-fetch protect-owned sandbox sfperms strict unmerge-logs unmerge-orphans userfetch"
declare -x FLTK_DOCDIR="/usr/share/doc/fltk-1.1.10/html"
declare -x GDK_USE_XFT="1"
declare -x GUILE_LOAD_PATH="/usr/share/guile/1.8"
declare -- HOMEPAGE="http://www.haskell.org/cabal/"
declare -x INHERITED="toolchain-funcs versionator multilib bash-completion ghc-package haskell-cabal"
declare -x INPUT_DEVICES="evdev"
declare -x INSDESTTREE=""
declare -x INSOPTIONS="-m0644"
declare -- IUSE="  bash-completion"
declare -x JAVAC="/etc/java-config-2/current-system-vm/bin/javac"
declare -x JAVACC_HOME="/usr/share/javacc/"
declare -x JAVA_HOME="/etc/java-config-2/current-system-vm"
declare -x JDK_HOME="/etc/java-config-2/current-system-vm"
declare -x KERNEL="linux"
declare -x KERNEL_ABI="amd64"
declare -x KEYWORDS="~amd64 ~ppc64 ~sparc ~x86"
declare -x KV="2.6.32-gentoo-r1"
declare -x LANG="en_US.UTF-8"
declare -x LCD_DEVICES=""
declare -x LDFLAGS="-Wl,-O1"
declare -x LDFLAGS_default=""
declare -x LDFLAGS_x86="-m elf_i386"
declare -x LIBDIR_amd64="lib64"
declare -x LIBDIR_amd64_fbsd="lib64"
declare -x LIBDIR_default="lib"
declare -x LIBDIR_ppc="lib32"
declare -x LIBDIR_ppc64="lib64"
declare -x LIBDIR_sparc32="lib32"
declare -x LIBDIR_sparc64="lib64"
declare -x LIBDIR_x86="lib32"
declare -x LIBDIR_x86_fbsd="lib32"
declare -x LIBOPTIONS="-m0644"
declare -x LICENSE="BSD"
declare -x LIRC_DEVICES="hauppauge"
declare -x MULTILIB_ABIS="amd64 x86"
declare -x MULTILIB_STRICT_DENY="64-bit.*shared object"
declare -x MULTILIB_STRICT_DIRS="/lib32 /lib /usr/lib32 /usr/lib /usr/kde/*/lib32 /usr/kde/*/lib /usr/qt/*/lib32 /usr/qt/*/lib /usr/X11R6/lib32 /usr/X11R6/lib"
declare -x MULTILIB_STRICT_EXEMPT="(perl5|gcc|gcc-lib|binutils|eclipse-3|debug|portage)"
declare -x NETBEANS="apisupport cnd groovy gsf harness ide identity j2ee java mobility nb php profiler soa visualweb webcommon websvccommon xml"
declare -x OPENGL_PROFILE="xorg-x11"
declare -x PATH="/usr/bin:/opt/ghc/bin:/usr/lib64/portage/bin/ebuild-helpers:/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/opt/bin:/usr/x86_64-pc-linux-gnu/gcc-bin/4.4.3"
declare -- PDEPEND="  bash-completion? ( app-shells/bash-completion )"
declare -x PORTAGE_COMPRESS_EXCLUDE_SUFFIXES="css gif htm[l]? jp[e]?g js pdf png"
declare -x PROFILE_ONLY_VARIABLES="ARCH ELIBC KERNEL USERLAND"
declare -x PROPERTIES=""
declare -x PROVIDE=""
declare -x PYTHONDONTWRITEBYTECODE="1"
declare -x RDEPEND=">=dev-lang/ghc-6.4
		 >=dev-haskell/cabal-1.8  bash-completion? ( app-admin/eselect )"
declare -x RESTRICT=""
declare -x RUBY_TARGETS=""
declare -x S="/var/tmp/portage/dev-haskell/cabal-install-0.8.0/work/cabal-install-0.8.0"
declare -x SANDBOX_DEBUG="0"
declare -x SANDBOX_DENY=""
declare -x SANDBOX_PID="5570"
declare -x SANDBOX_PREDICT="/var/tmp/portage/dev-haskell/cabal-install-0.8.0/homedir:/dev/crypto:/var/cache/fontconfig"
declare -x SANDBOX_READ="/:/dev/stdin:/var/tmp"
declare -x SANDBOX_VERBOSE="1"
declare -x SANDBOX_WRITE=":/dev/console:/dev/fd:/dev/full:/dev/null:/dev/pts/:/dev/pty:/dev/shm:/dev/stderr:/dev/stdout:/dev/tts:/dev/tty:/dev/vc/:/dev/zero:/proc/self/fd:/tmp:/tmp/:/usr/lib32/cf:/usr/lib32/conftest:/usr/lib64/cf:/usr/lib64/conftest:/usr/lib/cf:/usr/lib/conftest:/usr/tmp/cf:/usr/tmp/conftest:/var/tmp:/var/tmp/:/var/tmp/portage/dev-haskell/cabal-install-0.8.0/homedir/.bash_history"
declare -x SANE_CONFIG_DIR="/etc/sane.d"
declare -x SCHEME_LIBRARY_PATH="/usr/share/slib/"
declare -x SLOT="0"
declare -- SRC_URI="http://hackage.haskell.org/packages/archive/cabal-install/0.8.0/cabal-install-0.8.0.tar.gz"
declare -x STAGE1_USE="multilib nptl nptlonly unicode"
declare -x SYMLINK_LIB="yes"
declare -x USB_DEVFS_PATH="/dev/bus/usb"
declare -x USE="amd64 bash-completion elibc_glibc kernel_linux multilib userland_GNU"
declare -x USERLAND="GNU"
declare -- VERSIONATOR_OLD_EXTGLOB="shopt -u extglob"
declare -- VERSIONATOR_RECURSION="0"
declare -x VIDEO_CARDS=""
declare -x XDG_CONFIG_DIRS="/etc/xdg"
declare -x XDG_DATA_DIRS="/usr/local/share:/usr/share"
declare -- _="PKG_INSTALL_MASK"
declare -- _CABAL_VERSION_CACHE=""
declare -x _E_DOCDESTTREE_=""
declare -x _E_EXEDESTTREE_=""
declare -- _GHC_LIBDIR_CACHE=""
declare -- _GHC_VERSION_CACHE=""
declare -- ___ECLASS_RECUR_MULTILIB="yes"
declare -- ___ECLASS_RECUR_TOOLCHAIN_FUNCS="yes"
declare -x bash4="4.1.2(1)-release"
declare -- conf="cabal-install-0.8.0-r0"
declare -- feature="bin"
declare -- filter_opts=""
__versionator__test_version_compare () 
{ 
    __versionator_shopt_toggle on;
    local lt=1 eq=2 gt=3 p q;
    function __versionator__test_version_compare_t () 
    { 
        version_compare "${1}" "${3}";
        local r=$?;
        [[ ${r} -eq ${2} ]] || echo "FAIL: ${@} (got ${r} exp ${2})"
    };
    echo "
		0             $lt 1
		1             $lt 2
		2             $gt 1
		2             $eq 2
		0             $eq 0
		10            $lt 20
		68            $eq 068
		068           $gt 67
		068           $lt 69

		1.0           $lt 2.0
		2.0           $eq 2.0
		2.0           $gt 1.0

		1.0           $gt 0.0
		0.0           $eq 0.0
		0.0           $lt 1.0

		0.1           $lt 0.2
		0.2           $eq 0.2
		0.3           $gt 0.2

		1.2           $lt 2.1
		2.1           $gt 1.2

		1.2.3         $lt 1.2.4
		1.2.4         $gt 1.2.3

		1.2.0         $eq 1.2
		1.2.1         $gt 1.2
		1.2           $lt 1.2.1

		1.2b          $eq 1.2b
		1.2b          $lt 1.2c
		1.2b          $gt 1.2a
		1.2b          $gt 1.2
		1.2           $lt 1.2a

		1.3           $gt 1.2a
		1.3           $lt 1.3a

		1.0_alpha7    $lt 1.0_beta7
		1.0_beta      $lt 1.0_pre
		1.0_pre5      $lt 1.0_rc2
		1.0_rc2       $lt 1.0

		1.0_p1        $gt 1.0
		1.0_p1-r1     $gt 1.0_p1

		1.0_alpha6-r1 $gt 1.0_alpha6
		1.0_beta6-r1  $gt 1.0_alpha6-r2

		1.0_pre1      $lt 1.0-p1

		1.0p          $gt 1.0_p1
		1.0r          $gt 1.0-r1
		1.6.15        $gt 1.6.10-r2
		1.6.10-r2     $lt 1.6.15

	" | while read a b c; do
        [[ -z "${a}${b}${c}" ]] && continue;
        __versionator__test_version_compare_t "${a}" "${b}" "${c}";
    done;
    for q in "alpha beta pre rc=${lt};${gt}" "p r=${gt};${lt}";
    do
        for p in ${q%%=*};
        do
            local c=${q##*=};
            local alt=${c%%;*} agt=${c##*;};
            __versionator__test_version_compare_t "1.0" $agt "1.0_${p}";
            __versionator__test_version_compare_t "1.0" $agt "1.0_${p}1";
            __versionator__test_version_compare_t "1.0" $agt "1.0_${p}068";
            __versionator__test_version_compare_t "2.0_${p}" $alt "2.0";
            __versionator__test_version_compare_t "2.0_${p}1" $alt "2.0";
            __versionator__test_version_compare_t "2.0_${p}068" $alt "2.0";
            __versionator__test_version_compare_t "1.0_${p}" $eq "1.0_${p}";
            __versionator__test_version_compare_t "0.0_${p}" $lt "0.0_${p}1";
            __versionator__test_version_compare_t "666_${p}3" $gt "666_${p}";
            __versionator__test_version_compare_t "1_${p}7" $lt "1_${p}8";
            __versionator__test_version_compare_t "1_${p}7" $eq "1_${p}7";
            __versionator__test_version_compare_t "1_${p}7" $gt "1_${p}6";
            __versionator__test_version_compare_t "1_${p}09" $eq "1_${p}9";
        done;
    done;
    for p in "-r" "_p";
    do
        __versionator__test_version_compare_t "7.2${p}1" $lt "7.2${p}2";
        __versionator__test_version_compare_t "7.2${p}2" $gt "7.2${p}1";
        __versionator__test_version_compare_t "7.2${p}3" $gt "7.2${p}2";
        __versionator__test_version_compare_t "7.2${p}2" $lt "7.2${p}3";
    done;
    __versionator_shopt_toggle off
}
__versionator_shopt_toggle () 
{ 
    VERSIONATOR_RECURSION=${VERSIONATOR_RECURSION:-0};
    case "$1" in 
        "on")
            if [[ $VERSIONATOR_RECURSION -lt 1 ]]; then
                VERSIONATOR_OLD_EXTGLOB=$(shopt -p extglob);
                shopt -s extglob;
            fi;
            VERSIONATOR_RECURSION=$(( $VERSIONATOR_RECURSION + 1 ))
        ;;
        "off")
            VERSIONATOR_RECURSION=$(( $VERSIONATOR_RECURSION - 1 ));
            if [[ $VERSIONATOR_RECURSION -lt 1 ]]; then
                eval $VERSIONATOR_OLD_EXTGLOB;
            fi
        ;;
    esac;
    return 0
}
_gcc-install-dir () 
{ 
    echo "$(LC_ALL=C $(tc-getCC) -print-search-dirs 2> /dev/null |		awk '$1=="install:" {print $2}')"
}
_gcc-specs-directive_raw () 
{ 
    local cc=$(tc-getCC);
    local specfiles=$(LC_ALL=C ${cc} -v 2>&1 | awk '$1=="Reading" {print $NF}');
    ${cc} -dumpspecs 2> /dev/null | cat - ${specfiles} | awk -v directive=$1 'BEGIN	{ pspec=""; spec=""; outside=1 }
$1=="*"directive":"  { pspec=spec; spec=""; outside=0; next }
	outside || NF==0 || ( substr($1,1,1)=="*" && substr($1,length($1),1)==":" ) { outside=1; next }
	spec=="" && substr($0,1,1)=="+" { spec=pspec " " substr($0,2); next }
	{ spec=spec $0 }
END	{ print spec }';
    return 0
}
_gcc-specs-exists () 
{ 
    [[ -f $(_gcc-install-dir)/$1 ]]
}
_unpack_tar () 
{ 
    if [ "${y}" == "tar" ]; then
        $1 -dc "$srcdir$x" | tar xof -;
        assert "$myfail";
    else
        $1 -dc "${srcdir}${x}" > ${x%.*} || die "$myfail";
    fi
}
bash-completion_pkg_postinst () 
{ 
    if use bash-completion; then
        elog "In the case that you haven't yet enabled command-line completion";
        elog "for ${PN}, you can run:";
        elog;
        elog "  eselect bashcomp enable ${BASH_COMPLETION_NAME:-${PN}}";
        elog;
        elog "to install locally, or";
        elog;
        elog "  eselect bashcomp enable --global ${BASH_COMPLETION_NAME:-${PN}}";
        elog;
        elog "to install system-wide.";
    fi
}
bashrc_has () 
{ 
    [[ " ${*:2} " == *" $1 "* ]]
}
cabal-bootstrap () 
{ 
    local setupmodule;
    local cabalpackage;
    if [[ -f "${S}/Setup.lhs" ]]; then
        setupmodule="${S}/Setup.lhs";
    else
        if [[ -f "${S}/Setup.hs" ]]; then
            setupmodule="${S}/Setup.hs";
        else
            die "No Setup.lhs or Setup.hs found";
        fi;
    fi;
    if version_is_at_least "6.4" "$(ghc-version)"; then
        cabalpackage=Cabal-$(cabal-version);
    else
        cabalpackage=Cabal;
    fi;
    einfo "Using cabal-$(cabal-version).";
    $(ghc-getghc) -package "${cabalpackage}" --make "${setupmodule}" -o setup || die "compiling ${setupmodule} failed"
}
cabal-build () 
{ 
    unset LANG LC_ALL LC_MESSAGES;
    ./setup build || die "setup build failed"
}
cabal-configure () 
{ 
    if [[ -n "${CABAL_USE_HADDOCK}" ]] && use doc; then
        cabalconf="${cabalconf} --with-haddock=/usr/bin/haddock";
    fi;
    if [[ -n "${CABAL_USE_PROFILE}" ]] && use profile; then
        cabalconf="${cabalconf} --enable-library-profiling";
    fi;
    if use ppc64; then
        cabalconf="${cabalconf} --disable-library-for-ghci";
    fi;
    if version_is_at_least "1.4" "$(cabal-version)"; then
        cabalconf="${cabalconf} --disable-executable-stripping";
    fi;
    if version_is_at_least "1.2.0" "$(cabal-version)"; then
        cabalconf="${cabalconf} --docdir=/usr/share/doc/${PF}";
        cabalconf="${cabalconf} --verbose";
    fi;
    ./setup configure --ghc --prefix=/usr --with-compiler="$(ghc-getghc)" --with-hc-pkg="$(ghc-getghcpkg)" --prefix=/usr --libdir=/usr/$(get_libdir) --libsubdir=${P}/ghc-$(ghc-version) --datadir=/usr/share/ --datasubdir=${P}/ghc-$(ghc-version) ${cabalconf} ${CABAL_CONFIGURE_FLAGS} "$@" || die "setup configure failed"
}
cabal-copy () 
{ 
    ./setup copy --destdir="${D}" || die "setup copy failed";
    rmdir "${D}/usr/bin" 2> /dev/null;
    if [[ -d "${D}/usr/bin" ]]; then
        chmod +x "${D}/usr/bin/"*;
    fi
}
cabal-haddock () 
{ 
    ./setup haddock || die "setup haddock failed"
}
cabal-is-dummy-lib () 
{ 
    for version in ${CABAL_CORE_LIB_GHC_PV[*]};
    do
        [[ "$(ghc-version)" == "$version" ]] && return 0;
    done;
    return 1
}
cabal-mksetup () 
{ 
    local setupdir;
    if [[ -n $1 ]]; then
        setupdir=$1;
    else
        setupdir=${S};
    fi;
    rm -f "${setupdir}"/Setup.{lhs,hs};
    echo 'import Distribution.Simple; main = defaultMainWithHooks defaultUserHooks' > $setupdir/Setup.hs
}
cabal-pkg () 
{ 
    local result;
    local err;
    if [[ -n ${CABAL_HAS_LIBRARIES} ]]; then
        if version_is_at_least "1.2.0" "$(cabal-version)"; then
            ./setup register --gen-pkg-config="${T}/${P}.conf";
            ghc-setup-pkg "${T}/${P}.conf";
            ghc-install-pkg;
        else
            sed -i "s|$(ghc-getghcpkg)|$(type -P true)|" .setup-config;
            ./setup register || die "setup register failed";
            if [[ -f .installed-pkg-config ]]; then
                ghc-setup-pkg .installed-pkg-config;
                ghc-install-pkg;
            else
                die "setup register has not generated a package configuration file";
            fi;
        fi;
    fi
}
cabal-version () 
{ 
    if [[ -z "${_CABAL_VERSION_CACHE}" ]]; then
        if [[ -n "${CABAL_BOOTSTRAP}" ]]; then
            _CABAL_VERSION_CACHE="${PV}";
        else
            if [[ -n "${CABAL_FROM_GHC}" ]]; then
                _CABAL_VERSION_CACHE="$(ghc-pkg field Cabal version | tail -n 1)";
                _CABAL_VERSION_CACHE="${_CABAL_VERSION_CACHE#"version: "}";
            else
                _CABAL_VERSION_CACHE="$(ghc-extractportageversion dev-haskell/cabal)";
            fi;
        fi;
    fi;
    echo "${_CABAL_VERSION_CACHE}"
}
cabal_src_compile () 
{ 
    if ! cabal-is-dummy-lib; then
        cabal-bootstrap;
        cabal-configure;
        cabal-build;
        if [[ -n "${CABAL_USE_HADDOCK}" ]] && use doc; then
            cabal-haddock;
        fi;
    fi
}
cabal_src_install () 
{ 
    if cabal-is-dummy-lib; then
        dodir "$(ghc-confdir)";
        echo '[]' > "${D}/$(ghc-confdir)/$(ghc-localpkgconf)";
    else
        cabal-copy;
        cabal-pkg;
        if [[ -n "${CABAL_USE_HADDOCK}" ]] && use doc; then
            if ! version_is_at_least "1.1.6" "$(cabal-version)"; then
                dohtml -r dist/doc/html/*;
            fi;
        fi;
    fi
}
create_ml_includes () 
{ 
    local dest=$1;
    shift;
    local basedirs=$(create_ml_includes-listdirs "$@");
    create_ml_includes-makedestdirs ${dest} ${basedirs};
    local file;
    for file in $(create_ml_includes-allfiles ${basedirs});
    do
        ( echo "/* Autogenerated by create_ml_includes() in multilib.eclass */";
        local dir;
        for dir in ${basedirs};
        do
            if [[ -f ${D}/${dir}/${file} ]]; then
                echo "";
                local sym=$(create_ml_includes-sym_for_dir ${dir} "$@");
                if [[ ${sym/=} != "${sym}" ]]; then
                    echo "#if ${sym}";
                else
                    if [[ ${sym::1} == "!" ]]; then
                        echo "#ifndef ${sym:1}";
                    else
                        echo "#ifdef ${sym}";
                    fi;
                fi;
                echo "# include <$(create_ml_includes-absolute ${dir}/${file})>";
                echo "#endif /* ${sym} */";
            fi;
        done ) > "${D}/${dest}/${file}";
    done
}
create_ml_includes-absolute () 
{ 
    local dst="$(create_ml_includes-tidy_path $1)";
    dst=(${dst//\// });
    local i;
    for ((i=0; i<${#dst[*]}; i++))
    do
        [ "${dst[i]}" == "include" ] && break;
    done;
    local strip_upto=$i;
    for ((i=strip_upto+1; i<${#dst[*]}-1; i++))
    do
        echo -n ${dst[i]}/;
    done;
    echo -n ${dst[i]}
}
create_ml_includes-allfiles () 
{ 
    [[ -z ${ED} ]] && local ED=${D};
    local basedir file;
    for basedir in "$@";
    do
        for file in $(find "${ED}"/${basedir} -type f);
        do
            echo ${file/${ED}\/${basedir}\//};
        done;
    done | sort | uniq
}
create_ml_includes-listdirs () 
{ 
    local dirs;
    local data;
    for data in "$@";
    do
        dirs="${dirs} ${data/*:/}";
    done;
    echo ${dirs:1}
}
create_ml_includes-makedestdirs () 
{ 
    local dest=$1;
    shift;
    local basedirs=$@;
    [[ -z ${ED} ]] && local ED=${D};
    dodir ${dest};
    local basedir;
    for basedir in ${basedirs};
    do
        local dir;
        for dir in $(find "${ED}"/${basedir} -type d);
        do
            dodir ${dest}/${dir/${ED}\/${basedir}/};
        done;
    done
}
create_ml_includes-sym_for_dir () 
{ 
    local dir=$1;
    shift;
    local data;
    for data in "$@";
    do
        if [[ ${data} == *:${dir} ]]; then
            echo ${data/:*/};
            return 0;
        fi;
    done;
    echo "Shouldn't be here -- create_ml_includes-sym_for_dir $1 $@";
    exit 1
}
create_ml_includes-tidy_path () 
{ 
    local removed=$1;
    if [ -n "${removed}" ]; then
        while [ "${removed}" != "${removed/\/\//\/}" ]; do
            removed=${removed/\/\//\/};
        done;
        while [ "${removed}" != "${removed//\/.\//\/}" ]; do
            removed=${removed//\/.\//\/};
        done;
        [ "${removed##*/}" = "." ] && removed=${removed%/*};
        while [ "${removed}" != "${removed//\/..\/}" ]; do
            local p1="${removed%%\/..\/*}";
            local p2="${removed#*\/..\/}";
            removed="${p1%\/*}/${p2}";
        done;
        [ "${removed##*/}" = ".." ] && removed=${removed%/*/*};
        [ "${removed##*/}" = "" ] && removed=${removed%/*};
        echo ${removed};
    fi
}
delete_all_version_separators () 
{ 
    __versionator_shopt_toggle on;
    replace_all_version_separators "" "${1}";
    __versionator_shopt_toggle off
}
delete_version_separator () 
{ 
    __versionator_shopt_toggle on;
    replace_version_separator "${1}" "" "${2}";
    __versionator_shopt_toggle off
}
dobashcompletion () 
{ 
    [[ -z "$1" ]] && die "usage: dobashcompletion <file> <new file>";
    [[ -z "${BASH_COMPLETION_NAME}" ]] && BASH_COMPLETION_NAME="${2:-${PN}}";
    if use bash-completion; then
        insinto /usr/share/bash-completion;
        newins "$1" "${BASH_COMPLETION_NAME}" || die "Failed to install $1";
    fi
}
dyn_pretend () 
{ 
    ebuild_phase_with_hooks pkg_pretend
}
filter_invalid_flags () 
{ 
    local flag broken_flags;
    eval broken_flags=($(get_broken_flags $(getPROG CC gcc) c ${CFLAGS}));
    for flag in "${broken_flags[@]}";
    do
        ewarn "Filtering out invalid CFLAG \"${flag}\"";
        CFLAGS="$(remove_flag "${flag}" ${CFLAGS})";
    done;
    eval broken_flags=($(get_broken_flags $(getPROG CXX g++) c++ ${CXXFLAGS}));
    for flag in "${broken_flags[@]}";
    do
        ewarn "Filtering out invalid CXXFLAG \"${flag}\"";
        CXXFLAGS="$(remove_flag "${flag}" ${CXXFLAGS})";
    done
}
gcc-fullversion () 
{ 
    $(tc-getCC "$@") -dumpversion
}
gcc-major-version () 
{ 
    gcc-version "$@" | cut -f1 -d.
}
gcc-micro-version () 
{ 
    gcc-fullversion "$@" | cut -f3 -d. | cut -f1 -d-
}
gcc-minor-version () 
{ 
    gcc-version "$@" | cut -f2 -d.
}
gcc-specs-directive () 
{ 
    local directive subdname subdirective;
    directive="$(_gcc-specs-directive_raw $1)";
    while [[ ${directive} == *%\(*\)* ]]; do
        subdname=${directive/*%\(};
        subdname=${subdname/\)*};
        subdirective="$(_gcc-specs-directive_raw ${subdname})";
        directive="${directive//\%(${subdname})/${subdirective}}";
    done;
    echo "${directive}";
    return 0
}
gcc-specs-nostrict () 
{ 
    local directive;
    directive=$(gcc-specs-directive cc1);
    return $([[ "${directive/\{!fstrict-overflow:}" != "${directive}" ]])
}
gcc-specs-now () 
{ 
    local directive;
    directive=$(gcc-specs-directive link_command);
    return $([[ "${directive/\{!nonow:}" != "${directive}" ]])
}
gcc-specs-pie () 
{ 
    local directive;
    directive=$(gcc-specs-directive cc1);
    return $([[ "${directive/\{!nopie:}" != "${directive}" ]])
}
gcc-specs-relro () 
{ 
    local directive;
    directive=$(gcc-specs-directive link_command);
    return $([[ "${directive/\{!norelro:}" != "${directive}" ]])
}
gcc-specs-ssp () 
{ 
    local directive;
    directive=$(gcc-specs-directive cc1);
    return $([[ "${directive/\{!fno-stack-protector:}" != "${directive}" ]])
}
gcc-specs-ssp-to-all () 
{ 
    local directive;
    directive=$(gcc-specs-directive cc1);
    return $([[ "${directive/\{!fno-stack-protector-all:}" != "${directive}" ]])
}
gcc-version () 
{ 
    gcc-fullversion "$@" | cut -f1,2 -d.
}
gen_usr_ldscript () 
{ 
    local lib libdir=$(get_libdir) output_format="" auto=false suffix=$(get_libname);
    [[ -z ${ED+set} ]] && local ED=${D%/}${EPREFIX}/;
    tc-is-static-only && return;
    dodir /usr/${libdir};
    if [[ $1 == "-a" ]]; then
        auto=true;
        shift;
        dodir /${libdir};
    fi;
    output_format=$($(tc-getCC) ${CFLAGS} ${LDFLAGS} -Wl,--verbose 2>&1 | sed -n 's/^OUTPUT_FORMAT("\([^"]*\)",.*/\1/p');
    [[ -n ${output_format} ]] && output_format="OUTPUT_FORMAT ( ${output_format} )";
    for lib in "$@";
    do
        local tlib;
        if ${auto}; then
            lib="lib${lib}${suffix}";
        else
            [[ -r ${ED}/${libdir}/${lib} ]] || continue;
        fi;
        case ${CTARGET:-${CHOST}} in 
            *-darwin*)
                if ${auto}; then
                    tlib=$(scanmacho -qF'%S#F' "${ED}"/usr/${libdir}/${lib});
                else
                    tlib=$(scanmacho -qF'%S#F' "${ED}"/${libdir}/${lib});
                fi;
                [[ -z ${tlib} ]] && die "unable to read install_name from ${lib}";
                tlib=${tlib##*/};
                if ${auto}; then
                    mv "${ED}"/usr/${libdir}/${lib%${suffix}}.*${suffix#.} "${ED}"/${libdir}/ || die;
                    if [[ ${tlib} != ${lib%${suffix}}.*${suffix#.} ]]; then
                        mv "${ED}"/usr/${libdir}/${tlib%${suffix}}.*${suffix#.} "${ED}"/${libdir}/ || die;
                    fi;
                    rm -f "${ED}"/${libdir}/${lib};
                fi;
                if [[ ! -w "${ED}/${libdir}/${tlib}" ]]; then
                    chmod u+w "${ED}${libdir}/${tlib}";
                    local nowrite=yes;
                fi;
                install_name_tool -id "${EPREFIX}"/${libdir}/${tlib} "${ED}"/${libdir}/${tlib} || die "install_name_tool failed";
                [[ -n ${nowrite} ]] && chmod u-w "${ED}${libdir}/${tlib}";
                pushd "${ED}/usr/${libdir}" > /dev/null;
                ln -snf "../../${libdir}/${tlib}" "${lib}";
                popd > /dev/null
            ;;
            *-aix* | *-irix* | *64*-hpux* | *-interix* | *-winnt*)
                if ${auto}; then
                    mv "${ED}"/usr/${libdir}/${lib}* "${ED}"/${libdir}/ || die;
                    tlib=$(readlink "${ED}"/${libdir}/${lib});
                    tlib=${tlib##*/};
                    if [[ -z ${tlib} ]]; then
                        tlib=${lib};
                    else
                        rm -f "${ED}"/${libdir}/${lib};
                    fi;
                else
                    tlib=${lib};
                fi;
                pushd "${ED}/usr/${libdir}" > /dev/null;
                ln -snf "../../${libdir}/${tlib}" "${lib}";
                popd > /dev/null
            ;;
            hppa*-hpux*)
                if ${auto}; then
                    tlib=$(chatr "${ED}"/usr/${libdir}/${lib} | sed -n '/internal name:/{n;s/^ *//;p;q}');
                    [[ -z ${tlib} ]] && tlib=${lib};
                    tlib=${tlib##*/};
                    mv "${ED}"/usr/${libdir}/${lib}* "${ED}"/${libdir}/ || die;
                    if [[ ${tlib} != ${lib}* ]]; then
                        mv "${ED}"/usr/${libdir}/${tlib}* "${ED}"/${libdir}/ || die;
                    fi;
                    [[ ${tlib} != ${lib} ]] && rm -f "${ED}"/${libdir}/${lib};
                else
                    tlib=$(chatr "${ED}"/${libdir}/${lib} | sed -n '/internal name:/{n;s/^ *//;p;q}');
                    [[ -z ${tlib} ]] && tlib=${lib};
                    tlib=${tlib##*/};
                fi;
                pushd "${ED}"/usr/${libdir} > /dev/null;
                ln -snf "../../${libdir}/${tlib}" "${lib}";
                [[ ${tlib} != ${lib} ]] && ln -snf "../../${libdir}/${tlib}" "${tlib}";
                popd > /dev/null
            ;;
            *)
                if ${auto}; then
                    tlib=$(scanelf -qF'%S#F' "${ED}"/usr/${libdir}/${lib});
                    [[ -z ${tlib} ]] && die "unable to read SONAME from ${lib}";
                    mv "${ED}"/usr/${libdir}/${lib}* "${ED}"/${libdir}/ || die;
                    if [[ ${tlib} != ${lib}* ]]; then
                        mv "${ED}"/usr/${libdir}/${tlib}* "${ED}"/${libdir}/ || die;
                    fi;
                    rm -f "${ED}"/${libdir}/${lib};
                else
                    tlib=${lib};
                fi;
                cat > "${ED}/usr/${libdir}/${lib}"  <<-END_LDSCRIPT
/* GNU ld script
   Since Gentoo has critical dynamic libraries in /lib, and the static versions
   in /usr/lib, we need to have a "fake" dynamic lib in /usr/lib, otherwise we
   run into linking problems.  This "fake" dynamic lib is a linker script that
   redirects the linker to the real lib.  And yes, this works in the cross-
   compiling scenario as the sysroot-ed linker will prepend the real path.

   See bug http://bugs.gentoo.org/4411 for more info.
 */
${output_format}
GROUP ( ${EPREFIX}/${libdir}/${tlib} )
END_LDSCRIPT

            ;;
        esac
        fperms a+x "/usr/${libdir}/${lib}" || die "could not change perms on ${lib}";
    done
}
getPROG () 
{ 
    local var=$1 prog=$2;
    if [[ -n ${!var} ]]; then
        echo "${!var}";
        return 0;
    fi;
    local search=;
    [[ -n $3 ]] && search=$(type -p "$3-${prog}");
    [[ -z ${search} && -n ${CHOST} ]] && search=$(type -p "${CHOST}-${prog}");
    [[ -n ${search} ]] && prog=${search##*/};
    export ${var}=${prog};
    echo "${!var}"
}
get_abi_ASFLAGS () 
{ 
    get_abi_var ASFLAGS "$@"
}
get_abi_CDEFINE () 
{ 
    get_abi_var CDEFINE "$@"
}
get_abi_CFLAGS () 
{ 
    get_abi_var CFLAGS "$@"
}
get_abi_CHOST () 
{ 
    get_abi_var CHOST "$@"
}
get_abi_CTARGET () 
{ 
    get_abi_var CTARGET "$@"
}
get_abi_FAKE_TARGETS () 
{ 
    get_abi_var FAKE_TARGETS "$@"
}
get_abi_LDFLAGS () 
{ 
    get_abi_var LDFLAGS "$@"
}
get_abi_LIBDIR () 
{ 
    get_abi_var LIBDIR "$@"
}
get_abi_var () 
{ 
    local flag=$1;
    local abi;
    if [ $# -gt 1 ]; then
        abi=${2};
    else
        if [ -n "${ABI}" ]; then
            abi=${ABI};
        else
            if [ -n "${DEFAULT_ABI}" ]; then
                abi=${DEFAULT_ABI};
            else
                abi="default";
            fi;
        fi;
    fi;
    local var="${flag}_${abi}";
    echo ${!var}
}
get_after_major_version () 
{ 
    __versionator_shopt_toggle on;
    echo $(get_version_component_range 2- "${1:-${PV}}" );
    __versionator_shopt_toggle off
}
get_all_abis () 
{ 
    local order="";
    if [[ -z ${MULTILIB_ABIS} ]]; then
        echo "default";
        return 0;
    fi;
    for x in ${MULTILIB_ABIS};
    do
        if [[ ${x} != ${DEFAULT_ABI} ]]; then
            order="${order:+${order} }${x}";
        fi;
    done;
    order="${order:+${order} }${DEFAULT_ABI}";
    echo ${order};
    return 0
}
get_all_libdirs () 
{ 
    local libdirs="lib";
    local abi;
    local dir;
    for abi in ${MULTILIB_ABIS};
    do
        [ "$(get_abi_LIBDIR ${abi})" != "lib" ] && libdirs="${libdirs} $(get_abi_LIBDIR ${abi})";
    done;
    echo "${libdirs}"
}
get_all_version_components () 
{ 
    __versionator_shopt_toggle on;
    local ver_str=${1:-${PV}} result result_idx=0;
    result=();
    if [[ "${VERSIONATOR_CACHE_VER_STR}" == "${ver_str}" ]]; then
        echo ${VERSIONATOR_CACHE_RESULT};
        __versionator_shopt_toggle off;
        return;
    fi;
    export VERSIONATOR_CACHE_VER_STR="${ver_str}";
    while [[ -n "$ver_str" ]]; do
        case "${ver_str:0:1}" in 
            [[:digit:]])
                result[$result_idx]="${ver_str%%[^[:digit:]]*}";
                ver_str="${ver_str##+([[:digit:]])}";
                result_idx=$(($result_idx + 1))
            ;;
            [-_.])
                result[$result_idx]="${ver_str:0:1}";
                ver_str="${ver_str:1}";
                result_idx=$(($result_idx + 1))
            ;;
            [[:alpha:]])
                local not_match="${ver_str##+([[:alpha:]])*([[:digit:]])}";
                result[$result_idx]=${ver_str:0:$((${#ver_str} - ${#not_match}))};
                ver_str="${not_match}";
                result_idx=$(($result_idx + 1))
            ;;
            *)
                result[$result_idx]="${ver_str:0:1}";
                ver_str="${ver_str:1}";
                result_idx=$(($result_idx + 1))
            ;;
        esac;
    done;
    export VERSIONATOR_CACHE_RESULT="${result[@]}";
    echo ${result[@]};
    __versionator_shopt_toggle off
}
get_broken_flags () 
{ 
    local myprog="${1}" lang="${2}";
    shift 2;
    echo 'main(){}' | LC_ALL=C ${myprog} ${@} -x ${lang} -o /dev/null - 2>&1 | egrep "unrecognized .*option" | egrep -o -- '('\''|\"|`)-.*' | sed -r 's/('\''|`|")//g; s/^/"/; s/$/"/';
    echo 'main(){}' | LC_ALL=C ${myprog} ${@} -x ${lang} -o /dev/null - 2>&1 | egrep "unrecognised debug output" | egrep -o -- '('\''|\"|`).*' | sed -r 's/('\''|`|")//g; s/^/"-g/; s/$/"/'
}
get_install_abis () 
{ 
    local order="";
    if [[ -z ${MULTILIB_ABIS} ]]; then
        echo "default";
        return 0;
    fi;
    if [[ ${EMULTILIB_PKG} == "true" ]]; then
        for x in ${MULTILIB_ABIS};
        do
            if [[ ${x} != "${DEFAULT_ABI}" ]]; then
                hasq ${x} ${ABI_DENY} || ordera="${ordera} ${x}";
            fi;
        done;
        hasq ${DEFAULT_ABI} ${ABI_DENY} || order="${ordera} ${DEFAULT_ABI}";
        if [[ -n ${ABI_ALLOW} ]]; then
            local ordera="";
            for x in ${order};
            do
                if hasq ${x} ${ABI_ALLOW}; then
                    ordera="${ordera} ${x}";
                fi;
            done;
            order=${ordera};
        fi;
    else
        order=${DEFAULT_ABI};
    fi;
    if [[ -z ${order} ]]; then
        die "The ABI list is empty.  Are you using a proper multilib profile?  Perhaps your USE flags or MULTILIB_ABIS are too restrictive for this package.";
    fi;
    echo ${order};
    return 0
}
get_last_version_component_index () 
{ 
    __versionator_shopt_toggle on;
    echo $(( $(get_version_component_count "${1:-${PV}}" ) - 1 ));
    __versionator_shopt_toggle off
}
get_libdir () 
{ 
    local CONF_LIBDIR;
    if [ -n "${CONF_LIBDIR_OVERRIDE}" ]; then
        echo ${CONF_LIBDIR_OVERRIDE};
    else
        get_abi_LIBDIR;
    fi
}
get_libdir_override () 
{ 
    if has_multilib_profile; then
        eerror "get_libdir_override called, but it shouldn't be needed with the new multilib approach.  Please file a bug at http://bugs.gentoo.org and assign it to [e-mail]";
        exit 1;
    fi;
    CONF_LIBDIR="$1";
    CONF_LIBDIR_OVERRIDE="$1";
    LIBDIR_default="$1"
}
get_libname () 
{ 
    local libname;
    local ver=$1;
    case ${CHOST} in 
        *-cygwin | mingw* | *-mingw*)
            libname="dll"
        ;;
        *-darwin*)
            libname="dylib"
        ;;
        *-aix*)
            libname="a"
        ;;
        *-mint*)
            libname="irrelevant"
        ;;
        hppa*-hpux*)
            libname="sl"
        ;;
        *)
            libname="so"
        ;;
    esac;
    if [[ -z $* ]]; then
        echo ".${libname}";
    else
        for ver in "$@";
        do
            case ${CHOST} in 
                *-darwin*)
                    echo ".${ver}.${libname}"
                ;;
                *-aix*)
                    echo ".${libname}"
                ;;
                *-mint*)
                    echo ".${libname}"
                ;;
                *)
                    echo ".${libname}.${ver}"
                ;;
            esac;
        done;
    fi
}
get_major_version () 
{ 
    __versionator_shopt_toggle on;
    local c;
    c=($(get_all_version_components "${1:-${PV}}" ));
    echo ${c[0]};
    __versionator_shopt_toggle off
}
get_ml_incdir () 
{ 
    local dir=/usr/include;
    if [[ $# -gt 0 ]]; then
        incdir=$1;
        shift;
    fi;
    if [[ -z "${MULTILIB_ABIS}" ]]; then
        echo ${incdir};
        return 0;
    fi;
    local abi=${ABI-${DEFAULT_ABI}};
    if [[ $# -gt 0 ]]; then
        abi=$1;
        shift;
    fi;
    if [[ -d "${dir}/gentoo-multilib/${abi}" ]]; then
        echo ${dir}/gentoo-multilib/${abi};
    else
        echo ${dir};
    fi
}
get_modname () 
{ 
    local modname;
    local ver=$1;
    case ${CHOST} in 
        *-darwin*)
            modname="bundle"
        ;;
        *)
            modname="so"
        ;;
    esac;
    echo ".${modname}"
}
get_multilibdir () 
{ 
    if has_multilib_profile; then
        eerror "get_multilibdir called, but it shouldn't be needed with the new multilib approach.  Please file a bug at http://bugs.gentoo.org and assign it to [e-mail]";
        exit 1;
    fi;
    echo ${CONF_MULTILIBDIR:=lib32}
}
get_version_component_count () 
{ 
    __versionator_shopt_toggle on;
    local a;
    a=($(get_version_components "${1:-${PV}}" ));
    echo ${#a[@]};
    __versionator_shopt_toggle off
}
get_version_component_range () 
{ 
    __versionator_shopt_toggle on;
    local c v="${2:-${PV}}" range="${1}" range_start range_end i=-1 j=0;
    c=($(get_all_version_components ${v} ));
    range_start="${range%-*}";
    range_start="${range_start:-1}";
    range_end="${range#*-}";
    range_end="${range_end:-${#c[@]}}";
    while (( j < ${range_start} )); do
        i=$(($i + 1));
        [[ $i -gt ${#c[@]} ]] && __versionator_shopt_toggle off && return;
        [[ -n "${c[${i}]//[-._]}" ]] && j=$(($j + 1));
    done;
    while (( j <= ${range_end} )); do
        echo -n ${c[$i]};
        [[ $i -gt ${#c[@]} ]] && __versionator_shopt_toggle off && return;
        [[ -n "${c[${i}]//[-._]}" ]] && j=$(($j + 1));
        i=$(($i + 1));
    done;
    __versionator_shopt_toggle off
}
get_version_components () 
{ 
    __versionator_shopt_toggle on;
    local c="$(get_all_version_components "${1:-${PV}}")";
    c=(${c[@]//[-._]/ });
    echo ${c[@]};
    __versionator_shopt_toggle off
}
ghc-bestcabalversion () 
{ 
    local cabalversion;
    if ghc-cabal; then
        cabalversion="$(ghc-extractportageversion dev-haskell/cabal)";
        echo "Cabal-${cabalversion}";
    else
        echo Cabal;
    fi
}
ghc-cabal () 
{ 
    version_is_at_least "6.4" "$(ghc-version)"
}
ghc-confdir () 
{ 
    echo "$(ghc-libdir)/gentoo"
}
ghc-elem () 
{ 
    local i;
    for i in $2;
    do
        [[ "$1" == "${i}" ]] && return 0;
    done;
    return 1
}
ghc-extractportageversion () 
{ 
    local pkg;
    local version;
    pkg="$(best_version $1)";
    version="${pkg#$1-}";
    version="${version%-r*}";
    version="${version%_pre*}";
    echo "${version}"
}
ghc-fixlibpath () 
{ 
    sed -i "s|$1|$(ghc-libdir)|g" "${S}/$(ghc-localpkgconf)";
    if [[ -n "$2" ]]; then
        sed -i "s|$2|$(ghc-libdir)/imports|g" "${S}/$(ghc-localpkgconf)";
    fi
}
ghc-getghc () 
{ 
    type -P ghc
}
ghc-getghcpkg () 
{ 
    type -P ghc-pkg
}
ghc-getghcpkgbin () 
{ 
    if version_is_at_least "6.10" "$(ghc-version)"; then
        echo '[]' > "${T}/empty.conf";
        echo "$(ghc-libdir)/ghc-pkg" "--global-conf=${T}/empty.conf";
    else
        if ghc-cabal; then
            echo '[]' > "${T}/empty.conf";
            echo "$(ghc-libdir)/ghc-pkg.bin" "--global-conf=${T}/empty.conf";
        else
            echo "$(ghc-libdir)/ghc-pkg.bin";
        fi;
    fi
}
ghc-install-pkg () 
{ 
    mkdir -p "${D}/$(ghc-confdir)";
    cat "${S}/$(ghc-localpkgconf)" | sed "s|${D}||g" > "${D}/$(ghc-confdir)/$(ghc-localpkgconf)"
}
ghc-libdir () 
{ 
    if [[ -z "${_GHC_LIBDIR_CACHE}" ]]; then
        _GHC_LIBDIR_CACHE="$($(ghc-getghc) --print-libdir)";
    fi;
    echo "${_GHC_LIBDIR_CACHE}"
}
ghc-listpkg () 
{ 
    local ghcpkgcall;
    local i;
    for i in $*;
    do
        if ghc-cabal; then
            echo $($(ghc-getghcpkg) list -f "${i}") | sed -e "s|^.*${i}:\([^:]*\).*$|\1|" -e "s|/.*$||" -e "s|,| |g" -e "s|[(){}]||g";
        else
            echo $($(ghc-getghcpkgbin) -l -f "${i}") | cut -f2 -d':' | sed 's:,: :g';
        fi;
    done
}
ghc-localpkgconf () 
{ 
    echo "${PF}.conf"
}
ghc-makeghcilib () 
{ 
    local outfile;
    outfile="$(dirname $1)/$(basename $1 | sed 's:^lib\?\(.*\)\.a$:\1.o:')";
    ld --relocatable --discard-all --output="${outfile}" --whole-archive "$1"
}
ghc-package-exists () 
{ 
    local describe_flag;
    if version_is_at_least "6.4" "$(ghc-version)"; then
        describe_flag="describe";
    else
        describe_flag="--show-package";
    fi;
    $(ghc-getghcpkg) "${describe_flag}" "$1" > /dev/null 2>&1
}
ghc-package_pkg_postinst () 
{ 
    ghc-register-pkg "$(ghc-localpkgconf)"
}
ghc-package_pkg_prerm () 
{ 
    ghc-unregister-pkg "$(ghc-localpkgconf)"
}
ghc-package_pkg_setup () 
{ 
    if ! ghc-saneghc; then
        eerror "You have inconsistent versions of dev-lang/ghc and dev-lang/ghc-bin";
        eerror "installed. Portage currently cannot work correctly with this setup.";
        eerror "There are several possibilities to work around this problem:";
        eerror "(1) Up/downgrade ghc-bin to the same version as ghc.";
        eerror "(2) Unmerge ghc-bin.";
        eerror "(3) Unmerge ghc.";
        eerror "You probably want option 1 or 2.";
        die "Inconsistent versions of ghc and ghc-bin.";
    fi
}
ghc-register-pkg () 
{ 
    local localpkgconf;
    localpkgconf="$(ghc-confdir)/$1";
    local update_flag;
    local describe_flag;
    if version_is_at_least "6.4" "$(ghc-version)"; then
        update_flag="update -";
        describe_flag="describe";
    else
        update_flag="--update-package";
        describe_flag="--show-package";
    fi;
    if [[ -f "${localpkgconf}" ]]; then
        for pkg in $(ghc-listpkg "${localpkgconf}");
        do
            ebegin "Registering ${pkg} ";
            $(ghc-getghcpkgbin) -f "${localpkgconf}" "${describe_flag}" "${pkg}" | $(ghc-getghcpkg) ${update_flag} --force > /dev/null;
            eend $?;
        done;
    fi
}
ghc-reregister () 
{ 
    einfo "Re-adding packages (may cause several harmless warnings) ...";
    PATH="/usr/bin:${PATH}" CONFDIR="$(ghc-confdir)";
    if [ -d "${CONFDIR}" ]; then
        pushd "${CONFDIR}" > /dev/null;
        for conf in *.conf;
        do
            PATH="/usr/bin:${PATH}" ghc-register-pkg "${conf}";
        done;
        popd > /dev/null;
    fi
}
ghc-reverse () 
{ 
    local result;
    local i;
    for i in $1;
    do
        result="${i} ${result}";
    done;
    echo "${result}"
}
ghc-sanecabal () 
{ 
    local f;
    local version;
    if [[ -z "$1" ]]; then
        version="1.0.1";
    else
        version="$1";
    fi;
    for f in $(ghc-confdir)/cabal-*;
    do
        [[ -f "${f}" ]] && version_is_at_least "${version}" "${f#*cabal-}" && return;
    done;
    return 1
}
ghc-saneghc () 
{ 
    local ghcversion;
    local ghcbinversion;
    if [[ "${PN}" == "ghc" || "${PN}" == "ghc-bin" ]]; then
        return;
    fi;
    if has_version dev-lang/ghc && has_version dev-lang/ghc-bin; then
        ghcversion="$(ghc-extractportageversion dev-lang/ghc)";
        ghcbinversion="$(ghc-extractportageversion dev-lang/ghc-bin)";
        if [[ "${ghcversion}" != "${ghcbinversion}" ]]; then
            return 1;
        fi;
    fi;
    return
}
ghc-setup-pkg () 
{ 
    local localpkgconf;
    localpkgconf="${S}/$(ghc-localpkgconf)";
    echo '[]' > "${localpkgconf}";
    local update_flag;
    if version_is_at_least "6.4" "$(ghc-version)"; then
        update_flag="update -";
    else
        update_flag="--update-package";
    fi;
    for pkg in $*;
    do
        $(ghc-getghcpkgbin) -f "${localpkgconf}" ${update_flag} --force < "${pkg}" || die "failed to register ${pkg}";
    done
}
ghc-unregister-pkg () 
{ 
    local localpkgconf;
    local i;
    local pkg;
    local protected;
    local unregister_flag;
    localpkgconf="$(ghc-confdir)/$1";
    if version_is_at_least "6.4" "$(ghc-version)"; then
        unregister_flag="unregister";
    else
        unregister_flag="--remove-package";
    fi;
    for i in $(ghc-confdir)/*.conf;
    do
        [[ "${i}" != "${localpkgconf}" ]] && protected="${protected} $(ghc-listpkg ${i})";
    done;
    if [[ -f "${localpkgconf}" ]]; then
        for pkg in $(ghc-reverse "$(ghc-listpkg ${localpkgconf})");
        do
            if $(ghc-elem "${pkg}" "${protected}"); then
                einfo "Package ${pkg} is protected.";
            else
                if ! ghc-package-exists "${pkg}"; then
                    :;
                else
                    ebegin "Unregistering ${pkg} ";
                    $(ghc-getghcpkg) "${unregister_flag}" "${pkg}" --force > /dev/null;
                    eend $?;
                fi;
            fi;
        done;
    fi
}
ghc-version () 
{ 
    if [[ -z "${_GHC_VERSION_CACHE}" ]]; then
        _GHC_VERSION_CACHE="$($(ghc-getghc) --numeric-version)";
    fi;
    echo "${_GHC_VERSION_CACHE}"
}
has_multilib_profile () 
{ 
    [ -n "${MULTILIB_ABIS}" -a "${MULTILIB_ABIS}" != "${MULTILIB_ABIS/ /}" ]
}
haskell-cabal_pkg_setup () 
{ 
    ghc-package_pkg_setup;
    if [[ -z "${CABAL_BOOTSTRAP}" && -z "${CABAL_FROM_GHC}" ]] && ! ghc-sanecabal "${CABAL_MIN_VERSION}"; then
        eerror "The package dev-haskell/cabal is not correctly installed for";
        eerror "the currently active version of ghc ($(ghc-version)). Please";
        eerror "run ghc-updater or haskell-updater or re-build dev-haskell/cabal.";
        die "cabal is not correctly installed";
    fi;
    if [[ -z "${CABAL_HAS_BINARIES}" ]] && [[ -z "${CABAL_HAS_LIBRARIES}" ]]; then
        eerror "QA: Neither bin nor lib are in CABAL_FEATURES.";
    fi;
    if [[ -n "${CABAL_UNKNOWN}" ]]; then
        ewarn "Unknown entry in CABAL_FEATURES: ${CABAL_UNKNOWN}";
    fi;
    if cabal-is-dummy-lib; then
        einfo "${P} is included in ghc-${CABAL_CORE_LIB_GHC_PV}, nothing to install.";
    fi
}
haskell-cabal_src_compile () 
{ 
    cabal_src_compile
}
haskell-cabal_src_install () 
{ 
    cabal_src_install
}
is_final_abi () 
{ 
    has_multilib_profile || return 0;
    local ALL_ABIS=$(get_install_abis);
    local LAST_ABI=${ALL_ABIS/* /};
    [[ ${LAST_ABI} == ${ABI} ]]
}
multilib_env () 
{ 
    local CTARGET=${1:-${CTARGET}};
    case ${CTARGET} in 
        x86_64*)
            export CFLAGS_x86=${CFLAGS_x86--m32};
            export CHOST_x86=${CTARGET/x86_64/i686};
            export CTARGET_x86=${CHOST_x86};
            export CDEFINE_x86="__i386__";
            export LIBDIR_x86="lib";
            export CFLAGS_amd64=${CFLAGS_amd64--m64};
            export CHOST_amd64=${CTARGET};
            export CTARGET_amd64=${CHOST_amd64};
            export CDEFINE_amd64="__x86_64__";
            export LIBDIR_amd64="lib64";
            export MULTILIB_ABIS="amd64 x86";
            export DEFAULT_ABI="amd64"
        ;;
        mips64*)
            export CFLAGS_o32=${CFLAGS_o32--mabi=32};
            export CHOST_o32=${CTARGET/mips64/mips};
            export CTARGET_o32=${CHOST_o32};
            export CDEFINE_o32="_MIPS_SIM == _ABIO32";
            export LIBDIR_o32="lib";
            export CFLAGS_n32=${CFLAGS_n32--mabi=n32};
            export CHOST_n32=${CTARGET};
            export CTARGET_n32=${CHOST_n32};
            export CDEFINE_n32="_MIPS_SIM == _ABIN32";
            export LIBDIR_n32="lib32";
            export CFLAGS_n64=${CFLAGS_n64--mabi=64};
            export CHOST_n64=${CTARGET};
            export CTARGET_n64=${CHOST_n64};
            export CDEFINE_n64="_MIPS_SIM == _ABI64";
            export LIBDIR_n64="lib64";
            export MULTILIB_ABIS="n64 n32 o32";
            export DEFAULT_ABI="n32"
        ;;
        powerpc64*)
            export CFLAGS_ppc=${CFLAGS_ppc--m32};
            export CHOST_ppc=${CTARGET/powerpc64/powerpc};
            export CTARGET_ppc=${CHOST_ppc};
            export CDEFINE_ppc="!__powerpc64__";
            export LIBDIR_ppc="lib";
            export CFLAGS_ppc64=${CFLAGS_ppc64--m64};
            export CHOST_ppc64=${CTARGET};
            export CTARGET_ppc64=${CHOST_ppc64};
            export CDEFINE_ppc64="__powerpc64__";
            export LIBDIR_ppc64="lib64";
            export MULTILIB_ABIS="ppc64 ppc";
            export DEFAULT_ABI="ppc64"
        ;;
        s390x*)
            export CFLAGS_s390=${CFLAGS_s390--m31};
            export CHOST_s390=${CTARGET/s390x/s390};
            export CTARGET_s390=${CHOST_s390};
            export CDEFINE_s390="!__s390x__";
            export LIBDIR_s390="lib";
            export CFLAGS_s390x=${CFLAGS_s390x--m64};
            export CHOST_s390x=${CTARGET};
            export CTARGET_s390x=${CHOST_s390x};
            export CDEFINE_s390x="__s390x__";
            export LIBDIR_s390x="lib64";
            export MULTILIB_ABIS="s390x s390";
            export DEFAULT_ABI="s390x"
        ;;
        sparc*)
            export CFLAGS_sparc32=${CFLAGS_sparc32};
            export CHOST_sparc32=${CTARGET/sparc64/sparc};
            export CTARGET_sparc32=${CHOST_sparc32};
            export CDEFINE_sparc32="!__arch64__";
            export LIBDIR_sparc32="lib";
            export CFLAGS_sparc64=${CFLAGS_sparc64--m64};
            export CHOST_sparc64=${CTARGET};
            export CTARGET_sparc64=${CHOST_sparc64};
            export CDEFINE_sparc64="__arch64__";
            export LIBDIR_sparc64="lib64";
            export MULTILIB_ABIS="${MULTILIB_ABIS-sparc64 sparc32}";
            export DEFAULT_ABI="${DEFAULT_ABI-sparc64}"
        ;;
        *)
            export MULTILIB_ABIS="default";
            export DEFAULT_ABI="default"
        ;;
    esac
}
multilib_toolchain_setup () 
{ 
    local v vv;
    export ABI=$1;
    if [[ ${ABI} != ${DEFAULT_ABI} ]]; then
        if [[ ${DEFAULT_ABI_SAVED} != "true" ]]; then
            for v in CHOST CBUILD AS CC CXX LD;
            do
                export __abi_saved_${v}="${!v}";
            done;
            export DEFAULT_ABI_SAVED="true";
        fi;
        export CHOST=$(get_abi_CHOST ${DEFAULT_ABI});
        export AS="$(tc-getAS) $(get_abi_ASFLAGS)";
        export CC="$(tc-getCC) $(get_abi_CFLAGS)";
        export CXX="$(tc-getCXX) $(get_abi_CFLAGS)";
        export LD="$(tc-getLD) $(get_abi_LDFLAGS)";
        export CHOST=$(get_abi_CHOST $1);
        export CBUILD=$(get_abi_CHOST $1);
    else
        if [[ ${DEFAULT_ABI_SAVED} == "true" ]]; then
            for v in CHOST CBUILD AS CC CXX LD;
            do
                vv="__abi_saved_${v}";
                export ${v}=${!vv};
            done;
        fi;
    fi
}
nonfatal () 
{ 
    if has "${EAPI:-0}" 0 1 2 3 3_pre2; then
        die "$FUNCNAME() not supported in this EAPI";
    fi;
    if [[ $# -lt 1 ]]; then
        die "$FUNCNAME(): Missing argument";
    fi;
    PORTAGE_NONFATAL=1 "$@"
}
number_abis () 
{ 
    get_install_abis | wc -w
}
pkg_nofetch () 
{ 
    _eapi0_pkg_nofetch "$@"
}
pkg_postinst () 
{ 
    ghc-package_pkg_postinst;
    bash-completion_pkg_postinst
}
pkg_prerm () 
{ 
    ghc-package_pkg_prerm "$@"
}
pkg_setup () 
{ 
    haskell-cabal_pkg_setup "$@"
}
prep_ml_includes () 
{ 
    if [[ $(number_abis) -gt 1 ]]; then
        local dir;
        local dirs;
        local base;
        if [[ $# -eq 0 ]]; then
            dirs=/usr/include;
        else
            dirs="$@";
        fi;
        for dir in ${dirs};
        do
            base=${T}/gentoo-multilib/${dir}/gentoo-multilib;
            mkdir -p "${base}";
            [[ -d ${base}/${ABI} ]] && rm -rf "${base}/${ABI}";
            mv "${D}/${dir}" "${base}/${ABI}";
        done;
        if is_final_abi; then
            base=${T}/gentoo-multilib;
            pushd "${base}";
            find . | tar -c -T - -f - | tar -x --no-same-owner -f - -C "${D}";
            popd;
            set --;
            for dir in ${dirs};
            do
                set -- "$@" "${dir}";
                local abi;
                for abi in $(get_install_abis);
                do
                    set -- "$@" "$(get_abi_CDEFINE ${abi}):${dir}/gentoo-multilib/${abi}";
                done;
                create_ml_includes "$@";
            done;
        fi;
    fi
}
register_success_hook () 
{ 
    local x;
    for x in $*;
    do
        hasq $x $EBUILD_SUCCESS_HOOKS || export EBUILD_SUCCESS_HOOKS="$EBUILD_SUCCESS_HOOKS $x";
    done
}
remove_flag () 
{ 
    local remove="${1}";
    shift;
    while [[ -n "${1}" ]]; do
        [[ "${1}" != "${remove}" ]] && echo -n "${1} ";
        shift;
    done
}
replace_all_version_separators () 
{ 
    __versionator_shopt_toggle on;
    local c;
    c=($(get_all_version_components "${2:-${PV}}" ));
    c="${c[@]//[-._]/$1}";
    echo ${c// };
    __versionator_shopt_toggle off
}
replace_version_separator () 
{ 
    __versionator_shopt_toggle on;
    local w i c found=0 v="${3:-${PV}}";
    w=${1:-1};
    c=($(get_all_version_components ${v} ));
    if [[ "${w//[[:digit:]]/}" == "${w}" ]]; then
        for ((i = 0 ; i < ${#c[@]} ; i = $i + 1 ))
        do
            if [[ "${c[${i}]}" == "${w}" ]]; then
                c[${i}]="${2}";
                break;
            fi;
        done;
    else
        for ((i = 0 ; i < ${#c[@]} ; i = $i + 1 ))
        do
            if [[ -n "${c[${i}]//[^-._]}" ]]; then
                found=$(($found + 1));
                if [[ "$found" == "${w}" ]]; then
                    c[${i}]="${2}";
                    break;
                fi;
            fi;
        done;
    fi;
    c=${c[@]};
    echo ${c// };
    __versionator_shopt_toggle off
}
src_compile () 
{ 
    haskell-cabal_src_compile "$@"
}
src_install () 
{ 
    haskell-cabal_src_install;
    dobashcompletion "${S}/bash-completion/cabal"
}
src_test () 
{ 
    _eapi0_src_test "$@"
}
src_unpack () 
{ 
    _eapi0_src_unpack "$@"
}
tc-arch () 
{ 
    tc-ninja_magic_to_arch portage "$@"
}
tc-arch-kernel () 
{ 
    tc-ninja_magic_to_arch kern "$@"
}
tc-endian () 
{ 
    local host=$1;
    [[ -z ${host} ]] && host=${CTARGET:-${CHOST}};
    host=${host%%-*};
    case ${host} in 
        alpha*)
            echo big
        ;;
        arm*b*)
            echo big
        ;;
        arm*)
            echo little
        ;;
        cris*)
            echo little
        ;;
        hppa*)
            echo big
        ;;
        i?86*)
            echo little
        ;;
        ia64*)
            echo little
        ;;
        m68*)
            echo big
        ;;
        mips*l*)
            echo little
        ;;
        mips*)
            echo big
        ;;
        powerpc*)
            echo big
        ;;
        s390*)
            echo big
        ;;
        sh*b*)
            echo big
        ;;
        sh*)
            echo little
        ;;
        sparc*)
            echo big
        ;;
        x86_64*)
            echo little
        ;;
        *)
            echo wtf
        ;;
    esac
}
tc-export () 
{ 
    local var;
    for var in "$@";
    do
        [[ $(type -t tc-get${var}) != "function" ]] && die "tc-export: invalid export variable '${var}'";
        eval tc-get${var} > /dev/null;
    done
}
tc-getAR () 
{ 
    tc-getPROG AR ar "$@"
}
tc-getAS () 
{ 
    tc-getPROG AS as "$@"
}
tc-getBUILD_CC () 
{ 
    local v;
    for v in CC_FOR_BUILD BUILD_CC HOSTCC;
    do
        if [[ -n ${!v} ]]; then
            export BUILD_CC=${!v};
            echo "${!v}";
            return 0;
        fi;
    done;
    local search=;
    if [[ -n ${CBUILD} ]]; then
        search=$(type -p ${CBUILD}-gcc);
        search=${search##*/};
    fi;
    search=${search:-gcc};
    export BUILD_CC=${search};
    echo "${search}"
}
tc-getCC () 
{ 
    tc-getPROG CC gcc "$@"
}
tc-getCPP () 
{ 
    tc-getPROG CPP cpp "$@"
}
tc-getCXX () 
{ 
    tc-getPROG CXX g++ "$@"
}
tc-getDLLWRAP () 
{ 
    tc-getPROG DLLWRAP dllwrap "$@"
}
tc-getF77 () 
{ 
    tc-getPROG F77 f77 "$@"
}
tc-getFC () 
{ 
    tc-getPROG FC gfortran "$@"
}
tc-getGCJ () 
{ 
    tc-getPROG GCJ gcj "$@"
}
tc-getLD () 
{ 
    tc-getPROG LD ld "$@"
}
tc-getNM () 
{ 
    tc-getPROG NM nm "$@"
}
tc-getOBJCOPY () 
{ 
    tc-getPROG OBJCOPY objcopy "$@"
}
tc-getPKG_CONFIG () 
{ 
    tc-getPROG PKG_CONFIG pkg-config "$@"
}
tc-getPROG () 
{ 
    local var=$1;
    local prog=$2;
    if [[ -n ${!var} ]]; then
        echo "${!var}";
        return 0;
    fi;
    local search=;
    [[ -n $3 ]] && search=$(type -p "$3-${prog}");
    [[ -z ${search} && -n ${CHOST} ]] && search=$(type -p "${CHOST}-${prog}");
    [[ -n ${search} ]] && prog=${search##*/};
    export ${var}=${prog};
    echo "${!var}"
}
tc-getRANLIB () 
{ 
    tc-getPROG RANLIB ranlib "$@"
}
tc-getRC () 
{ 
    tc-getPROG RC windres "$@"
}
tc-getSTRIP () 
{ 
    tc-getPROG STRIP strip "$@"
}
tc-has-tls () 
{ 
    local base="${T}/test-tc-tls";
    cat > "${base}.c"  <<-EOF
int foo(int *i) {
static __thread int j = 0;
return *i ? j : *i;
}
EOF

    local flags;
    case $1 in 
        -s)
            flags="-S"
        ;;
        -c)
            flags="-c"
        ;;
        -l)

        ;;
        -*)
            die "Usage: tc-has-tls [-c|-l] [toolchain prefix]"
        ;;
    esac;
    : ${flags:=-fPIC -shared -Wl,-z,defs};
    [[ $1 == -* ]] && shift;
    $(tc-getCC "$@") ${flags} "${base}.c" -o "${base}" &>/dev/null;
    local ret=$?;
    rm -f "${base}"*;
    return ${ret}
}
tc-is-cross-compiler () 
{ 
    return $([[ ${CBUILD:-${CHOST}} != ${CHOST} ]])
}
tc-is-softfloat () 
{ 
    case ${CTARGET} in 
        bfin* | h8300*)
            echo "only"
        ;;
        *)
            [[ ${CTARGET//_/-} == *-softfloat-* ]] && echo "yes" || echo "no"
        ;;
    esac
}
tc-is-static-only () 
{ 
    local host=${CTARGET:-${CHOST}};
    return $([[ ${host} == *-mint* ]])
}
tc-ninja_magic_to_arch () 
{ 
    function ninj () 
    { 
        [[ ${type} == "kern" ]] && echo $1 || echo $2
    };
    local type=$1;
    local host=$2;
    [[ -z ${host} ]] && host=${CTARGET:-${CHOST}};
    case ${host} in 
        alpha*)
            echo alpha
        ;;
        arm*)
            echo arm
        ;;
        avr*)
            ninj avr32 avr
        ;;
        bfin*)
            ninj blackfin bfin
        ;;
        cris*)
            echo cris
        ;;
        hppa*)
            ninj parisc hppa
        ;;
        i?86*)
            if [[ ${type} == "kern" ]] && [[ $(KV_to_int ${KV}) -lt $(KV_to_int 2.6.24) || ${host} == *freebsd* ]]; then
                echo i386;
            else
                echo x86;
            fi
        ;;
        ia64*)
            echo ia64
        ;;
        m68*)
            echo m68k
        ;;
        mips*)
            echo mips
        ;;
        nios2*)
            echo nios2
        ;;
        nios*)
            echo nios
        ;;
        powerpc*)
            if [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.16) ]] && [[ ${type} == "kern" ]]; then
                echo powerpc;
            else
                if [[ $(KV_to_int ${KV}) -eq $(KV_to_int 2.6.15) ]] && [[ ${type} == "kern" ]]; then
                    if [[ ${host} == powerpc64* ]] || [[ ${PROFILE_ARCH} == "ppc64" ]]; then
                        echo powerpc;
                    else
                        echo ppc;
                    fi;
                else
                    if [[ ${host} == powerpc64* ]]; then
                        echo ppc64;
                    else
                        if [[ ${PROFILE_ARCH} == "ppc64" ]]; then
                            ninj ppc64 ppc;
                        else
                            echo ppc;
                        fi;
                    fi;
                fi;
            fi
        ;;
        s390*)
            echo s390
        ;;
        sh64*)
            ninj sh64 sh
        ;;
        sh*)
            echo sh
        ;;
        sparc64*)
            ninj sparc64 sparc
        ;;
        sparc*)
            [[ ${PROFILE_ARCH} == "sparc64" ]] && ninj sparc64 sparc || echo sparc
        ;;
        vax*)
            echo vax
        ;;
        x86_64*)
            if [[ ${type} == "kern" ]] && [[ $(KV_to_int ${KV}) -ge $(KV_to_int 2.6.24) ]]; then
                echo x86;
            else
                ninj x86_64 amd64;
            fi
        ;;
        *)
            echo unknown
        ;;
    esac
}
version_compare () 
{ 
    __versionator_shopt_toggle on;
    local ver_a=${1} ver_b=${2} parts_a parts_b cur_idx_a=0 cur_idx_b=0;
    parts_a=($(get_all_version_components "${ver_a}" ));
    parts_b=($(get_all_version_components "${ver_b}" ));
    local inf_loop=0;
    while true; do
        inf_loop=$(( ${inf_loop} + 1 ));
        [[ ${inf_loop} -gt 20 ]] && die "versionator compare bug [numbers, ${ver_a}, ${ver_b}]";
        local cur_tok_a=${parts_a[${cur_idx_a}]};
        local cur_tok_b=${parts_b[${cur_idx_b}]};
        if [[ -n ${cur_tok_a} ]] && [[ -z ${cur_tok_a//[[:digit:]]} ]]; then
            cur_idx_a=$(( ${cur_idx_a} + 1 ));
            [[ ${parts_a[${cur_idx_a}]} == "." ]] && cur_idx_a=$(( ${cur_idx_a} + 1 ));
        else
            cur_tok_a="";
        fi;
        if [[ -n ${cur_tok_b} ]] && [[ -z ${cur_tok_b//[[:digit:]]} ]]; then
            cur_idx_b=$(( ${cur_idx_b} + 1 ));
            [[ ${parts_b[${cur_idx_b}]} == "." ]] && cur_idx_b=$(( ${cur_idx_b} + 1 ));
        else
            cur_tok_b="";
        fi;
        [[ -z ${cur_tok_a} ]] && [[ -z ${cur_tok_b} ]] && break;
        cur_tok_a=${cur_tok_a##+(0)};
        cur_tok_b=${cur_tok_b##+(0)};
        [[ -z ${cur_tok_a} ]] && cur_tok_a=0;
        [[ -z ${cur_tok_b} ]] && cur_tok_b=0;
        [[ ${cur_tok_a} -lt ${cur_tok_b} ]] && __versionator_shopt_toggle off && return 1;
        [[ ${cur_tok_a} -gt ${cur_tok_b} ]] && __versionator_shopt_toggle off && return 3;
    done;
    local letter_a=;
    letter_a=${parts_a[${cur_idx_a}]};
    if [[ ${#letter_a} -eq 1 ]] && [[ -z ${letter_a/[a-z]} ]]; then
        cur_idx_a=$(( ${cur_idx_a} + 1 ));
    else
        letter_a="@";
    fi;
    local letter_b=;
    letter_b=${parts_b[${cur_idx_b}]};
    if [[ ${#letter_b} -eq 1 ]] && [[ -z ${letter_b/[a-z]} ]]; then
        cur_idx_b=$(( ${cur_idx_b} + 1 ));
    else
        letter_b="@";
    fi;
    [[ ${letter_a} < ${letter_b} ]] && __versionator_shopt_toggle off && return 1;
    [[ ${letter_a} > ${letter_b} ]] && __versionator_shopt_toggle off && return 3;
    local suffix rule part r_lt r_gt;
    for rule in "alpha=1" "beta=1" "pre=1" "rc=1" "p=3" "r=3";
    do
        suffix=${rule%%=*};
        r_lt=${rule##*=};
        [[ ${r_lt} -eq 1 ]] && r_gt=3 || r_gt=1;
        local suffix_a=;
        for part in ${parts_a[@]};
        do
            [[ ${part#${suffix}} != ${part} ]] && [[ -z ${part##${suffix}*([[:digit:]])} ]] && suffix_a=${part#${suffix}}0;
        done;
        local suffix_b=;
        for part in ${parts_b[@]};
        do
            [[ ${part#${suffix}} != ${part} ]] && [[ -z ${part##${suffix}*([[:digit:]])} ]] && suffix_b=${part#${suffix}}0;
        done;
        [[ -z ${suffix_a} ]] && [[ -z ${suffix_b} ]] && continue;
        [[ -z ${suffix_a} ]] && __versionator_shopt_toggle off && return ${r_gt};
        [[ -z ${suffix_b} ]] && __versionator_shopt_toggle off && return ${r_lt};
        suffix_a=${suffix_a##+(0)};
        suffix_a=${suffix_a:-0};
        suffix_b=${suffix_b##+(0)};
        suffix_b=${suffix_b:-0};
        [[ ${suffix_a} -lt ${suffix_b} ]] && __versionator_shopt_toggle off && return 1;
        [[ ${suffix_a} -gt ${suffix_b} ]] && __versionator_shopt_toggle off && return 3;
    done;
    __versionator_shopt_toggle off;
    return 2
}
version_is_at_least () 
{ 
    __versionator_shopt_toggle on;
    local want_s="$1" have_s="${2:-${PVR}}" r;
    version_compare "${want_s}" "${have_s}";
    r=$?;
    case $r in 
        1 | 2)
            __versionator_shopt_toggle off;
            return 0
        ;;
        3)
            __versionator_shopt_toggle off;
            return 1
        ;;
        *)
            __versionator_shopt_toggle off;
            die "versionator compare bug [atleast, ${want_s}, ${have_s}, ${r}]"
        ;;
    esac;
    __versionator_shopt_toggle off
}
version_sort () 
{ 
    __versionator_shopt_toggle on;
    local items= left=0;
    items=($@);
    while [[ ${left} -lt ${#items[@]} ]]; do
        local lowest_idx=${left};
        local idx=$(( ${lowest_idx} + 1 ));
        while [[ ${idx} -lt ${#items[@]} ]]; do
            version_compare "${items[${lowest_idx}]}" "${items[${idx}]}";
            [[ $? -eq 3 ]] && lowest_idx=${idx};
            idx=$(( ${idx} + 1 ));
        done;
        local tmp=${items[${lowest_idx}]};
        items[${lowest_idx}]=${items[${left}]};
        items[${left}]=${tmp};
        left=$(( ${left} + 1 ));
    done;
    echo ${items[@]};
    __versionator_shopt_toggle off
}