* Allocate a DOS command window under Win32.

git-svn-id: svn://svn.zoy.org/elk/trunk@141 55e467fa-43c5-0310-a8a2-de718669efc6
This commit is contained in:
sam 2003-09-10 23:26:02 +00:00
parent 284ec7540b
commit f663715179
1 changed files with 12 additions and 2 deletions

View File

@ -30,10 +30,20 @@
#include "config.h"
#ifdef WIN32
# include <windows.h>
#endif
#include <scheme.h>
int main(int ac, char **av) {
Elk_Init(ac, av, 1, "");
int main (int ac, char **av) {
#ifdef WIN32
AllocConsole ();
freopen ("CONIN$", "r", stdin);
freopen ("CONOUT$", "w", stdout);
freopen ("CONOUT$", "w", stderr);
#endif
Elk_Init (ac, av, 1, "");
return 0;
}