/*  Metrowerks Standard Library  Version 4.0  1998 August 10  */

/*  $Date:: 6/18/98 12:28 PM                                 $ 
 *  $Revision:: 11                                           $ 
 *  $NoKeywords: $ 
 *
 *		Portions Copyright © 1995-1998 Metrowerks, Inc.
 *		All rights reserved.
 */

/**
 **  Lib++  : The Modena C++ Standard Library,
 **           Version 2.4, October 1997
 **
 **  Copyright (c) 1995-1997 Modena Software Inc.
 **/

#include <mcompile.h>

#include <iomanip>    // hh 971220 fixed MOD_INCLUDE

MSIPL_STD_BEGIN

smanip <streamsize>
setprecision (streamsize n)
{
    return smanip<streamsize> (&fprecise, n);
}

smanip <streamsize>
setw (streamsize n)
{
    return smanip<streamsize> (&fwidth, n);
}


basic_ios<char, char_traits<char> >&
ffill (basic_ios<char, char_traits<char> >& str,
      basic_ios<char, char_traits<char> >::int_type c)
{
    // set fill character
    str.fill (char(c));
    return str;
}

#ifdef MSIPL_WCHART

basic_ios<wchar_t, char_traits<wchar_t> >&
ffill (basic_ios<wchar_t, char_traits<wchar_t> >& str,
       basic_ios<wchar_t, char_traits<wchar_t> >::int_type c)
{
    // set fill character
    str.fill (wchar_t(c));
    return str;
}
#endif


smanip <ios_base::fmtflags>
resetiosflags (ios_base::fmtflags  mask)
{
    return  smanip<ios_base::fmtflags> (&freset, mask);
}

smanip <ios_base::fmtflags>
setiosflags (ios_base::fmtflags  mask)
{
    return  smanip<ios_base::fmtflags> (&fset, mask);
}

smanip <int>
setbase (int base)
{
    return  smanip<int> (&fsetbase, base);
}

basic_smanip <basic_ios<char, char_traits<char> >::int_type, char,
              char_traits<char> >
setfill (basic_ios<char, char_traits<char> >::int_type c)
{
    return  basic_smanip<basic_ios<char, char_traits<char> >::int_type, 
                          char, char_traits<char> > (&ffill, c);
}

#ifdef MSIPL_WCHART
// basic_smanip <basic_ios<wchar_t, char_traits<wchar_t> >::int_type,
//               wchar_t, char_traits<wchar_t> >
// setfill (basic_ios<wchar_t, char_traits<wchar_t> >::int_type c)
// {
//     return  basic_smanip<basic_ios<wchar_t,char_traits<wchar_t> >::int_type,
//                          wchar_t, char_traits<wchar_t> > (&ffill, c);
// }
#endif

MSIPL_STD_END

// hh 971220 fixed MOD_INCLUDE
