* 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:
parent
284ec7540b
commit
f663715179
14
src/main.c
14
src/main.c
|
@ -30,10 +30,20 @@
|
||||||
|
|
||||||
#include "config.h"
|
#include "config.h"
|
||||||
|
|
||||||
|
#ifdef WIN32
|
||||||
|
# include <windows.h>
|
||||||
|
#endif
|
||||||
|
|
||||||
#include <scheme.h>
|
#include <scheme.h>
|
||||||
|
|
||||||
int main(int ac, char **av) {
|
int main (int ac, char **av) {
|
||||||
Elk_Init(ac, av, 1, "");
|
#ifdef WIN32
|
||||||
|
AllocConsole ();
|
||||||
|
freopen ("CONIN$", "r", stdin);
|
||||||
|
freopen ("CONOUT$", "w", stdout);
|
||||||
|
freopen ("CONOUT$", "w", stderr);
|
||||||
|
#endif
|
||||||
|
Elk_Init (ac, av, 1, "");
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue