-
-#ifdef __DOS__
-// VS: this should be in utilsdos.cpp, but since there will hardly ever
-// be a non-MGL MS-DOS port...
-
-void wxSleep(int nSecs)
-{
- wxUsleep(1000 * nSecs);
-}
-
-void wxUsleep(unsigned long milliseconds)
-{
- PM_sleep(milliseconds);
-}
-
-
-bool wxGetEnv(const wxString& var, wxString *value)
-{
- // wxGetenv is defined as getenv()
- wxChar *p = wxGetenv(var);
- if ( !p )
- return FALSE;
-
- if ( value )
- *value = p;
-
- return TRUE;
-}
-
-bool wxSetEnv(const wxString& variable, const wxChar *value)
-{
-#ifdef __WATCOMC__ // has putenv()
- wxString s = variable;
- if ( value )
- s << _T('=') << value;
-
- // transform to ANSI
- const char *p = s.mb_str();
-
- // the string will be free()d by libc
- char *buf = (char *)malloc(strlen(p) + 1);
- strcpy(buf, p);
-
- return putenv(buf) == 0;
-#else // no way to set an env var
- #error "Don't know how to implement wxSetEnv on this platform!"
- return FALSE;
-#endif
-}
-
-const wxChar* wxGetHomeDir(wxString *home)
-{
- *home = wxT(".");
- return home->c_str();
-}
-
-const wxChar* wxGetUserHomeDir(wxString *home)
-{
- *home = wxT(".");
- return home->c_str();
-}
-
-#if wxUSE_UNICODE
-const wxMB2WXbuf wxGetUserHome(const wxString &user)
-#else // just for binary compatibility -- there is no 'const' here
-wxChar *wxGetUserHome(const wxString &user)
-#endif
-{
- return wxT(".");
-}
-
-void wxFatalError(const wxString &msg, const wxString &title)
-{
- if (!title.IsNull())
- wxFprintf( stderr, wxT("%s "), WXSTRINGCAST(title));
- PM_fatalError(msg.c_str());
-}
-
-bool wxGetUserId(wxChar *WXUNUSED(buf), int WXUNUSED(sz))
-{
- wxFAIL_MSG( wxT("wxGetUserId not implemented under MS-DOS!") );
- return FALSE;
-}
-
-bool wxGetUserName(wxChar *WXUNUSED(buf), int WXUNUSED(sz))
-{
- wxFAIL_MSG( wxT("wxGetUserName not implemented under MS-DOS!") );
- return FALSE;
-}
-
-bool wxGetHostName(wxChar *WXUNUSED(buf), int WXUNUSED(sz))
-{
- wxFAIL_MSG( wxT("wxGetHostName not implemented under MS-DOS!") );
- return FALSE;
-}
-
-bool wxGetFullHostName(wxChar *WXUNUSED(buf), int WXUNUSED(sz))
-{
- wxFAIL_MSG( wxT("wxGetFullHostName not implemented under MS-DOS!") );
- return FALSE;
-}
-
-int wxKill(long WXUNUSED(pid), wxSignal WXUNUSED(sig), wxKillError *WXUNUSED(rc))
-{
- wxFAIL_MSG( wxT("wxKill not implemented under MS-DOS!") );
- return 0;
-}
-
-long wxExecute(const wxString& WXUNUSED(command), bool WXUNUSED(sync), wxProcess *WXUNUSED(process))
-{
- wxFAIL_MSG( wxT("wxExecute not implemented under MS-DOS!") );
- return 0;
-}
-
-long wxExecute(wxChar **WXUNUSED(argv), bool WXUNUSED(sync), wxProcess *WXUNUSED(process))
-{
- wxFAIL_MSG( wxT("wxExecute not implemented under MS-DOS!") );
- return 0;
-}
-
-
-#endif
-