Add IsConsole tests to compiler.mod, update bootstrap.

This commit is contained in:
David Brown 2016-11-15 18:03:57 +00:00
parent 6da0d5d685
commit c12aae020d
187 changed files with 348 additions and 342 deletions

View file

@ -1,4 +1,4 @@
/* voc 1.95 [2016/11/15]. Bootstrapping compiler for address size 8, alignment 8. xtspaSfF */
/* voc 1.95 [2016/11/15]. Bootstrapping compiler for address size 8, alignment 8. xtspaSF */
#define SHORTINT INT8
#define INTEGER INT16
@ -9,6 +9,7 @@
#include "Platform.h"
export BOOLEAN Out_IsConsole;
static CHAR Out_buf[128];
static INT16 Out_in;
@ -311,6 +312,7 @@ export void *Out__init(void)
__REGCMD("Ln", Out_Ln);
__REGCMD("Open", Out_Open);
/* BEGIN */
Out_IsConsole = Platform_IsConsole(1);
Out_in = 0;
__ENDMOD;
}