Mercurial > repos > rhope

comparison interp.c @ 31:fab5bb137cf9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added Unix Time worker to interpreter
author Mike Pavone <pavone@retrodev.com>
date Mon, 28 Sep 2009 19:48:45 -0400
parents 3cc5e4a42344
children 9ee9adc696e7
comparison
equal deleted inserted replaced
29:3cc5e4a42344 31:fab5bb137cf9
2216 aworker->implement_func=(custom_worker *)vis_dropdown_select; 2216 aworker->implement_func=(custom_worker *)vis_dropdown_select;
2217 aworker->input_types[0] = BUILTIN_TYPE_DROPDOWN; 2217 aworker->input_types[0] = BUILTIN_TYPE_DROPDOWN;
2218 aworker->input_types[1] = BUILTIN_TYPE_WHOLE; 2218 aworker->input_types[1] = BUILTIN_TYPE_WHOLE;
2219 #endif 2219 #endif
2220 #endif 2220 #endif
2221 2221 aworker = create_worker(prog, "Unix Time", 0, 1, WORKER_TYPE);
2222 aworker->implement_func=(custom_worker *)unix_time;
2222 /*if(current_def > num_defs) 2223 /*if(current_def > num_defs)
2223 num_defs = current_def; 2224 num_defs = current_def;
2224 if(current_company > num_companies) 2225 if(current_company > num_companies)
2225 num_companies = current_company;*/ 2226 num_companies = current_company;*/
2226 } 2227 }
3999 //No one else knows about this new datum yet so we can skip getting a lock 4000 //No one else knows about this new datum yet so we can skip getting a lock
4000 datum_set_yesno(inputlist[0], result); 4001 datum_set_yesno(inputlist[0], result);
4001 return 0; 4002 return 0;
4002 } 4003 }
4003 4004
4005 int unix_time(datum ** inputlist, queue_entry * worker_entry)
4006 {
4007 inputlist[0] = new_datum(BUILTIN_TYPE_WHOLE, 2, 0, worker_entry->instance->def->program);
4008 inputlist[0]->c.integers.num_a = time(NULL);
4009 return 0;
4010 }
4011
4004 int vis_end(datum ** inputlist, queue_entry * worker_entry) 4012 int vis_end(datum ** inputlist, queue_entry * worker_entry)
4005 { 4013 {
4006 // fprintf(outfile, "End worker reached.\n"); 4014 // fprintf(outfile, "End worker reached.\n");
4007 execute_active=FALSE; 4015 execute_active=FALSE;
4008 release_ref(inputlist[0]); 4016 release_ref(inputlist[0]);