Subversion Repositories Kolibri OS

Rev

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

Rev 160 Rev 162
Line 48... Line 48...
48 
    display d
 48 
    display d
49 
  end repeat
 49 
  end repeat
50 
  display 13,10
 50 
  display 13,10
51 
}
 51 
}
Line -... Line 52...
- 
 
 52 
 
- 
 
 53 
; \begin{diamond}[29.09.2006]
- 
 
 54 
; may be useful for kernel debugging
- 
 
 55 
; example 1:
- 
 
 56 
;       dbgstr 'Hello, World!'
- 
 
 57 
; example 2:
- 
 
 58 
;       dbgstr 'Hello, World!', save_flags
- 
 
 59 
macro dbgstr string*, f
- 
 
 60 
{
- 
 
 61 
local a
- 
 
 62 
iglobal_nested
- 
 
 63 
a db 'K : ',string,13,10,0
- 
 
 64 
endg_nested
- 
 
 65 
if ~ f eq
- 
 
 66 
        pushfd
- 
 
 67 
end if
- 
 
 68 
        push    esi
- 
 
 69 
        mov     esi, a
- 
 
 70 
        call    sys_msg_board_str
- 
 
 71 
        pop     esi
- 
 
 72 
if ~ f eq
- 
 
 73 
        popfd
- 
 
 74 
end if
- 
 
 75 
}
- 
 
 76 
; \end{diamond}[29.09.2006]
52 
 
 77 
 
53 
struc db [a] { common . db a
 78 
struc db [a] { common . db a
54 
  if ~used .
 79 
  if ~used .
55 
    display 'not used db: ',`.,13,10
 80 
    display 'not used db: ',`.,13,10
56 
  end if }
 81 
  end if }