Przeglądaj źródła

* wrong use of Intel syntax

Tomas Hajny 22 lat temu
rodzic
commit
c9445358ce
2 zmienionych plików z 18 dodań i 9 usunięć
  1. 10 4
      rtl/emx/system.pas
  2. 8 5
      rtl/os2/system.pas

+ 10 - 4
rtl/emx/system.pas

@@ -292,7 +292,10 @@ begin
     movl size,%edx
     movw $0x7f00,%eax
     call syscall     { result directly in EAX }
-@Sbrk_End:
+    inc %eax         { Result in EAX, -1 = error (has to be transformed to 0) }
+    jz .LSbrk_End
+    dec %eax         { No error - back to previous value }
+.LSbrk_End:
     mov  %eax,L
   end ['eax', 'edx'];
   WriteLn ('New heap at ', L);
@@ -305,9 +308,9 @@ asm
     movw $0x7f00,%eax
     call syscall
     inc %eax         { Result in EAX, -1 = error (has to be transformed to 0) }
-    jz .Sbrk_End
+    jz .LSbrk_End
     dec %eax         { No error - back to previous value }
-.Sbrk_End:
+.LSbrk_End:
 end ['eax', 'edx'];
 {$ENDIF DUMPGROW}
 
@@ -1243,7 +1246,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.13  2003-10-12 17:59:40  hajny
+  Revision 1.14  2003-10-12 18:07:30  hajny
+    * wrong use of Intel syntax
+
+  Revision 1.13  2003/10/12 17:59:40  hajny
     * wrong use of Intel syntax
 
   Revision 1.12  2003/10/12 17:52:28  hajny

+ 8 - 5
rtl/os2/system.pas

@@ -461,9 +461,9 @@ begin
     movw $0x7f00,%ax
     call syscall     { result directly in EAX }
     inc eax          { Result in EAX, -1 = error (has to be transformed to 0) }
-    jz Sbrk_End
+    jz .LSbrk_End
     dec eax          { No error - back to previous value }
-@Sbrk_End:
+.LSbrk_End:
     mov  %eax,L
   end ['eax', 'edx'];
   WriteLn ('New heap at ', L);
@@ -476,9 +476,9 @@ asm
     movw $0x7f00,%ax
     call syscall
     inc %eax         { Result in EAX, -1 = error (has to be transformed to 0) }
-    jz .Sbrk_End
+    jz .LSbrk_End
     dec %eax         { No error - back to previous value }
-.Sbrk_End:
+.LSbrk_End:
 end ['eax', 'edx'];
 {$ENDIF DUMPGROW}
 
@@ -1158,7 +1158,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.43  2003-10-12 17:59:40  hajny
+  Revision 1.44  2003-10-12 18:07:30  hajny
+    * wrong use of Intel syntax
+
+  Revision 1.43  2003/10/12 17:59:40  hajny
     * wrong use of Intel syntax
 
   Revision 1.42  2003/10/12 17:52:28  hajny