mirror of
https://github.com/reactos/reactos.git
synced 2025-02-24 01:15:09 +00:00
527f2f9057
* Create a branch for some evul shell experiments. svn path=/branches/shell-experiments/; revision=61927
180 lines
5.9 KiB
C++
180 lines
5.9 KiB
C++
/*
|
|
* Copyright (c) 1999
|
|
* Boris Fomitchev
|
|
*
|
|
* This material is provided "as is", with absolutely no warranty expressed
|
|
* or implied. Any use is at your own risk.
|
|
*
|
|
* Permission to use or copy this software for any purpose is hereby granted
|
|
* without fee, provided the above notices are retained on all copies.
|
|
* Permission to modify the code and to distribute modified code is granted,
|
|
* provided the above notices are retained, and a notice that the code was
|
|
* modified is included with the above copyright notice.
|
|
*
|
|
*/
|
|
|
|
#ifndef _STLP_INTERNAL_CSTDLIB
|
|
#define _STLP_INTERNAL_CSTDLIB
|
|
|
|
#if defined (_STLP_USE_NEW_C_HEADERS)
|
|
# if defined (_STLP_HAS_INCLUDE_NEXT)
|
|
# include_next <cstdlib>
|
|
# else
|
|
# include _STLP_NATIVE_CPP_C_HEADER(cstdlib)
|
|
# endif
|
|
#else
|
|
# include <stdlib.h>
|
|
#endif
|
|
|
|
#if defined (__BORLANDC__) && !defined (__linux__)
|
|
/* Borland process.h header do not bring anything here and is just included
|
|
* in order to avoid inclusion later. This header cannot be included later
|
|
* because Borland compiler consider that for instance the abort function
|
|
* defined as extern "C" cannot be overloaded and it finds 2 "overloads",
|
|
* once in native std namespace and the other in STLport namespace...
|
|
*/
|
|
# include <process.h>
|
|
#endif
|
|
|
|
/* on evc3/evc4 including stdlib.h also defines setjmp macro */
|
|
#if defined (_STLP_WCE)
|
|
# define _STLP_NATIVE_SETJMP_H_INCLUDED
|
|
#endif
|
|
|
|
#if defined (__MSL__) && (__MSL__ <= 0x5003)
|
|
namespace std {
|
|
typedef ::div_t div_t;
|
|
typedef ::ldiv_t ldiv_t;
|
|
# ifdef __MSL_LONGLONG_SUPPORT__
|
|
typedef ::lldiv_t lldiv_t;
|
|
# endif
|
|
}
|
|
#endif
|
|
|
|
#ifdef _STLP_IMPORT_VENDOR_CSTD
|
|
_STLP_BEGIN_NAMESPACE
|
|
using _STLP_VENDOR_CSTD::div_t;
|
|
using _STLP_VENDOR_CSTD::ldiv_t;
|
|
using _STLP_VENDOR_CSTD::size_t;
|
|
|
|
# ifndef _STLP_NO_CSTD_FUNCTION_IMPORTS
|
|
# ifndef _STLP_WCE
|
|
// these functions just don't exist on Windows CE
|
|
using _STLP_VENDOR_CSTD::abort;
|
|
using _STLP_VENDOR_CSTD::getenv;
|
|
using _STLP_VENDOR_CSTD::mblen;
|
|
using _STLP_VENDOR_CSTD::mbtowc;
|
|
using _STLP_VENDOR_CSTD::system;
|
|
using _STLP_VENDOR_CSTD::bsearch;
|
|
# endif
|
|
using _STLP_VENDOR_CSTD::atexit;
|
|
using _STLP_VENDOR_CSTD::exit;
|
|
using _STLP_VENDOR_CSTD::calloc;
|
|
using _STLP_VENDOR_CSTD::free;
|
|
using _STLP_VENDOR_CSTD::malloc;
|
|
using _STLP_VENDOR_CSTD::realloc;
|
|
using _STLP_VENDOR_CSTD::atof;
|
|
using _STLP_VENDOR_CSTD::atoi;
|
|
using _STLP_VENDOR_CSTD::atol;
|
|
using _STLP_VENDOR_CSTD::mbstowcs;
|
|
using _STLP_VENDOR_CSTD::strtod;
|
|
using _STLP_VENDOR_CSTD::strtol;
|
|
using _STLP_VENDOR_CSTD::strtoul;
|
|
|
|
# if !(defined (_STLP_NO_NATIVE_WIDE_STREAMS) || defined (_STLP_NO_NATIVE_MBSTATE_T))
|
|
using _STLP_VENDOR_CSTD::wcstombs;
|
|
# ifndef _STLP_WCE
|
|
using _STLP_VENDOR_CSTD::wctomb;
|
|
# endif
|
|
# endif
|
|
using _STLP_VENDOR_CSTD::qsort;
|
|
using _STLP_VENDOR_CSTD::labs;
|
|
using _STLP_VENDOR_CSTD::ldiv;
|
|
# if defined (_STLP_LONG_LONG) && !defined (_STLP_NO_VENDOR_STDLIB_L)
|
|
# if !defined(__sun)
|
|
using _STLP_VENDOR_CSTD::llabs;
|
|
using _STLP_VENDOR_CSTD::lldiv_t;
|
|
using _STLP_VENDOR_CSTD::lldiv;
|
|
# else
|
|
using ::llabs;
|
|
using ::lldiv_t;
|
|
using ::lldiv;
|
|
# endif
|
|
# endif
|
|
using _STLP_VENDOR_CSTD::rand;
|
|
using _STLP_VENDOR_CSTD::srand;
|
|
# endif /* _STLP_NO_CSTD_FUNCTION_IMPORTS */
|
|
_STLP_END_NAMESPACE
|
|
#endif /* _STLP_IMPORT_VENDOR_CSTD */
|
|
|
|
#if (defined (__BORLANDC__) || defined (__WATCOMC__)) && defined (_STLP_USE_NEW_C_HEADERS)
|
|
//In this config bcc define everything in std namespace and not in
|
|
//the global one.
|
|
inline int abs(int __x) { return _STLP_VENDOR_CSTD::abs(__x); }
|
|
inline _STLP_VENDOR_CSTD::div_t div(int __x, int __y) { return _STLP_VENDOR_CSTD::div(__x, __y); }
|
|
#endif
|
|
|
|
#if defined(_MSC_EXTENSIONS) && defined(_STLP_MSVC) && (_STLP_MSVC <= 1300)
|
|
# define _STLP_RESTORE_FUNCTION_INTRINSIC
|
|
# pragma warning (push)
|
|
# pragma warning (disable: 4162)
|
|
# pragma function (abs)
|
|
#endif
|
|
|
|
//HP-UX native lib has abs() and div() functions in global namespace
|
|
#if !defined (__SUNPRO_CC) && \
|
|
(!defined (__HP_aCC) || (__HP_aCC < 30000))
|
|
|
|
//MSVC starting with .Net 2003 already define all math functions in global namespace:
|
|
# if !defined (__WATCOMC__) && \
|
|
(!defined (_STLP_MSVC_LIB) || (_STLP_MSVC_LIB < 1310) || defined (UNDER_CE))
|
|
inline long abs(long __x) { return _STLP_VENDOR_CSTD::labs(__x); }
|
|
# endif
|
|
|
|
/** VC since version 8 has this, the platform SDK and CE SDKs hanging behind. */
|
|
# if !defined (__WATCOMC__) && \
|
|
(!defined (_STLP_MSVC_LIB) || (_STLP_MSVC_LIB < 1400) || defined (_STLP_USING_PLATFORM_SDK_COMPILER) || defined (UNDER_CE))
|
|
inline _STLP_VENDOR_CSTD::ldiv_t div(long __x, long __y) { return _STLP_VENDOR_CSTD::ldiv(__x, __y); }
|
|
# endif
|
|
|
|
#endif
|
|
|
|
#if defined (_STLP_RESTORE_FUNCTION_INTRINSIC)
|
|
# pragma intrinsic (abs)
|
|
# pragma warning (pop)
|
|
# undef _STLP_RESTORE_FUNCTION_INTRINSIC
|
|
#endif
|
|
|
|
#if defined (_STLP_LONG_LONG)
|
|
# if !defined (_STLP_NO_VENDOR_STDLIB_L)
|
|
# if !defined (__sun)
|
|
inline _STLP_LONG_LONG abs(_STLP_LONG_LONG __x) { return _STLP_VENDOR_CSTD::llabs(__x); }
|
|
inline lldiv_t div(_STLP_LONG_LONG __x, _STLP_LONG_LONG __y) { return _STLP_VENDOR_CSTD::lldiv(__x, __y); }
|
|
# else
|
|
inline _STLP_LONG_LONG abs(_STLP_LONG_LONG __x) { return ::llabs(__x); }
|
|
inline lldiv_t div(_STLP_LONG_LONG __x, _STLP_LONG_LONG __y) { return ::lldiv(__x, __y); }
|
|
# endif
|
|
/*# else
|
|
inline _STLP_LONG_LONG abs(_STLP_LONG_LONG __x) { return __x < 0 ? -__x : __x; }*/
|
|
# endif
|
|
#endif
|
|
|
|
/* C++ Standard is unclear about several call to 'using ::func' if new overloads
|
|
* of ::func appears between 2 successive 'using' calls. To avoid this potential
|
|
* problem we provide all abs overload before the 'using' call.
|
|
* Beware: This header inclusion has to be after all abs overload of this file.
|
|
* The first 'using ::abs' call is going to be in the other header.
|
|
*/
|
|
#ifndef _STLP_INTERNAL_CMATH
|
|
# include <stl/_cmath.h>
|
|
#endif
|
|
|
|
#if defined (_STLP_IMPORT_VENDOR_CSTD) && !defined (_STLP_NO_CSTD_FUNCTION_IMPORTS)
|
|
// ad hoc, don't replace with _STLP_VENDOR_CSTD::abs here! - ptr 2005-03-05
|
|
_STLP_BEGIN_NAMESPACE
|
|
using ::abs;
|
|
using ::div;
|
|
_STLP_END_NAMESPACE
|
|
#endif
|
|
|
|
#endif /* _STLP_INTERNAL_CSTDLIB */
|