[GHC] #9673: aarch64 7.8.4, 7.10, 7.11: lib/ghc/bin/ghc-pkg --version does not output from subprocess

[GHC]

#9673: aarch64 7.8.4, 7.10, 7.11: lib/ghc/bin/ghc-pkg --version does not output
from subprocess
-------------------------------------+-------------------------------------
        Reporter:  juhpetersen       |                   Owner:
            Type:  bug               |                  Status:  new
        Priority:  high              |               Milestone:
       Component:  Compiler          |                 Version:  7.11
      Resolution:                    |                Keywords:
Operating System:  Linux             |            Architecture:  aarch64
 Type of failure:  Installing GHC    |               Test Case:
  failed                             |                Blocking:
      Blocked By:                    |  Differential Revisions:
 Related Tickets:                    |
-------------------------------------+-------------------------------------
Changes (by juhpetersen):

 * version:  7.10.1-rc1 => 7.11


Comment:

 I diffed the straces (with addresses normalized/sanitized to
 0x3ffyyyyyyyy).  Below is the final significant chunk.
 The straces are for
 "./rpmbuild/BUILDROOT/ghc-7.10.1-1.fc23.aarch64/usr/lib64/ghc-7.10.1/bin
 /ghc-pkg --version".

 {{{
 --- process.strace      2015-04-15 03:11:21.351274400 -0400
 +++ subprocess.strace   2015-04-15 03:13:42.167058743 -0400
  mprotect(0x3ffyyyyyyyy, 65536, PROT_READ) = 0
  mprotect(0x3ffyyyyyyyy, 65536, PROT_READ) = 0
  mprotect(0x3ffyyyyyyyy, 65536, PROT_READ) = 0
  munmap(0x3ffyyyyyyyy, 48881)            = 0
 -set_tid_address(0x3ffyyyyyyyy)          = 13259
 +set_tid_address(0x3ffyyyyyyyy)          = 13239
  set_robust_list(0x3ffyyyyyyyy, 24)      = 0
  rt_sigaction(SIGRTMIN, {0x3ffyyyyyyyy, [], SA_SIGINFO}, NULL, 8) = 0
  rt_sigaction(SIGRT_1, {0x3ffyyyyyyyy, [], 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=RLIM64_INFINITY}) =
 0
 -brk(0)                                  = 0x13010000
 -brk(0x13040000)                         = 0x13040000
 +brk(0)                                  = 0x6950000
 +brk(0x6980000)                          = 0x6980000
  openat(AT_FDCWD, "/usr/lib/locale/locale-archive", O_RDONLY|O_CLOEXEC) =
 3
  fstat(3, {st_mode=S_IFREG|0644, st_size=106374736, ...}) = 0
  mmap(NULL, 106374736, PROT_READ, MAP_PRIVATE, 3, 0) = 0x3ffyyyyyyyy
  close(3)                                = 0
  clock_getres(CLOCK_PROCESS_CPUTIME_ID, {0, 1}) = 0
 -clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {0, 37059433}) = 0
 +clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {0, 36939847}) = 0
  openat(AT_FDCWD, "/proc/meminfo", O_RDONLY|O_CLOEXEC) = 3
  fstat(3, {st_mode=S_IFREG|0444, st_size=0, ...}) = 0
  mmap(NULL, 65536, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0)
 = 0x3ffyyyyyyyy
  read(3, "MemTotal:       16690880 kB\nMemF"..., 1024) = 1024
  close(3)                                = 0
  munmap(0x3ffyyyyyyyy, 65536)            = 0
  mmap(NULL, 2097152, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1,
 0) = 0x3ffyyyyyyyy
 -munmap(0x3ffyyyyyyyy, 655360)           = 0
  munmap(0x3ffyyyyyyyy, 393216)           = 0
 +munmap(0x3ffyyyyyyyy, 655360)           = 0
  timer_create(CLOCK_MONOTONIC, {(nil), SIGVTALRM, SIGEV_SIGNAL, {...}},
 {0}) = 0
  rt_sigaction(SIGVTALRM, {0x3ffyyyyyyyy, [], SA_RESTART}, NULL, 8) = 0
  timer_settime(0, 0, {it_interval={0, 10000000}, it_value={0, 10000000}},
 NULL) = 0
  rt_sigaction(SIGINT, {0x3ffyyyyyyyy, [], 0}, {SIG_DFL, [], 0}, 8) = 0
  rt_sigaction(SIGINT, NULL, {0x3ffyyyyyyyy, [], 0}, 8) = 0
  rt_sigaction(SIGINT, {0x3ffyyyyyyyy, [], 0}, NULL, 8) = 0
  rt_sigaction(SIGPIPE, {0x3ffyyyyyyyy, [], 0}, {SIG_DFL, [], 0}, 8) = 0
  rt_sigaction(SIGTSTP, {0x3ffyyyyyyyy, [], 0}, NULL, 8) = 0
 -clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {0, 37535065}) = 0
 +clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {0, 37421445}) = 0
  rt_sigprocmask(SIG_BLOCK, [INT], [], 8) = 0
  rt_sigaction(SIGINT, {0x3ffyyyyyyyy, [], SA_RESETHAND|SA_SIGINFO}, NULL,
 8) = 0
  rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0
 -ioctl(1, SNDCTL_TMR_TIMEBASE or SNDRV_TIMER_IOCTL_NEXT_DEVICE or TCGETS,
 {B38400 opost isig icanon echo ...}) = 0
 -pselect6(2, [], [1], NULL, {0, 0}, 0)   = 1 (out [1], left {0, 0})
 -write(1, "GHC package manager version 7.10"..., 35) = 35
 -ioctl(1, SNDCTL_TMR_TIMEBASE or SNDRV_TIMER_IOCTL_NEXT_DEVICE or TCGETS,
 {B38400 opost isig icanon echo ...}) = 0
 -clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {0, 38040864}) = 0
 +ioctl(1, SNDCTL_TMR_TIMEBASE or SNDRV_TIMER_IOCTL_NEXT_DEVICE or TCGETS,
 0x3ffyyyyyyyy) = -1 ENOTTY (Inappropriate ioctl for device)
 +ioctl(1, SNDCTL_TMR_TIMEBASE or SNDRV_TIMER_IOCTL_NEXT_DEVICE or TCGETS,
 0x3ffyyyyyyyy) = -1 ENOTTY (Inappropriate ioctl for device)
 +clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {0, 37847540}) = 0
  rt_sigprocmask(SIG_BLOCK, [INT], [], 8) = 0
 -clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {0, 38076223}) = 0
 +clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {0, 37882073}) = 0
  rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0
  timer_settime(0, 0, {it_interval={0, 0}, it_value={0, 0}}, NULL) = 0
  rt_sigaction(SIGVTALRM, {SIG_IGN, [],
 SA_INTERRUPT|SA_NODEFER|SA_RESETHAND}, {0x3ffyyyyyyyy, [], SA_RESTART}, 8)
 = 0
  timer_delete(0)                         = 0
  rt_sigprocmask(SIG_BLOCK, [TTOU], [], 8) = 0
  rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0
  rt_sigaction(SIGINT, {SIG_DFL, [], 0}, NULL, 8) = 0
  rt_sigaction(SIGPIPE, {SIG_DFL, [], 0}, NULL, 8) = 0
  rt_sigaction(SIGTSTP, {SIG_DFL, [], 0}, NULL, 8) = 0
 -clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {0, 38428740}) = 0
 +clock_gettime(CLOCK_PROCESS_CPUTIME_ID, {0, 38226330}) = 0
  exit_group(0)                           = ?
  +++ exited with 0 +++
 }}}

--
Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/9673#comment:13>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler