Subversion Repositories Kolibri OS

Rev

Rev 8473 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8473 Rev 8474
Line 12... Line 12...
12 
extern void _tp_list_append(TP,_tp_list *self, tp_obj v);
 12 
extern void _tp_list_append(TP,_tp_list *self, tp_obj v);
13 
extern tp_obj tp_call(TP, const char *mod, const char *fnc, tp_obj params);
 13 
extern tp_obj tp_call(TP, const char *mod, const char *fnc, tp_obj params);
14 
extern void _tp_call(TP,tp_obj *dest, tp_obj fnc, tp_obj params);
 14 
extern void _tp_call(TP,tp_obj *dest, tp_obj fnc, tp_obj params);
15 
extern int tp_bool(TP,tp_obj v);
 15 
extern int tp_bool(TP,tp_obj v);
16 
extern tp_obj tp_has(TP,tp_obj self, tp_obj k);
 16 
extern tp_obj tp_has(TP,tp_obj self, tp_obj k);
17 
#define _cdecl __attribute__((cdecl))
 17 
// #define _cdecl __attribute__((cdecl))
18 
extern int (* _cdecl con_printf)(const char* format,...);
 18 
extern int (* _cdecl con_printf)(const char* format,...);
19 
static tp_obj kolibri_show(TP)
 19 
static tp_obj kolibri_show(TP)
20 
{
 20 
{
21 
    tp_obj self = TP_TYPE(TP_DICT);
 21 
    tp_obj self = TP_TYPE(TP_DICT);
22 
    uint16_t xpos = (uint16_t)(tp_get(tp, self, tp_string("x")).number.val);
 22 
    uint16_t xpos = (uint16_t)(tp_get(tp, self, tp_string("x")).number.val);