Subversion Repositories Kolibri OS

Rev

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

  1. #code32 TRUE
  2. dword   heap;
  3. inline fastcall dword malloc(dword ECX){
  4.         dword   size;
  5.         #speed
  6.         size = ECX;
  7.         EAX = 68;
  8.         EBX = 11;
  9.         $int    0x40;
  10.         heap = EAX;
  11.         IF (size<=heap)
  12.         {
  13.                 EAX = 68;
  14.                 EBX = 12;
  15.                 ECX = size;
  16.                 $int    0x40;
  17.         }
  18.         ELSE    EAX=-1;
  19.         #codesize
  20. }
  21.  
  22. inline fastcall dword free(dword ECX){
  23.         #speed
  24.         EAX = 68;
  25.         EBX = 13;
  26.         $int    0x40;
  27.         #codesize
  28. }
  29.  
  30. inline fastcall dword realloc(dword ECX, EDX){
  31.         #speed
  32.         EAX = 68;
  33.         EBX = 20;
  34.         $int    0x40;
  35.         #codesize
  36. }
  37.