gistfile1.txt

~/r/ThreadScope$ cabal build
Building threadscope-0.2.7...
Preprocessing executable 'threadscope' for threadscope-0.2.7...
[20 of 36] Compiling Events.TestEvents ( Events/TestEvents.hs, dist/build/threadscope/threadscope-tmp/Events/TestEvents.o )

Events/TestEvents.hs:19:11:
    ‘block_events’ is not a (visible) constructor field name

Events/TestEvents.hs:19:39: Not in scope: ‘block_events’
[21 of 36] Compiling GUI.StartupInfoView ( GUI/StartupInfoView.hs, dist/build/threadscope/threadscope-tmp/GUI/StartupInfoView.o )

GUI/StartupInfoView.hs:101:29:
    Constructor ‘Event’ should have 3 arguments, but has been given 2
    In the pattern: Event _ (ProgramArgs _ (name : args))
    In the pattern: CapEvent _ (Event _ (ProgramArgs _ (name : args)))
    In an equation for ‘accum’:
        accum info (CapEvent _ (Event _ (ProgramArgs _ (name : args))))
          = info {progName = Just name, progArgs = Just args}
[22 of 36] Compiling GUI.EventsView   ( GUI/EventsView.hs, dist/build/threadscope/threadscope-tmp/GUI/EventsView.o )

GUI/EventsView.hs:305:10:
    No instance for (System.Glib.UTFString.GlibString string0)
      arising from a use of ‘layoutSetText’
    The type variable ‘string0’ is ambiguous
    Note: there are several potential instances:
      instance System.Glib.UTFString.GlibString T.Text
        -- Defined in ‘System.Glib.UTFString’
      instance System.Glib.UTFString.GlibString [Char]
        -- Defined in ‘System.Glib.UTFString’
    In a stmt of a 'do' block:
      layoutSetText layout (showEventTime event)
    In the expression:
      do { when (inside || selected)
           $ GtkExt.stylePaintFlatBox
               style
               win
               state1
               ShadowNone
               clipRect
               drawArea
               ""
               0
               (round y)
               width
               (round lineHeight);
           layoutSetText layout (showEventTime event);
           layoutSetAlignment layout AlignRight;
           layoutSetWidth layout (Just (fromIntegral timeWidth));
           .... }
    In the first argument of ‘sequence_’, namely
      ‘[do { when (inside || selected)
             $ GtkExt.stylePaintFlatBox
                 style
                 win
                 state1
                 ShadowNone
                 clipRect
                 drawArea
                 ""
                 0
                 (round y)
                 width
                 (round lineHeight);
             layoutSetText layout (showEventTime event);
             layoutSetAlignment layout AlignRight;
             .... } |
          n <- [begin .. end],
          let y = fromIntegral n * lineHeight - yOffset
              event = eventsArr ! n
              inside = maybe False (\ (s, e) -> s <= n && n <= e) mrange
              ....]’

GUI/EventsView.hs:317:10:
    No instance for (System.Glib.UTFString.GlibString string1)
      arising from a use of ‘layoutSetText’
    The type variable ‘string1’ is ambiguous
    Note: there are several potential instances:
      instance System.Glib.UTFString.GlibString T.Text
        -- Defined in ‘System.Glib.UTFString’
      instance System.Glib.UTFString.GlibString [Char]
        -- Defined in ‘System.Glib.UTFString’
    In a stmt of a 'do' block:
      layoutSetText layout (showEventDescr event)
    In the expression:
      do { when (inside || selected)
           $ GtkExt.stylePaintFlatBox
               style
               win
               state1
               ShadowNone
               clipRect
               drawArea
               ""
               0
               (round y)
               width
               (round lineHeight);
           layoutSetText layout (showEventTime event);
           layoutSetAlignment layout AlignRight;
           layoutSetWidth layout (Just (fromIntegral timeWidth));
           .... }
    In the first argument of ‘sequence_’, namely
      ‘[do { when (inside || selected)
             $ GtkExt.stylePaintFlatBox
                 style
                 win
                 state1
                 ShadowNone
                 clipRect
                 drawArea
                 ""
                 0
                 (round y)
                 width
                 (round lineHeight);
             layoutSetText layout (showEventTime event);
             layoutSetAlignment layout AlignRight;
             .... } |
          n <- [begin .. end],
          let y = fromIntegral n * lineHeight - yOffset
              event = eventsArr ! n
              inside = maybe False (\ (s, e) -> s <= n && n <= e) mrange
              ....]’

GUI/EventsView.hs:340:36:
    Constructor ‘Event’ should have 3 arguments, but has been given 2
    In the pattern: Event time _spec
    In the pattern: CapEvent _cap (Event time _spec)
    In an equation for ‘showEventTime’:
        showEventTime (CapEvent _cap (Event time _spec))
          = showFFloat (Just 6) (fromIntegral time / 1000000) "s"

GUI/EventsView.hs:342:36:
    Constructor ‘Event’ should have 3 arguments, but has been given 2
    In the pattern: Event _time spec
    In the pattern: CapEvent cap (Event _time spec)
    In an equation for ‘showEventDescr’:
        showEventDescr (CapEvent cap (Event _time spec))
          = (case cap of {
               Nothing -> ""
               Just c -> "HEC " ++ show c ++ ": " })
            ++
              case spec of {
                UnknownEvent {ref} -> "unknown event; " ++ show ref
                Message msg -> msg
                UserMessage msg -> msg
                _ -> showEventInfo spec }
[23 of 36] Compiling Events.HECs      ( Events/HECs.hs, dist/build/threadscope/threadscope-tmp/Events/HECs.o )

Events/HECs.hs:62:17:
    Constructor ‘Event’ should have 3 arguments, but has been given 2
    In the pattern: Event ts (UserMarker mark)
    In the pattern: CapEvent _ (Event ts (UserMarker mark))
    In a stmt of a list comprehension:
      CapEvent _ (Event ts (UserMarker mark)) <- elems
                                                   (hecEventArray hecs)
[25 of 36] Compiling GUI.SummaryView  ( GUI/SummaryView.hs, dist/build/threadscope/threadscope-tmp/GUI/SummaryView.o )

GUI/SummaryView.hs:716:41:
    ‘time’ is not a (visible) field of constructor ‘Event’

GUI/SummaryView.hs:716:47:
    ‘spec’ is not a (visible) field of constructor ‘Event’

GUI/SummaryView.hs:720:34:
    ‘block_events’ is not a (visible) field of constructor ‘EventBlock’
~/r/ThreadScope$