X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FRtsStartup.c;fp=rts%2FRtsStartup.c;h=0dacd61984d5f70e0ea54e45f2b19edbaadce498;hp=952e80634549fee2de6e0128ba503c7c92ba1cf9;hb=c4f9b989c605776c1f07929672a856f07d9b4b44;hpb=68b76e0e49d4d95e1bfe9343697e2abc99470791

diff --git a/rts/RtsStartup.c b/rts/RtsStartup.c
index 952e806..0dacd61 100644
--- a/rts/RtsStartup.c
+++ b/rts/RtsStartup.c
@@ -144,9 +144,9 @@ hs_init(int *argc, char **argv[])
 #ifdef TRACING
     initTracing();
 #endif
-    /* Dtrace events are always enabled
+    /* Trace the startup event
      */
-    dtraceEventStartup();
+    traceEventStartup();
 
     /* initialise scheduler data structures (needs to be done before
      * initStorage()).