Subversion Repositories Kolibri OS

Rev

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

  1. #include "tp.h"
  2.  
  3. void debug_write_byte(const char ch){
  4.     __asm__ __volatile__(
  5.     "int $0x40"
  6.     ::"a"(63), "b"(1), "c"(ch)
  7.     );
  8. }
  9.  
  10. tp_obj kolibri_debug_print(TP)
  11. {
  12.     tp_obj str = TP_TYPE(TP_STRING);
  13.     for(int i=0; i < str.string.len; i++)
  14.     {
  15.        debug_write_byte(str.string.val[i]);
  16.     }
  17.     return tp_None;
  18. }
  19.  
  20.