Proyectos de Subversion Moodle

Rev

Rev 1 | Mostrar el archivo completo | | | Autoría | Ultima modificación | Ver Log |

Rev 1 Rev 1441
Línea 30... Línea 30...
30 
/**
 30 
/**
31 
 * WARNING: obsolete
 31 
 * WARNING: obsolete
32 
 * @deprecated
 32 
 * @deprecated
33 
 */
 33 
 */
34 
define('PEAR_ERROR_EXCEPTION', 32);
 34 
define('PEAR_ERROR_EXCEPTION', 32);
35 
/**#@-*/
 - 
 
36 
define('PEAR_ZE2', (function_exists('version_compare') &&
 - 
 
37 
                    version_compare(zend_version(), "2-dev", "ge")));
 - 
 
Línea 38... Línea 35...
38 
 
 35 
 
39 
if (substr(PHP_OS, 0, 3) == 'WIN') {
 36 
if (substr(PHP_OS, 0, 3) == 'WIN') {
40 
    define('OS_WINDOWS', true);
 37 
    define('OS_WINDOWS', true);
41 
    define('OS_UNIX',    false);
 38 
    define('OS_UNIX',    false);
Línea 531... Línea 528...
531 
            $ec = $this->_error_class;
 528 
            $ec = $this->_error_class;
532 
        } else {
 529 
        } else {
533 
            $ec = 'PEAR_Error';
 530 
            $ec = 'PEAR_Error';
534 
        }
 531 
        }
Línea 535... Línea -...
535 
 
 - 
 
536 
        if (intval(PHP_VERSION) < 5) {
 - 
 
537 
            // little non-eval hack to fix bug #12147
 - 
 
538 
            include 'PEAR/FixPHP5PEARWarnings.php';
 - 
 
539 
            return $a;
 - 
 
540 
        }
 - 
 
541 
 
 532 
 
542 
        if ($skipmsg) {
 533 
        if ($skipmsg) {
543 
            $a = new $ec($code, $mode, $options, $userinfo);
 534 
            $a = new $ec($code, $mode, $options, $userinfo);
544 
        } else {
 535 
        } else {
545 
            $a = new $ec($message, $code, $mode, $options, $userinfo);
 536 
            $a = new $ec($message, $code, $mode, $options, $userinfo);
Línea 736... Línea 727...
736 
 
 727 
 
737 
        return @dl('php_'.$ext.$suffix) || @dl($ext.$suffix);
 728 
        return @dl('php_'.$ext.$suffix) || @dl($ext.$suffix);
738 
    }
 729 
    }
Línea 739... Línea -...
739 
}
 - 
 
740 
 
 - 
 
741 
if (PEAR_ZE2) {
 - 
 
742 
    include_once 'PEAR5.php';
 - 
 
743 
}
 730 
}
744 
 
 731 
 
745 
function _PEAR_call_destructors()
 732 
function _PEAR_call_destructors()
746 
{
 733 
{
747 
    global $_PEAR_destructor_object_list;
 734 
    global $_PEAR_destructor_object_list;
748 
    if (is_array($_PEAR_destructor_object_list) &&
 735 
    if (is_array($_PEAR_destructor_object_list) &&
749 
        sizeof($_PEAR_destructor_object_list))
 736 
        sizeof($_PEAR_destructor_object_list))
750 
    {
 - 
 
751 
        reset($_PEAR_destructor_object_list);
 - 
 
752 
        if (PEAR_ZE2) {
 - 
 
753 
            $destructLifoExists = PEAR5::getStaticProperty('PEAR', 'destructlifo');
 737 
    {
754 
        } else {
 - 
 
Línea 755... Línea 738...
755 
            $destructLifoExists = PEAR::getStaticProperty('PEAR', 'destructlifo');
 738 
        reset($_PEAR_destructor_object_list);
756 
        }
 739 
        $destructLifoExists = PEAR::getStaticProperty('PEAR', 'destructlifo');
757 
 
 740 
 
Línea 847... Línea 830...
847 
        $this->message   = $message;
 830 
        $this->message   = $message;
848 
        $this->code      = $code;
 831 
        $this->code      = $code;
849 
        $this->mode      = $mode;
 832 
        $this->mode      = $mode;
850 
        $this->userinfo  = $userinfo;
 833 
        $this->userinfo  = $userinfo;
Línea 851... Línea -...
851 
 
 - 
 
852 
        if (PEAR_ZE2) {
 - 
 
853 
            $skiptrace = PEAR5::getStaticProperty('PEAR_Error', 'skiptrace');
 - 
 
854 
        } else {
 834 
 
855 
            $skiptrace = PEAR::getStaticProperty('PEAR_Error', 'skiptrace');
 - 
 
Línea 856... Línea 835...
856 
        }
 835 
        $skiptrace = PEAR::getStaticProperty('PEAR_Error', 'skiptrace');
857 
 
 836 
 
858 
        if (!$skiptrace) {
 837 
        if (!$skiptrace) {
859 
            $this->backtrace = debug_backtrace();
 838 
            $this->backtrace = debug_backtrace();