|
@@ -12,7 +12,6 @@
|
|
|
|
|
|
**********************************************************************}
|
|
**********************************************************************}
|
|
|
|
|
|
-
|
|
|
|
{$define FPC_BASEUNIX_HAS_FPPIPE}
|
|
{$define FPC_BASEUNIX_HAS_FPPIPE}
|
|
Function fppipe(var fildes : tfildes):cint;assembler;
|
|
Function fppipe(var fildes : tfildes):cint;assembler;
|
|
{
|
|
{
|
|
@@ -21,15 +20,15 @@ Function fppipe(var fildes : tfildes):cint;assembler;
|
|
}
|
|
}
|
|
asm
|
|
asm
|
|
mov 42,%g1
|
|
mov 42,%g1
|
|
- mov %i0,%o0
|
|
|
|
- ta 0x10
|
|
|
|
- bcc .LSyscOK
|
|
|
|
|
|
+ mov %i0,%o0
|
|
|
|
+ ta 0x6d
|
|
|
|
+ bcc %xcc,.LSyscOK
|
|
nop
|
|
nop
|
|
call fpseterrno
|
|
call fpseterrno
|
|
nop
|
|
nop
|
|
- mov -1,%i0
|
|
|
|
- b .Lend
|
|
|
|
- nop
|
|
|
|
|
|
+ b .Lend
|
|
|
|
+ { use delay slot }
|
|
|
|
+ mov -1,%o0
|
|
.LSyscOK:
|
|
.LSyscOK:
|
|
st %o0,[%i0]
|
|
st %o0,[%i0]
|
|
st %o1,[%i0+4]
|
|
st %o1,[%i0+4]
|