[fpc-devel]Re: Bug in AssignPipe() on Linux

[Pedro Lopez-Cabanillas]

Marco van de Voort wrote:
> - Do an strace, and see if there is a function that fails.

Everything seems OK.

$ strace pipetest
execve("/home/plc/Pascal/test1.9/pipetest", ["pipetest"], [/* 63 vars */]) = 0
sigaction(SIGFPE, {0x805a9d4, [], 0}, {SIG_DFL}, 0x40054d58) = 0
sigaction(SIGSEGV, {0x805a9d4, [], 0}, {SIG_DFL}, 0x40054d58) = 0
sigaction(SIGBUS, {0x805a9d4, [], 0}, {SIG_DFL}, 0x40054d58) = 0
sigaction(SIGILL, {0x805a9d4, [], 0}, {SIG_DFL}, 0x40054d58) = 0
getpid()                                = 4307
readlink("/proc/4307/exe", "/home/plc/Pascal/test1.9/pipetest", 255) = 33
open("/etc/timezone", O_RDONLY)         = 3
read(3, "Europe/Madrid", 255)           = 13
close(3)                                = 0
open("/usr/share/zoneinfo/Europe/Madrid", O_RDONLY) = 3
read(3, "TZif\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\10\0\0\0\10"..., 44) = 44
read(3, "\234\363\360p\235\276\367p\236\272\305\360\237\240*\360"..., 652) = 
652
read(3, "\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0\2\0\2\0"..., 163) = 
163
read(3, "\0\0\16\20", 4)                = 4
read(3, "\1", 1)                        = 1
read(3, "\0", 1)                        = 1
read(3, "\0\0\0\0", 4)                  = 4
read(3, "\0", 1)                        = 1
read(3, "\5", 1)                        = 1
read(3, "\0\0\34 ", 4)                  = 4
read(3, "\1", 1)                        = 1
read(3, "\t", 1)                        = 1
read(3, "\0\0\16\20", 4)                = 4
read(3, "\1", 1)                        = 1
read(3, "\0", 1)                        = 1
read(3, "\0\0\34 ", 4)                  = 4
read(3, "\1", 1)                        = 1
read(3, "\16", 1)                       = 1
read(3, "\0\0\16\20", 4)                = 4
read(3, "\0", 1)                        = 1
read(3, "\23", 1)                       = 1
read(3, "\0\0\34 ", 4)                  = 4
read(3, "\1", 1)                        = 1
read(3, "\16", 1)                       = 1
read(3, "\0\0\16\20", 4)                = 4
read(3, "\0", 1)                        = 1
read(3, "\23", 1)                       = 1
read(3, "WEST\0WET\0WEMT\0CEST\0CET\0", 23) = 23
read(3, "\1\1\1\0\0\0\1\1", 8)          = 8
read(3, "\0\0\0\0\0\0\1\1", 8)          = 8
close(3)                                = 0
time([1068403026])                      = 1068403026
pipe([3, 4])                            = 0
write(2, "AssignPipe: Success\n", 20AssignPipe: Success
)   = 20
_exit(0)                                = ?

I've compiled the latest Lazarus snapshot, successfully. It fails when invoke 
fpc with the message: 

[TCompiler.Compile] CmdLine="/usr/bin/ppc386  -Rintel -S2cgi -CD -Ch8000000 
-OG1p1 -gl -XD -vewnhi -l -Fu/usr/share/lazarus/lcl/units/ 
-Fu/usr/share/lazarus/lcl/units/gtk/ -Fu/usr/share/lazarus/packager/units/ 
-Fu. -dLCL /home/plc/Pascal/prueba1/project1.lpr"
[TCompiler.Compile] exception "Failed to create pipe."
TOutputFilter: "Failed to create pipe."

I'm suspecting that an old tree of fpc sources was lying around (fpcsrc rpm  
from Lazarus site) when i compiled Lazarus. I'm cleaning everything before  
rebuilding it again.

Regards,
Pedro

-- 
ALSA Library Bindings for Pascal
http://alsapas.alturl.com