Mercurial > hg > Gears > GearsAgda
view src/parallel_execution/TimeImpl.cbc @ 450:d3d7a7d6a117
Delete USE_CUDA_MAIN_THREAD
author | Tatsuki IHA <innparusu@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 04 Dec 2017 04:24:30 +0900 |
parents | 57132ef16009 |
children | 8d7e5d48cad3 |
line wrap: on
line source
#include <stdio.h> #include <sys/time.h> #include "../context.h" Time* createTimeImpl(struct Context* context) { struct Time* time = new Time(); struct TimeImpl* timeImpl = new TimeImpl(); time->time = (union Data*)timeImpl; time->start = C_startTime; time->end = C_endTime; return time; } __code startTime(struct TimeImpl* time, __code next(...)) { struct timeval tv; gettimeofday(&tv, NULL); time->time = tv.tv_sec + (double)tv.tv_usec*1e-6; goto next(...); } __code endTime(struct TimeImpl* time, __code next(...)) { struct timeval tv; gettimeofday(&tv, NULL); printf("%0.6f\n", (tv.tv_sec+(double)tv.tv_usec*1e-6) - time->time); goto next(...); }