Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. #include "tinypy.h"
  2. #include "syscalls.c"
  3. #include "fs.c"
  4.  
  5. #define EXPORT(MOD_NAME, F_NAME, F_POINT) tp_set(tp, MOD_NAME , tp_string(F_NAME), tp_fnc(tp, F_POINT))
  6.  
  7. extern tp_obj tp_dict(TP);
  8. extern tp_obj tp_fnc(TP,tp_obj v(TP));
  9.  
  10.  
  11. void ksys_init(TP)
  12. {
  13.     tp_obj ksys_mod = tp_dict(tp);
  14.     // syscalls
  15.     EXPORT(ksys_mod, "debug_print"  , _debug_print);
  16.     EXPORT(ksys_mod, "start_draw"   , _start_draw);
  17.     EXPORT(ksys_mod, "end_draw"     , _end_draw);
  18.     EXPORT(ksys_mod, "create_window", _create_window);
  19.     EXPORT(ksys_mod, "create_button", _create_button);
  20.     EXPORT(ksys_mod, "draw_text"    , _draw_text);
  21.     EXPORT(ksys_mod, "get_event"    , _get_event);
  22.     EXPORT(ksys_mod, "get_button"    ,_get_button);
  23.     EXPORT(ksys_mod, "get_sys_colors",_get_sys_colors);
  24.     // filesystem
  25.     EXPORT(ksys_mod, "open", kolibri_open);
  26.  
  27.     tp_set(tp, ksys_mod, tp_string("__doc__"), tp_string("KolibriOS system specific functions."));
  28.     tp_set(tp, ksys_mod, tp_string("__name__"), tp_string("kolibri"));
  29.     tp_set(tp, ksys_mod, tp_string("__file__"), tp_string(__FILE__));
  30.  
  31.     tp_set(tp, tp->modules, tp_string("ksys"), ksys_mod);
  32. }
  33.