Hi all,

I'm trying to create a Guile module, using code written in Mercury.
(http://www.cs.mu.oz.au/research/mercury/)
I have managed to produce a library file (.so), but when I try to open
it in Guile (with dynamic-link), I get "file not found". It's clear from
the strace output that it does find my library, but then it checks some
other Mercury libraries, and presumably finds something it doesn't like.
The log from strace ends with this:

open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/libgc.so",
O_RDONLY) = 9
read(9,
"\177elf\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\...@y\0\0004\0\0\0"..., 512)
= 512
fstat64(9, {st_mode=S_IFREG|0755, st_size=121223, ...}) = 0
mmap2(NULL, 464944, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 9, 0)
= 0x9a4000
mmap2(0x9bb000, 8192, PROT_READ|PROT_WRITE,
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 9, 0x17) = 0x9bb000
mmap2(0x9bd000, 362544, PROT_READ|PROT_WRITE,
MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0x9bd000
close(9)                                = 0
mprotect(0x9bb000, 4096, PROT_READ)     = 0
mprotect(0x298000, 4096, PROT_READ)     = 0
mprotect(0x11b2000, 126976, PROT_READ)  = 0
mprotect(0x422000, 20480, PROT_READ|PROT_WRITE) = 0
munmap(0x422000, 24684)                 = 0
munmap(0xdec000, 6385312)               = 0
munmap(0x255000, 287840)                = 0
munmap(0x9a4000, 464944)                = 0

I guess that "libgc.so" is the Mercury garbage collector. Is there some
problem with having another GC in a Guile module?

Entire strace output attached. Any help appreciated.

/Tomas
execve("/usr/bin/guile", ["guile"], [/* 39 vars */]) = 0
brk(0)                                  = 0x92fd000
access("/etc/ld.so.nohwcap", F_OK)      = -1 ENOENT (No such file or directory)
mmap2(NULL, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 
0xb77e8000
access("/etc/ld.so.preload", R_OK)      = -1 ENOENT (No such file or directory)
open("/etc/ld.so.cache", O_RDONLY)      = 3
fstat64(3, {st_mode=S_IFREG|0644, st_size=91754, ...}) = 0
mmap2(NULL, 91754, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb77d1000
close(3)                                = 0
access("/etc/ld.so.nohwcap", F_OK)      = -1 ENOENT (No such file or directory)
open("/usr/lib/libguile.so.17", O_RDONLY) = 3
read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0 r\2\0004\0\0\0"..., 
512) = 512
fstat64(3, {st_mode=S_IFREG|0644, st_size=942204, ...}) = 0
mmap2(NULL, 982172, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 
0xcb2000
mmap2(0xd95000, 12288, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0xe3) = 0xd95000
mmap2(0xd98000, 40092, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0xd98000
close(3)                                = 0
access("/etc/ld.so.nohwcap", F_OK)      = -1 ENOENT (No such file or directory)
open("/usr/lib/libgmp.so.3", O_RDONLY)  = 3
read(3, "\177elf\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\...@\226\0\0004\0\0\0"..., 
512) = 512
fstat64(3, {st_mode=S_IFREG|0644, st_size=390700, ...}) = 0
mmap2(NULL, 393516, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 
0x93e000
mmap2(0x99d000, 8192, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x5e) = 0x99d000
close(3)                                = 0
access("/etc/ld.so.nohwcap", F_OK)      = -1 ENOENT (No such file or directory)
open("/lib/tls/i686/cmov/libcrypt.so.1", O_RDONLY) = 3
read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0P\7\0\0004\0\0\0"..., 
512) = 512
fstat64(3, {st_mode=S_IFREG|0644, st_size=38360, ...}) = 0
mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 
0xb77d0000
mmap2(NULL, 201052, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 
0xa90000
mmap2(0xa99000, 8192, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x8) = 0xa99000
mmap2(0xa9b000, 155996, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0xa9b000
close(3)                                = 0
access("/etc/ld.so.nohwcap", F_OK)      = -1 ENOENT (No such file or directory)
open("/lib/tls/i686/cmov/libm.so.6", O_RDONLY) = 3
read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0`4\0\0004\0\0\0"..., 
512) = 512
fstat64(3, {st_mode=S_IFREG|0644, st_size=149392, ...}) = 0
mmap2(NULL, 151680, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 
0x2b4000
mmap2(0x2d8000, 8192, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x23) = 0x2d8000
close(3)                                = 0
access("/etc/ld.so.nohwcap", F_OK)      = -1 ENOENT (No such file or directory)
open("/usr/lib/libltdl.so.7", O_RDONLY) = 3
read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0P\32\0\0004\0\0\0"..., 
512) = 512
fstat64(3, {st_mode=S_IFREG|0644, st_size=34260, ...}) = 0
mmap2(NULL, 37084, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 
0xb77000
mmap2(0xb7f000, 8192, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x7) = 0xb7f000
close(3)                                = 0
access("/etc/ld.so.nohwcap", F_OK)      = -1 ENOENT (No such file or directory)
open("/lib/tls/i686/cmov/libpthread.so.0", O_RDONLY) = 3
read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0PI\0\0004\0\0\0"..., 
512) = 512
fstat64(3, {st_mode=S_IFREG|0755, st_size=116920, ...}) = 0
mmap2(NULL, 98792, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 
0x4da000
mmap2(0x4ef000, 8192, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x14) = 0x4ef000
mmap2(0x4f1000, 4584, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0x4f1000
close(3)                                = 0
access("/etc/ld.so.nohwcap", F_OK)      = -1 ENOENT (No such file or directory)
open("/lib/tls/i686/cmov/libc.so.6", O_RDONLY) = 3
read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0\260l\1\0004\0\0\0"..., 
512) = 512
fstat64(3, {st_mode=S_IFREG|0755, st_size=1319364, ...}) = 0
mmap2(NULL, 1329512, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 
0x110000
mprotect(0x24e000, 4096, PROT_NONE)     = 0
mmap2(0x24f000, 12288, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x13e) = 0x24f000
mmap2(0x252000, 10600, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0x252000
close(3)                                = 0
access("/etc/ld.so.nohwcap", F_OK)      = -1 ENOENT (No such file or directory)
open("/lib/tls/i686/cmov/libdl.so.2", O_RDONLY) = 3
read(3, "\177elf\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\...@\n\0\0004\0\0\0"..., 
512) = 512
fstat64(3, {st_mode=S_IFREG|0644, st_size=9736, ...}) = 0
mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 
0xb77cf000
mmap2(NULL, 12408, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 
0xb1f000
mmap2(0xb21000, 8192, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x1) = 0xb21000
close(3)                                = 0
mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 
0xb77ce000
set_thread_area({entry_number:-1 -> 6, base_addr:0xb77ce6c0, limit:1048575, 
seg_32bit:1, contents:0, read_exec_only:0, limit_in_pages:1, seg_not_present:0, 
useable:1}) = 0
mprotect(0xb21000, 4096, PROT_READ)     = 0
mprotect(0x24f000, 8192, PROT_READ)     = 0
mprotect(0x4ef000, 4096, PROT_READ)     = 0
mprotect(0xb7f000, 4096, PROT_READ)     = 0
mprotect(0x2d8000, 4096, PROT_READ)     = 0
mprotect(0xa99000, 4096, PROT_READ)     = 0
mprotect(0x99d000, 4096, PROT_READ)     = 0
mprotect(0xd95000, 8192, PROT_READ)     = 0
mprotect(0x8049000, 4096, PROT_READ)    = 0
mprotect(0x7f9000, 4096, PROT_READ)     = 0
munmap(0xb77d1000, 91754)               = 0
set_tid_address(0xb77ce728)             = 29227
set_robust_list(0xb77ce730, 0xc)        = 0
futex(0xbf984d80, FUTEX_WAKE_PRIVATE, 1) = 0
futex(0xbf984d80, 0x189 /* FUTEX_??? */, 1, NULL, bf984d90) = -1 EAGAIN 
(Resource temporarily unavailable)
rt_sigaction(SIGRTMIN, {0x4de340, [], SA_SIGINFO}, NULL, 8) = 0
rt_sigaction(SIGRT_1, {0x4de820, [], SA_RESTART|SA_SIGINFO}, NULL, 8) = 0
rt_sigprocmask(SIG_UNBLOCK, [RTMIN RT_1], NULL, 8) = 0
getrlimit(RLIMIT_STACK, {rlim_cur=8192*1024, rlim_max=RLIM_INFINITY}) = 0
uname({sys="Linux", node="desktop", ...}) = 0
futex(0xd9e680, FUTEX_WAKE_PRIVATE, 2147483647) = 0
brk(0)                                  = 0x92fd000
brk(0x931e000)                          = 0x931e000
pipe([3, 4])                            = 0
mmap2(NULL, 274432, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 
0xb778b000
times({tms_utime=0, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057362
times({tms_utime=0, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057362
times({tms_utime=0, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057362
times({tms_utime=0, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057362
times({tms_utime=0, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057362
times({tms_utime=0, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057362
mmap2(NULL, 208896, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 
0xb7758000
gettimeofday({1265328169, 933982}, {0, 0}) = 0
times({tms_utime=0, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057362
ioctl(0, SNDCTL_TMR_TIMEBASE or TCGETS, {B38400 opost isig icanon echo ...}) = 0
fcntl64(0, F_GETFL)                     = 0x2 (flags O_RDWR)
lseek(0, 0, SEEK_CUR)                   = -1 ESPIPE (Illegal seek)
ioctl(1, SNDCTL_TMR_TIMEBASE or TCGETS, {B38400 opost isig icanon echo ...}) = 0
fcntl64(1, F_GETFL)                     = 0x2 (flags O_RDWR)
lseek(1, 0, SEEK_CUR)                   = -1 ESPIPE (Illegal seek)
ioctl(2, SNDCTL_TMR_TIMEBASE or TCGETS, {B38400 opost isig icanon echo ...}) = 0
fcntl64(2, F_GETFL)                     = 0x2 (flags O_RDWR)
lseek(2, 0, SEEK_CUR)                   = -1 ESPIPE (Illegal seek)
stat64("/usr/share/guile/site/init.scm", 0xbf984afc) = -1 ENOENT (No such file 
or directory)
stat64("/usr/share/guile/1.8/init.scm", 0xbf984afc) = -1 ENOENT (No such file 
or directory)
stat64("/usr/share/guile/init.scm", 0xbf984afc) = -1 ENOENT (No such file or 
directory)
stat64("/usr/share/guile/site/ice-9/boot-9.scm", 0xbf984adc) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/1.8/ice-9/boot-9.scm", {st_mode=S_IFREG|0644, 
st_size=104124, ...}) = 0
open("/usr/share/guile/1.8/ice-9/boot-9.scm", O_RDONLY|O_LARGEFILE) = 5
fcntl64(5, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(5, 0, SEEK_CUR)                   = 0
fstat64(5, {st_mode=S_IFREG|0644, st_size=104124, ...}) = 0
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, ";;; installed-scm-file\n\n;;;; Cop"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "ro-table m #t))\n(define (defmacr"..., 4096) = 4096
stat64("/usr/share/guile/site/ice-9/r4rs.scm", 0xbf9849fc) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/1.8/ice-9/r4rs.scm", {st_mode=S_IFREG|0644, 
st_size=8623, ...}) = 0
open("/usr/share/guile/1.8/ice-9/r4rs.scm", O_RDONLY|O_LARGEFILE) = 6
fcntl64(6, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(6, 0, SEEK_CUR)                   = 0
fstat64(6, {st_mode=S_IFREG|0644, st_size=8623, ...}) = 0
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, ";;;; r4rs.scm --- definitions ne"..., 4096) = 4096
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "e opened, an error is\nsignalled."..., 4096) = 4096
brk(0x933f000)                          = 0x933f000
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "d-verbosely v))\n\n(define (%load-"..., 4096) = 431
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "", 4096)                       = 0
close(6)                                = 0
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "member kw args)))\n    (and rem ("..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, " (struct? obj) (record-type? (st"..., 4096) = 4096
stat64("/usr/share/guile/site/ice-9/posix.scm", 0xbf9849fc) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/1.8/ice-9/posix.scm", {st_mode=S_IFREG|0644, 
st_size=2585, ...}) = 0
open("/usr/share/guile/1.8/ice-9/posix.scm", O_RDONLY|O_LARGEFILE) = 6
fcntl64(6, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(6, 0, SEEK_CUR)                   = 0
fstat64(6, {st_mode=S_IFREG|0644, st_size=2585, ...}) = 0
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, ";;; installed-scm-file\n\n;;;; Cop"..., 4096) = 2585
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "", 4096)                       = 0
close(6)                                = 0
stat64("/usr/share/guile/site/ice-9/networking.scm", 0xbf9849fc) = -1 ENOENT 
(No such file or directory)
stat64("/usr/share/guile/1.8/ice-9/networking.scm", {st_mode=S_IFREG|0644, 
st_size=3029, ...}) = 0
open("/usr/share/guile/1.8/ice-9/networking.scm", O_RDONLY|O_LARGEFILE) = 6
fcntl64(6, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(6, 0, SEEK_CUR)                   = 0
fstat64(6, {st_mode=S_IFREG|0644, st_size=3029, ...}) = 0
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, ";;; installed-scm-file\n\n;;;; Cop"..., 4096) = 3029
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "", 4096)                       = 0
close(6)                                = 0
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, " val))\n(define (set-tm:min obj v"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "\n;;; Load a Scheme source file n"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "argv)\n\t\t\t     (cons (string-appe"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, " as their argument need to be\n;;"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "y binder procedures is going\n;;;"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "re (record-accessor module-type "..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "rsively.  If all applications\n;;"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "s unbound.\n;; If the OPT-VALUE i"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "odule filename . reader)\n  (save"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "ted-ref a-root name\n;;;\tnested-s"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "load-module name))\n\t    ;; Get/c"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, " (module-add! custom-i\n\t\t\t\t\t (re"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, ")\n    (module-constructor (make-"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "e-option-interface\n  (debug-opti"..., 4096) = 4096
mmap2(NULL, 196608, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 
0xb7728000
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "efore-signal-stack (make-fluid))"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, ")\n\t\t\t\t\t\t(scm-repl-prompt))\n\t\t\t\t\t"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "\n\t (if (symbol? first)\n\t     (ca"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "(or (apply resolve-interface mif"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "' but it can also access binding"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "t-module-name! m 'duplicates)\n  "..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, " (syntax-error clause)))))\n\t\t  ("..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "GINT . \"User interrupt\")\n\t\t\t (,S"..., 4096) = 1724
stat64("/usr/share/guile/site/ice-9/deprecated.scm", 0xbf9849fc) = -1 ENOENT 
(No such file or directory)
stat64("/usr/share/guile/1.8/ice-9/deprecated.scm", {st_mode=S_IFREG|0644, 
st_size=6158, ...}) = 0
open("/usr/share/guile/1.8/ice-9/deprecated.scm", O_RDONLY|O_LARGEFILE) = 6
fcntl64(6, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(6, 0, SEEK_CUR)                   = 0
fstat64(6, {st_mode=S_IFREG|0644, st_size=6158, ...}) = 0
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, ";;;; Copyright (C) 2003, 2005, 2"..., 4096) = 4096
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "\t\t\t  module-name)))))\n    (let ("..., 4096) = 2062
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "", 4096)                       = 0
close(6)                                = 0
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "", 4096)                       = 0
close(5)                                = 0
stat64("/home/tomas/.guile", 0xbf9843d0) = -1 ENOENT (No such file or directory)
stat64("/usr/share/guile/site/ice-9/r5rs.scm", 0xbf983ddc) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/site/ice-9/r5rs", 0xbf983ddc) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/1.8/ice-9/r5rs.scm", {st_mode=S_IFREG|0644, 
st_size=1549, ...}) = 0
open("/usr/share/guile/1.8/ice-9/r5rs.scm", O_RDONLY|O_LARGEFILE) = 5
fcntl64(5, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(5, 0, SEEK_CUR)                   = 0
fstat64(5, {st_mode=S_IFREG|0644, st_size=1549, ...}) = 0
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, ";;;; \tCopyright (C) 2000, 2001, "..., 4096) = 1549
times({tms_utime=1, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057366
times({tms_utime=2, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057366
times({tms_utime=2, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057366
stat64("/usr/share/guile/site/ice-9/safe-r5rs.scm", 0xbf9830ac) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/site/ice-9/safe-r5rs", 0xbf9830ac) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/1.8/ice-9/safe-r5rs.scm", {st_mode=S_IFREG|0644, 
st_size=3779, ...}) = 0
open("/usr/share/guile/1.8/ice-9/safe-r5rs.scm", O_RDONLY|O_LARGEFILE) = 6
fcntl64(6, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(6, 0, SEEK_CUR)                   = 0
fstat64(6, {st_mode=S_IFREG|0644, st_size=3779, ...}) = 0
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, ";;;; \tCopyright (C) 2000, 2001, "..., 4096) = 3779
times({tms_utime=2, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057367
times({tms_utime=2, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057367
times({tms_utime=2, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057367
stat64("/usr/share/guile/site/ice-9/null.scm", 0xbf9822cc) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/site/ice-9/null", 0xbf9822cc) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/1.8/ice-9/null.scm", {st_mode=S_IFREG|0644, 
st_size=1189, ...}) = 0
open("/usr/share/guile/1.8/ice-9/null.scm", O_RDONLY|O_LARGEFILE) = 7
fcntl64(7, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(7, 0, SEEK_CUR)                   = 0
fstat64(7, {st_mode=S_IFREG|0644, st_size=1189, ...}) = 0
select(1024, [7], [], [], {0, 0})       = 1 (in [7], left {0, 0})
read(7, ";;;; \tCopyright (C) 2000, 2001, "..., 4096) = 1189
stat64("/usr/share/guile/site/ice-9/syncase.scm", 0xbf9813bc) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/site/ice-9/syncase", 0xbf9813bc) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/1.8/ice-9/syncase.scm", {st_mode=S_IFREG|0644, 
st_size=7848, ...}) = 0
open("/usr/share/guile/1.8/ice-9/syncase.scm", O_RDONLY|O_LARGEFILE) = 8
fcntl64(8, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(8, 0, SEEK_CUR)                   = 0
fstat64(8, {st_mode=S_IFREG|0644, st_size=7848, ...}) = 0
select(1024, [8], [], [], {0, 0})       = 1 (in [8], left {0, 0})
read(8, ";;;; \tCopyright (C) 1997, 2000, "..., 4096) = 4096
times({tms_utime=3, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057368
times({tms_utime=3, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057368
times({tms_utime=3, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057368
stat64("/usr/share/guile/site/ice-9/debug.scm", 0xbf9804ac) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/site/ice-9/debug", 0xbf9804ac) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/1.8/ice-9/debug.scm", {st_mode=S_IFREG|0644, 
st_size=4479, ...}) = 0
open("/usr/share/guile/1.8/ice-9/debug.scm", O_RDONLY|O_LARGEFILE) = 9
fcntl64(9, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(9, 0, SEEK_CUR)                   = 0
fstat64(9, {st_mode=S_IFREG|0644, st_size=4479, ...}) = 0
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, ";;;; \tCopyright (C) 1996, 1997, "..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "tack-ids))\n      (let ((cep (cur"..., 4096) = 383
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "", 4096)                       = 0
close(9)                                = 0
stat64("/usr/share/guile/site/ice-9/threads.scm", 0xbf9804ac) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/site/ice-9/threads", 0xbf9804ac) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/1.8/ice-9/threads.scm", {st_mode=S_IFREG|0644, 
st_size=6371, ...}) = 0
open("/usr/share/guile/1.8/ice-9/threads.scm", O_RDONLY|O_LARGEFILE) = 9
fcntl64(9, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(9, 0, SEEK_CUR)                   = 0
fstat64(9, {st_mode=S_IFREG|0644, st_size=6371, ...}) = 0
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, ";;;; \tCopyright (C) 1996, 1998, "..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "\t\t    (unlock-mutex m))\n\t\t\t   (e"..., 4096) = 2275
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "", 4096)                       = 0
close(9)                                = 0
select(1024, [8], [], [], {0, 0})       = 1 (in [8], left {0, 0})
read(8, "getprop symbol key)\n  (let* ((v "..., 4096) = 3752
times({tms_utime=3, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057369
times({tms_utime=3, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057369
times({tms_utime=3, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057369
stat64("/usr/share/guile/site/ice-9/psyntax.pp", 0xbf980aac) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/1.8/ice-9/psyntax.pp", {st_mode=S_IFREG|0644, 
st_size=134494, ...}) = 0
open("/usr/share/guile/1.8/ice-9/psyntax.pp", O_RDONLY|O_LARGEFILE) = 9
fcntl64(9, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(9, 0, SEEK_CUR)                   = 0
fstat64(9, {st_mode=S_IFREG|0644, st_size=134494, ...}) = 0
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "(letrec ((syntmp-lambda-var-list"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "ibcage-marks ribcage-symnames ri"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "vars-609 (map syntmp-gen-var-163"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "mp-f-655 (cdr syntmp-forms-656))"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "))) (syntmp-chi-application-153 "..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "mp-_-755) (syntmp-chi-void-159))"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "? syntmp-type-781 (quote externa"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "e) #((top)) #(\"i\")) #(ribcage ()"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "chi-top-sequence chi-sequence so"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "-list-834) (syntmp-situations-83"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "s! ribcage-labels ribcage-marks "..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "p) (top) (top) (top) (top) (top)"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "ntmp-annotation?-89 syntmp-e-879"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "-marks-118 syntmp-w1-928)))) (ca"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "yntmp-set-ribcage-symnames!-127 "..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "-set! syntmp-x-1004 1 syntmp-upd"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "(lambda (syntmp-_-1064) (syntax-"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, " (cdr syntmp-b-1107) syntmp-maps"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "11 syntmp-maps-1112 syntmp-ellip"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "tmp-e-1234 syntmp-r-1235 syntmp-"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "cal-reference build-conditional "..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, " build-sequence build-data build"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "tax-dispatch) syntmp-x-1299 (syn"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "dr syntmp-x-1370) (syntmp-chi-to"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "? syntmp-p-1411) (and (pair? syn"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "annotation?-89 syntmp-e-1433) (a"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, " ((lambda (syntmp-tmp-1498) (if "..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "bcage #(step) #((top)) #(\"i\")) #"..., 4096) = 4096
mmap2(NULL, 237568, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 
0xb76ee000
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, " syntmp-y-1609))) syntmp-tmp-161"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "\"i\" \"i\" \"i\"))))) syntmp-x-1637))"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "-dispatch syntmp-tmp-1642 (quote"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "mp-body-1780)) syntmp-tmp-1779))"..., 4096) = 4096
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, ") #(ribcage #(k e1 e2) #((top) ("..., 4096) = 3422
select(1024, [9], [], [], {0, 0})       = 1 (in [9], left {0, 0})
read(9, "", 4096)                       = 0
close(9)                                = 0
times({tms_utime=5, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057373
times({tms_utime=5, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057373
times({tms_utime=5, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057373
select(1024, [8], [], [], {0, 0})       = 1 (in [8], left {0, 0})
read(8, "", 4096)                       = 0
close(8)                                = 0
times({tms_utime=6, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057374
times({tms_utime=6, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057374
times({tms_utime=6, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730057374
select(1024, [7], [], [], {0, 0})       = 1 (in [7], left {0, 0})
read(7, "", 4096)                       = 0
close(7)                                = 0
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "", 4096)                       = 0
close(6)                                = 0
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "", 4096)                       = 0
close(5)                                = 0
stat64("/usr/share/guile/site/ice-9/session.scm", 0xbf983ddc) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/site/ice-9/session", 0xbf983ddc) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/1.8/ice-9/session.scm", {st_mode=S_IFREG|0644, 
st_size=18099, ...}) = 0
open("/usr/share/guile/1.8/ice-9/session.scm", O_RDONLY|O_LARGEFILE) = 5
fcntl64(5, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(5, 0, SEEK_CUR)                   = 0
fstat64(5, {st_mode=S_IFREG|0644, st_size=18099, ...}) = 0
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, ";;;; \tCopyright (C) 1997, 2000, "..., 4096) = 4096
stat64("/usr/share/guile/site/ice-9/documentation.scm", 0xbf982ecc) = -1 ENOENT 
(No such file or directory)
stat64("/usr/share/guile/site/ice-9/documentation", 0xbf982ecc) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/1.8/ice-9/documentation.scm", {st_mode=S_IFREG|0644, 
st_size=7732, ...}) = 0
open("/usr/share/guile/1.8/ice-9/documentation.scm", O_RDONLY|O_LARGEFILE) = 6
fcntl64(6, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(6, 0, SEEK_CUR)                   = 0
fstat64(6, {st_mode=S_IFREG|0644, st_size=7732, ...}) = 0
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, ";;;; \tCopyright (C) 2000,2001, 2"..., 4096) = 4096
stat64("/usr/share/guile/site/ice-9/rdelim.scm", 0xbf981fbc) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/site/ice-9/rdelim", 0xbf981fbc) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/1.8/ice-9/rdelim.scm", {st_mode=S_IFREG|0644, 
st_size=5435, ...}) = 0
open("/usr/share/guile/1.8/ice-9/rdelim.scm", O_RDONLY|O_LARGEFILE) = 7
fcntl64(7, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(7, 0, SEEK_CUR)                   = 0
fstat64(7, {st_mode=S_IFREG|0644, st_size=5435, ...}) = 0
select(1024, [7], [], [], {0, 0})       = 1 (in [7], left {0, 0})
read(7, ";;; installed-scm-file\n\n;;;; Cop"..., 4096) = 4096
select(1024, [7], [], [], {0, 0})       = 1 (in [7], left {0, 0})
read(7, "ons (join-substrings) terminator"..., 4096) = 1339
select(1024, [7], [], [], {0, 0})       = 1 (in [7], left {0, 0})
read(7, "", 4096)                       = 0
close(7)                                = 0
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "default-in-line-re\n             "..., 4096) = 3636
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "", 4096)                       = 0
close(6)                                = 0
stat64("/usr/share/guile/site/ice-9/regex.scm", 0xbf982ecc) = -1 ENOENT (No 
such file or directory)
stat64("/usr/share/guile/site/ice-9/regex", 0xbf982ecc) = -1 ENOENT (No such 
file or directory)
stat64("/usr/share/guile/1.8/ice-9/regex.scm", {st_mode=S_IFREG|0644, 
st_size=8317, ...}) = 0
open("/usr/share/guile/1.8/ice-9/regex.scm", O_RDONLY|O_LARGEFILE) = 6
fcntl64(6, F_GETFL)                     = 0x8000 (flags O_RDONLY|O_LARGEFILE)
lseek(6, 0, SEEK_CUR)                   = 0
fstat64(6, {st_mode=S_IFREG|0644, st_size=8317, ...}) = 0
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, ";;;; \tCopyright (C) 1997, 1999, "..., 4096) = 4096
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "or-ref match matchnum))))\n    (i"..., 4096) = 4096
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "car items)) ; This is a tail cal"..., 4096) = 125
select(1024, [6], [], [], {0, 0})       = 1 (in [6], left {0, 0})
read(6, "", 4096)                       = 0
close(6)                                = 0
mmap2(NULL, 352256, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 
0xb7698000
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "             (= (length name) 2)"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "           (not (null? undocumen"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "le name var data)\n\t\t  (cons name"..., 4096) = 4096
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, " \", \"))\n\t\t  (display-arg-list/su"..., 4096) = 1715
select(1024, [5], [], [], {0, 0})       = 1 (in [5], left {0, 0})
read(5, "", 4096)                       = 0
close(5)                                = 0
pipe([5, 6])                            = 0
mmap2(NULL, 8392704, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS|MAP_STACK, 
-1, 0) = 0xb6e97000
mprotect(0xb6e97000, 4096, PROT_NONE)   = 0
clone(child_stack=0xb7697494, 
flags=CLONE_VM|CLONE_FS|CLONE_FILES|CLONE_SIGHAND|CLONE_THREAD|CLONE_SYSVSEM|CLONE_SETTLS|CLONE_PARENT_SETTID|CLONE_CHILD_CLEARTID,
 parent_tidptr=0xb7697bd8, {entry_number:6, base_addr:0xb7697b70, 
limit:1048575, seg_32bit:1, contents:0, read_exec_only:0, limit_in_pages:1, 
seg_not_present:0, useable:1}, child_tidptr=0xb7697bd8) = 29228
futex(0xbf9841c0, FUTEX_WAIT_PRIVATE, 1, NULL) = -1 EAGAIN (Resource 
temporarily unavailable)
futex(0xbf9841a4, FUTEX_WAKE_PRIVATE, 1) = 0
futex(0xd9c200, FUTEX_WAKE_PRIVATE, 2147483647) = 0
rt_sigaction(SIGBUS, NULL, {SIG_DFL, [], 0}, 8) = 0
rt_sigaction(SIGINT, {0xd2e660, [], 0}, {SIG_DFL, [], 0}, 8) = 0
rt_sigaction(SIGFPE, NULL, {SIG_DFL, [], 0}, 8) = 0
rt_sigaction(SIGSEGV, NULL, {SIG_DFL, [], 0}, 8) = 0
write(1, "guile> ", 7)                  = 7
select(1024, [0], [], [], {0, 0})       = 0 (Timeout)
fcntl64(0, F_GETFL)                     = 0x2 (flags O_RDWR)
select(4, [0 3], NULL, NULL, NULL)      = 1 (in [0])
read(0, "(", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "d", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "y", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "n", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "a", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "m", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "i", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "c", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "-", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "l", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "i", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "n", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "k", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, " ", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "\"", 1)                        = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "l", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "i", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "b", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "g", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "u", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "i", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "l", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "e", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "-", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "w", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "g", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "d", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "e", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "f", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "\"", 1)                        = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, ")", 1)                         = 1
select(1024, [0], [], [], {0, 0})       = 1 (in [0], left {0, 0})
read(0, "\n", 1)                        = 1
times({tms_utime=7, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730058499
open("/lib/libguile-wgdef.la", O_RDONLY) = -1 ENOENT (No such file or directory)
open("/usr/lib/libguile-wgdef.la", O_RDONLY) = -1 ENOENT (No such file or 
directory)
open("/lib/i486-linux-gnu/libguile-wgdef.la", O_RDONLY) = -1 ENOENT (No such 
file or directory)
open("/usr/lib/i486-linux-gnu/libguile-wgdef.la", O_RDONLY) = -1 ENOENT (No 
such file or directory)
open("/usr/lib/alsa-lib/libguile-wgdef.la", O_RDONLY) = -1 ENOENT (No such file 
or directory)
open("/usr/local/lib/libguile-wgdef.la", O_RDONLY) = -1 ENOENT (No such file or 
directory)
open("libguile-wgdef.la", O_RDONLY)     = -1 ENOENT (No such file or directory)
access("/lib/libguile-wgdef.so", R_OK)  = -1 ENOENT (No such file or directory)
access("/usr/lib/libguile-wgdef.so", R_OK) = 0
futex(0xb2206c, FUTEX_WAKE_PRIVATE, 2147483647) = 0
open("/usr/lib/libguile-wgdef.so", O_RDONLY) = 9
read(9, "\177elf\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\...@=\0\0004\0\0\0"..., 
512) = 512
fstat64(9, {st_mode=S_IFREG|0644, st_size=34116, ...}) = 0
mmap2(NULL, 24684, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 9, 0) = 
0x422000
mmap2(0x427000, 8192, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 9, 0x4) = 0x427000
close(9)                                = 0
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/i686/sse2/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/i686/sse2/cmov", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/i686/sse2/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/i686/sse2", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/i686/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/i686/cmov", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/i686/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/i686", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/sse2/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/sse2/cmov", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/sse2/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/sse2", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/cmov", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls/libmer_std.so", 
O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/tls", 0xbf9829bc) = 
-1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/i686/sse2/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/i686/sse2/cmov", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/i686/sse2/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/i686/sse2", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/i686/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/i686/cmov", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/i686/libmer_std.so", 
O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/i686", 0xbf9829bc) = 
-1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/sse2/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/sse2/cmov", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/sse2/libmer_std.so", 
O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/sse2", 0xbf9829bc) = 
-1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/cmov/libmer_std.so", 
O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/cmov", 0xbf9829bc) = 
-1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/libmer_std.so", 
O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib", 
{st_mode=S_IFDIR|0755, st_size=4096, ...}) = 0
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/i686/sse2/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/i686/sse2/cmov",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/i686/sse2/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/i686/sse2",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/i686/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/i686/cmov",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/i686/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/i686",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/sse2/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/sse2/cmov",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/sse2/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/sse2",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/cmov",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/tls", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/i686/sse2/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/i686/sse2/cmov",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/i686/sse2/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/i686/sse2",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/i686/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/i686/cmov",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/i686/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/i686", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/sse2/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/sse2/cmov",
 0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/sse2/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/sse2", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/cmov/libmer_std.so",
 O_RDONLY) = -1 ENOENT (No such file or directory)
stat64("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/cmov", 
0xbf9829bc) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/libmer_std.so",
 O_RDONLY) = 9
read(9, 
"\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0\220r\20\0004\0\0\0"..., 512) = 
512
fstat64(9, {st_mode=S_IFREG|0755, st_size=5588525, ...}) = 0
mmap2(NULL, 6385312, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 9, 0) = 
0xdec000
mmap2(0x11b2000, 131072, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 9, 0x3c6) = 0x11b2000
mmap2(0x11d2000, 2297504, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0x11d2000
close(9)                                = 0
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/libmer_rt.so", 
O_RDONLY) = -1 ENOENT (No such file or directory)
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/asm_fast.gc/libmer_rt.so",
 O_RDONLY) = 9
read(9, 
"\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0000\341\0\0004\0\0\0"..., 512) 
= 512
fstat64(9, {st_mode=S_IFREG|0755, st_size=1107401, ...}) = 0
mmap2(NULL, 287840, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 9, 0) = 
0x255000
mprotect(0x297000, 4096, PROT_NONE)     = 0
mmap2(0x298000, 8192, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 9, 0x42) = 0x298000
mmap2(0x29a000, 5216, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0x29a000
close(9)                                = 0
open("/usr/local/mercury-rotd-2009-12-28/lib/mercury/lib/libgc.so", O_RDONLY) = 
9
read(9, "\177elf\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\...@y\0\0004\0\0\0"..., 
512) = 512
fstat64(9, {st_mode=S_IFREG|0755, st_size=121223, ...}) = 0
mmap2(NULL, 464944, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 9, 0) = 
0x9a4000
mmap2(0x9bb000, 8192, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 9, 0x17) = 0x9bb000
mmap2(0x9bd000, 362544, PROT_READ|PROT_WRITE, 
MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0x9bd000
close(9)                                = 0
mprotect(0x9bb000, 4096, PROT_READ)     = 0
mprotect(0x298000, 4096, PROT_READ)     = 0
mprotect(0x11b2000, 126976, PROT_READ)  = 0
mprotect(0x422000, 20480, PROT_READ|PROT_WRITE) = 0
munmap(0x422000, 24684)                 = 0
munmap(0xdec000, 6385312)               = 0
munmap(0x255000, 287840)                = 0
munmap(0x9a4000, 464944)                = 0
write(2, "\n", 1)                       = 1
write(1, "Backtrace:\n", 11)            = 11
write(2, "In ", 3)                      = 3
write(2, "standard input", 14)          = 14
write(2, ":\n", 2)                      = 2
write(2, " ", 1)                        = 1
write(2, " ", 1)                        = 1
write(2, " ", 1)                        = 1
write(2, "1", 1)                        = 1
write(2, ": ", 2)                       = 2
write(2, "0", 1)                        = 1
write(2, "*", 1)                        = 1
write(2, " ", 1)                        = 1
write(2, "[dynamic-link \"libguile-wgdef\"]", 31) = 31
write(2, "\n", 1)                       = 1
write(2, "\n", 1)                       = 1
write(2, "standard input", 14)          = 14
write(2, ":", 1)                        = 1
write(2, "1", 1)                        = 1
write(2, ":", 1)                        = 1
write(2, "1", 1)                        = 1
write(2, ": ", 2)                       = 2
write(2, "In procedure ", 13)           = 13
write(2, "dynamic-link", 12)            = 12
write(2, " in expression ", 15)         = 15
write(2, "(", 1)                        = 1
write(2, "dynamic-link", 12)            = 12
write(2, " ", 1)                        = 1
write(2, "\"", 1)                       = 1
write(2, "libguile-wgdef", 14)          = 14
write(2, "\"", 1)                       = 1
write(2, ")", 1)                        = 1
write(2, ":\n", 2)                      = 2
write(2, "standard input", 14)          = 14
write(2, ":", 1)                        = 1
write(2, "1", 1)                        = 1
write(2, ":", 1)                        = 1
write(2, "1", 1)                        = 1
write(2, ": ", 2)                       = 2
write(2, "file: ", 6)                   = 6
write(2, "\"", 1)                       = 1
write(2, "libguile-wgdef", 14)          = 14
write(2, "\"", 1)                       = 1
write(2, ", message: ", 11)             = 11
write(2, "\"", 1)                       = 1
write(2, "file not found", 14)          = 14
write(2, "\"", 1)                       = 1
write(2, "\n", 1)                       = 1
write(2, "ABORT: ", 7)                  = 7
write(2, "(", 1)                        = 1
write(2, "misc-error", 10)              = 10
write(2, ")", 1)                        = 1
write(2, "\n", 1)                       = 1
write(1, "guile> ", 7)                  = 7
select(1024, [0], [], [], {0, 0})       = 0 (Timeout)
fcntl64(0, F_GETFL)                     = 0x2 (flags O_RDWR)
select(4, [0 3], NULL, NULL, NULL)      = 1 (in [0])
read(0, "", 1)                          = 0
times({tms_utime=8, tms_stime=0, tms_cutime=0, tms_cstime=0}) = 1730058661
rt_sigaction(SIGBUS, NULL, {SIG_DFL, [], 0}, 8) = 0
rt_sigaction(SIGINT, {SIG_DFL, [], 0}, {0xd2e660, [], 0}, 8) = 0
rt_sigaction(SIGFPE, NULL, {SIG_DFL, [], 0}, 8) = 0
rt_sigaction(SIGSEGV, NULL, {SIG_DFL, [], 0}, 8) = 0
exit_group(0)                           = ?

Reply via email to