Skip to content

Instantly share code, notes, and snippets.

@Mikolaj
Created June 20, 2016 19:22
Show Gist options
  • Save Mikolaj/6825352618f99fa6f7474a19f1560197 to your computer and use it in GitHub Desktop.
Save Mikolaj/6825352618f99fa6f7474a19f1560197 to your computer and use it in GitHub Desktop.
~/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$
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment