Subversion Repositories Kolibri OS

Rev

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

Rev 1088 Rev 1314
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 6... Line 6...
6 
 
 6 
 
Line -... Line 7...
- 
 
 7 
$Revision: 1314 $
Line 7... Line 8...
7 
$Revision: 1088 $
 8 
 
8 
 
 9 
_esp equ esp
9 
 
 10 
 
10 
;
 11 
;
Line 59... Line 60...
59 
 common
 60 
 common
60 
  if is_str = 1
 61 
  if is_str = 1
61 
   jmp ..label
 62 
   jmp ..label
62 
   ..str db _str,0
 63 
   ..str db _str,0
63 
   ..label:
 64 
   ..label:
64 
   add  esp,4*8+4
 65 
;   add  esp,4*8+4
- 
 
 66 
esp equ esp+4*8+4
65 
   mov  edx,..str
 67 
   mov  edx,..str
- 
 
 68 
esp equ _esp
66 
   sub  esp,4*8+4
 69 
;   sub  esp,4*8+4
67 
  else
 70 
  else
68 
   mov  edx,_str
 71 
   mov  edx,_str
69 
  end if
 72 
  end if
70 
  if ~_num eq
 73 
  if ~_num eq
71 
   if _num eqtype eax
 74 
   if _num eqtype eax
Line 145... Line 148...
145 
   end if
 148 
   end if
146 
  end if
 149 
  end if
147 
 else if _dec eqtype 0
 150 
 else if _dec eqtype 0
148 
  mov eax,_dec
 151 
  mov eax,_dec
149 
 else
 152 
 else
150 
  add esp,4*8+4
 153 
;  add esp,4*8+4
- 
 
 154 
esp equ esp+4*8+4
151 
  if _num eq
 155 
  if _num eq
152 
   mov eax,dword _dec
 156 
   mov eax,dword _dec
153 
  else if _num = 1
 157 
  else if _num = 1
154 
   if _sign = 1
 158 
   if _sign = 1
155 
    movsx eax,byte _dec
 159 
    movsx eax,byte _dec
Line 163... Line 167...
163 
    movzx eax,word _dec
 167 
    movzx eax,word _dec
164 
   end if
 168 
   end if
165 
  else
 169 
  else
166 
   mov eax,dword _dec
 170 
   mov eax,dword _dec
167 
  end if
 171 
  end if
- 
 
 172 
esp equ _esp
168 
  sub esp,4*8+4
 173 
;  sub esp,4*8+4
169 
 end if
 174 
 end if
170 
 mov cl,_sign
 175 
 mov cl,_sign
171 
 call fdo_debug_outdec
 176 
 call fdo_debug_outdec
172 
 popad
 177 
 popad
173 
 popf
 178 
 popf
Line 213... Line 218...
213 
   end if
 218 
   end if
214 
  end if
 219 
  end if
215 
 else if _hex eqtype 0
 220 
 else if _hex eqtype 0
216 
  mov eax,_hex
 221 
  mov eax,_hex
217 
 else
 222 
 else
218 
  add esp,4*8+4
 223 
;  add esp,4*8+4
- 
 
 224 
esp equ esp+4*8+4
219 
  mov eax,dword _hex
 225 
  mov eax,dword _hex
- 
 
 226 
esp equ _esp
220 
  sub esp,4*8+4
 227 
;  sub esp,4*8+4
221 
 end if
 228 
 end if
222 
 if ~_num eq
 229 
 if ~_num eq
223 
  mov edx,_num
 230 
  mov edx,_num
224 
 else
 231 
 else
225 
  if ~_hex eqtype eax
 232 
  if ~_hex eqtype eax