diff --git a/rtl/go32v2/crt.pp b/rtl/go32v2/crt.pp index 3398d0c45d..e122c3cef1 100644 --- a/rtl/go32v2/crt.pp +++ b/rtl/go32v2/crt.pp @@ -376,7 +376,7 @@ asm cmpl %fs:(%edi),%ebx je .LDelayLoop1 .LDelayLoop2: -end ['EAX']; +end; procedure initdelay;assembler; @@ -404,7 +404,7 @@ asm movl %eax,DelayCnt popl %edi popl %ebx -end ['EAX','ECX','EDX']; +end; procedure Delay(MS: Word);assembler; @@ -423,7 +423,7 @@ asm .LDelay2: popl %edi popl %ebx -end ['EAX','ECX','EDX']; +end; procedure sound(hz : word); diff --git a/rtl/go32v2/ports.pp b/rtl/go32v2/ports.pp index 997ec9b57e..f3b92eaada 100644 --- a/rtl/go32v2/ports.pp +++ b/rtl/go32v2/ports.pp @@ -60,14 +60,14 @@ asm movw p,%dx movb data,%al outb %al,%dx -end ['EAX','EDX']; +end; function tport.readport(p : word) : byte;assembler; asm movw p,%dx inb %dx,%al -end ['EAX','EDX']; +end; procedure tportw.writeport(p : word;data : word);assembler; @@ -75,14 +75,14 @@ asm movw p,%dx movw data,%ax outw %ax,%dx -end ['EAX','EDX']; +end; function tportw.readport(p : word) : word;assembler; asm movw p,%dx inw %dx,%ax -end ['EAX','EDX']; +end; procedure tportl.writeport(p : word;data : longint);assembler; @@ -90,13 +90,13 @@ asm movw p,%dx movl data,%eax outl %eax,%dx -end ['EAX','EDX']; +end; function tportl.readport(p : word) : longint;assembler; asm movw p,%dx inl %dx,%eax -end ['EAX','EDX']; +end; end.