Close events that might have been started (even if starting a profiling event while doing nothing to the GPU seems dubious to me)

Author: therault

parsec/mca/device/device_gpu.c

@@ -1893,6 +1893,13 @@ parsec_device_progress_stream( parsec_device_gpu_module_t* gpu_device,
   schedule_task:
     rc = progress_fct( gpu_device, task, stream );
     if(0 == rc) {
+#if defined(PARSEC_PROF_TRACE)
+        if( stream->prof_event_track_enable ) {
+            if( task->prof_key_end != -1 ) {
+                PARSEC_PROFILING_TRACE(stream->profiling, task->prof_key_end, task->prof_event_id, task->prof_tp_id, NULL);
+            }
+        }
+#endif
         /* If progress_fct added nothing on that stream, we skip scheduling a record on the GPU stream */
         if( task->complete_stage )
             rc = task->complete_stage(gpu_device, &task, stream);