Subversion Repositories Kolibri OS

Rev

Rev 3614 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3614 Rev 3694
Line 2... Line 2...
2 
;;                                                              ;;
 2 
;;                                                              ;;
3 
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
 3 
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
4 
;; Distributed under terms of the GNU General Public License    ;;
 4 
;; Distributed under terms of the GNU General Public License    ;;
5 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 5 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line -... Line 6...
- 
 
 6 
 
Line 6... Line 7...
6 
 
 7 
_esp equ esp
7 
 
 8 
 
8 
;
 9 
;
9 
; Formatted Debug Output (FDO)
 10 
; Formatted Debug Output (FDO)
Line 71... Line 72...
71 
 common
 72 
 common
72 
  if is_str = 1
 73 
  if is_str = 1
73 
        jmp     ..label
 74 
        jmp     ..label
74 
   ..str db _str,0
 75 
   ..str db _str,0
75 
   ..label:
 76 
   ..label:
76 
        add     esp, 4*8+4
 - 
 
77 
        mov     edx, ..str
 77 
        mov     edx, ..str
78 
        sub     esp, 4*8+4
 - 
 
79 
  else
 78 
  else
- 
 
 79 
esp equ esp+4*8+4
80 
        mov     edx, _str
 80 
        mov     edx, _str
- 
 
 81 
esp equ _esp
81 
  end if
 82 
  end if
82 
  if ~_num eq
 83 
  if ~_num eq
83 
   if _num eqtype eax
 84 
   if _num eqtype eax
84 
    if _num in
85 
    if _num in
85 
        mov     esi, _num
 86 
        mov     esi, _num
Line 157... Line 158...
157 
   end if
 158 
   end if
158 
  end if
 159 
  end if
159 
 else if _dec eqtype 0
 160 
 else if _dec eqtype 0
160 
        mov     eax, _dec
 161 
        mov     eax, _dec
161 
 else
 162 
 else
162 
        add     esp, 4*8+4
 163 
esp equ esp+4*8+4
163 
  if _num eq
 164 
  if _num eq
164 
        mov     eax, dword _dec
 165 
        mov     eax, dword _dec
165 
  else if _num = 1
 166 
  else if _num = 1
166 
   if _sign = 1
 167 
   if _sign = 1
167 
        movsx   eax, byte _dec
 168 
        movsx   eax, byte _dec
Line 175... Line 176...
175 
        movzx   eax, word _dec
 176 
        movzx   eax, word _dec
176 
   end if
 177 
   end if
177 
  else
 178 
  else
178 
        mov     eax, dword _dec
 179 
        mov     eax, dword _dec
179 
  end if
 180 
  end if
180 
        sub     esp, 4*8+4
 181 
esp equ _esp
181 
 end if
 182 
 end if
182 
        mov     cl, _sign
 183 
        mov     cl, _sign
183 
        call    fdo_debug_outdec
 184 
        call    fdo_debug_outdec
184 
        popad
 185 
        popad
185 
        popf
 186 
        popf
Line 225... Line 226...
225 
   end if
 226 
   end if
226 
  end if
 227 
  end if
227 
 else if _hex eqtype 0
 228 
 else if _hex eqtype 0
228 
        mov     eax, _hex
 229 
        mov     eax, _hex
229 
 else
 230 
 else
230 
        add     esp, 4*8+4
 231 
esp equ esp+4*8+4
231 
        mov     eax, dword _hex
 232 
        mov     eax, dword _hex
232 
        sub     esp, 4*8+4
 233 
esp equ _esp
233 
 end if
 234 
 end if
234 
 if ~_num eq
 235 
 if ~_num eq
235 
        mov     edx, _num
 236 
        mov     edx, _num
236 
 else
 237 
 else
237 
  if ~_hex eqtype eax
 238 
  if ~_hex eqtype eax