Subversion Repositories Kolibri OS

Rev

Rev 2039 | Rev 2073 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1913 jaeger 1
#include "tp.c"
2
/* INCLUDE */
3
const char header[]="TinyPy for kolibriOS";
4
const int argc = 2;
2048 jaeger 5
extern _stdcall void kolibri_dbg_init(tp_vm *tp);
6
 
1913 jaeger 7
void main(void) {
8
    char *argv[2]={"tpmain", "test.py"};
9
 
10
    CONSOLE_INIT(header);
11
    con_printf("TinyPy console, version 1.1.\n");
12
    con_printf("Enter program file:");
13
    if (!(argv[1] = malloc(256)))
14
      con_printf("Memory error\n");
15
    con_gets(argv[1], 256);
16
    argv[1][strlen(argv[1]) - 1] = '\0';
17
    con_printf("Running file %s\n", argv[1]);
18
    tp_vm *tp = tp_init(argc, argv);
2048 jaeger 19
    kolibri_dbg_init(tp);
2001 jaeger 20
    kolibri_init(tp);
1913 jaeger 21
    /* INIT */
22
    tp_call(tp,"py2bc","tinypy",tp_None);
23
    tp_deinit(tp);
2039 jaeger 24
    kol_exit();
1913 jaeger 25
    return;
26
}
27
 
28
/**/