[GHC] #15587: traceEvent tests failing in slow validate

[GHC]

#15587: traceEvent tests failing in slow validate
-------------------------------------+-------------------------------------
           Reporter:  osa1           |             Owner:  (none)
               Type:  bug            |            Status:  new
           Priority:  normal         |         Milestone:  8.6.1
          Component:  Test Suite     |           Version:  8.5
           Keywords:                 |  Operating System:  Unknown/Multiple
       Architecture:                 |   Type of failure:  None/Unknown
  Unknown/Multiple                   |
          Test Case:                 |        Blocked By:
           Blocking:                 |   Related Tickets:
Differential Rev(s):  Phab:D5119     |         Wiki Page:
-------------------------------------+-------------------------------------
 traceEvent tests are failing in slow validate when testing in GHCi way:

 {{{
 =====> traceEvent(ghci) 1 of 2 [0, 0, 0]
 cd "rts/traceEvent.run" && "/home/omer/haskell/ghc/inplace/test   spaces
 /ghc-stage2" traceEvent.hs -dcore-lint -dcmm-lint -no-user-package-db
 -rtsopts -fno-warn-missed-specialisations -fshow-warning-groups
 -fdiagnostics-color=never -fno-diagnostics-show-caret -dno-debug-output
 --interactive -v0 -ignore-dot-ghci -fno-ghci-history +RTS -I0.1 -RTS
 -eventlog< traceEvent.genscript
 Actual stderr output differs from expected:
 diff -uw "rts/traceEvent.run/traceEvent.stderr.normalised"
 "rts/traceEvent.run/traceEvent.run.stderr.normalised"
 --- rts/traceEvent.run/traceEvent.stderr.normalised     2018-08-31
 12:48:13.548375420 +0300
 +++ rts/traceEvent.run/traceEvent.run.stderr.normalised 2018-08-31
 12:48:13.548375420 +0300
 @@ -1 +0,0 @@
 -traceEvent: Event size exceeds EVENT_PAYLOAD_SIZE_MAX, bail out
 *** unexpected failure for traceEvent(ghci)
 =====> traceBinaryEvent(ghci) 2 of 2 [0, 1, 0]
 cd "rts/traceBinaryEvent.run" && "/home/omer/haskell/ghc/inplace/test
 spaces/ghc-stage2" traceBinaryEvent.hs -dcore-lint -dcmm-lint -no-user-
 package-db -rtsopts -fno-warn-missed-specialisations -fshow-warning-groups
 -fdiagnostics-color=never -fno-diagnostics-show-caret -dno-debug-output
 --interactive -v0 -ignore-dot-ghci -fno-ghci-history +RTS -I0.1 -RTS
 -eventlog< traceBinaryEvent.genscript
 Actual stderr output differs from expected:
 diff -uw "rts/traceBinaryEvent.run/traceBinaryEvent.stderr.normalised"
 "rts/traceBinaryEvent.run/traceBinaryEvent.run.stderr.normalised"
 --- rts/traceBinaryEvent.run/traceBinaryEvent.stderr.normalised 2018-08-31
 12:48:13.712373185 +0300
 +++ rts/traceBinaryEvent.run/traceBinaryEvent.run.stderr.normalised
 2018-08-31 12:48:13.712373185 +0300
 @@ -1 +0,0 @@
 -traceBinaryEvent: Event size exceeds EVENT_PAYLOAD_SIZE_MAX, bail out
 *** unexpected failure for traceBinaryEvent(ghci)

 Unexpected results from:
 TEST="traceBinaryEvent traceEvent"
 }}}

 I think GHCi doesn't generate eventlogs so there's no way to make these
 pass. I submitted Phab:D5119 to skip these tests in GHCi way.

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