Subversion Repositories Kolibri OS

Rev

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

Rev 6832 Rev 7134
Line 327... Line 327...
327 
 end if
 327 
 end if
328 
}
 328 
}
Line 329... Line 329...
329 
 
 329 
 
330 
 
 330 
 
331 
; -------------------------
 331 
; -------------------------
332 
macro header a,[b] {
 332 
macro __header a,[b] {
333 
 common
 333 
 common
334 
  use32
 334 
  use32
335 
  org 0
 335 
  org 0
336 
  db 'MENUET',a
 336 
  db 'MENUET',a
337 
 forward
 337 
 forward
338 
  if b eq
 338 
  if b eq
339 
   dd 0
 339 
   dd 0
340 
  else
 340 
  else
- 
 
 341 
   dd b
- 
 
 342 
  end if
341 
   dd b
 343 
}
- 
 
 344 
 
342 
  end if }
 345 
macro __section name {
- 
 
 346 
 align 16
- 
 
 347 
 label name
343 
macro section name { align 16
 348 
}
344 
 label name }
 349 
 
345 
macro func name {
 350 
macro __func name {
346 
 if ~used name
 351 
 if ~used name
347 
  display 'FUNC NOT USED: ',`name,13,10
 352 
  display 'FUNC NOT USED: ',`name,13,10
348 
 else
 353 
 else
349 
  align 4
 354 
  align 4
350 
  name:
 - 
 
351 
  ;diff16 `name,0,name
 - 
 
352 
;pushad
 - 
 
353 
;pushfd
 - 
 
354 
;dps `name
 - 
 
355 
;newline
 - 
 
356 
;mcall 5,1
 - 
 
357 
;popfd
 355 
  name:
- 
 
 356 
  ;diff16 `name,0,name
358 
;popad
 357 
}
Line 359... Line 358...
359 
}
 358 
 
360 
macro endf { end if }
 359 
macro endf { end if }
361 
 
 360