Rev 2006 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 2006 | jaeger | 1 | #include "tp.h" |
| 2 | |||
| 3 | extern tp_obj kolibri_open(TP); |
||
| 2099 | jaeger | 4 | extern tp_obj kolibri_mainwindow(TP); |
| 5 | extern tp_obj kolibri_socket_module(TP); |
||
| 2006 | jaeger | 6 | extern tp_obj tp_dict(TP); |
| 7 | extern tp_obj tp_fnc(TP,tp_obj v(TP)); |
||
| 8 | |||
| 9 | void kolibri_init(TP) |
||
| 10 | { |
||
| 11 | tp_obj kolibri_mod = tp_dict(tp); |
||
| 2099 | jaeger | 12 | tp_obj socket_mod = kolibri_socket_module(tp); |
| 2006 | jaeger | 13 | |
| 14 | tp_set(tp, kolibri_mod, tp_string("open"), tp_fnc(tp, kolibri_open)); |
||
| 2099 | jaeger | 15 | tp_set(tp, kolibri_mod, tp_string("window"), tp_fnc(tp, kolibri_mainwindow)); |
| 16 | /* socket is a separated module. */ |
||
| 17 | tp_set(tp, kolibri_mod, tp_string("socket"), socket_mod); |
||
| 2006 | jaeger | 18 | |
| 19 | /* Bind module attributes. */ |
||
| 20 | tp_set(tp, kolibri_mod, tp_string("__doc__"), |
||
| 21 | tp_string("KolibriOS system specific functions.")); |
||
| 22 | tp_set(tp, kolibri_mod, tp_string("__name__"), tp_string("kolibri")); |
||
| 23 | tp_set(tp, kolibri_mod, tp_string("__file__"), tp_string(__FILE__)); |
||
| 24 | /* Bind to tiny modules[] */ |
||
| 25 | tp_set(tp, tp->modules, tp_string("kolibri"), kolibri_mod); |
||
| 26 | } |