Mercurial > repos > rhope
changeset 29:3cc5e4a42344
Missed registration for *@Real Number in previous commit
| author | Mike Pavone <pavone@retrodev.com> |
|---|---|
| date | Sat, 27 Jun 2009 01:50:33 -0400 |
| parents | d8b4d38fceb6 |
| children | 914ad38f9b59 fab5bb137cf9 |
| files | interp.c interp.h string.c |
| diffstat | 3 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/interp.c Fri Jun 26 19:57:46 2009 -0400 +++ b/interp.c Sat Jun 27 01:50:33 2009 -0400 @@ -1529,6 +1529,11 @@ aworker->input_types[0] = BUILTIN_TYPE_REAL; aworker->input_types[1] = BUILTIN_TYPE_REAL; + aworker = create_worker(prog, "*@Real Number", 2, 1, WORKER_TYPE); + aworker->implement_func=(custom_worker *)vis_real_mult; + aworker->input_types[0] = BUILTIN_TYPE_REAL; + aworker->input_types[1] = BUILTIN_TYPE_REAL; + aworker = create_worker(prog, "Cosine@Real Number", 1, 1, WORKER_TYPE); aworker->implement_func=(custom_worker *)vis_real_cos; aworker->input_types[0] = BUILTIN_TYPE_REAL;
--- a/interp.h Fri Jun 26 19:57:46 2009 -0400 +++ b/interp.h Sat Jun 27 01:50:33 2009 -0400 @@ -231,6 +231,7 @@ int init_global_store(datum ** params, queue_entry * worker_entry); int vis_type_of(datum ** params, queue_entry * worker_entry); int vis_real_div(datum ** inputlist, queue_entry * worker_entry); +int vis_real_mult(datum ** inputlist, queue_entry * worker_entry); int vis_real_cos(datum ** inputlist, queue_entry * worker_entry); int vis_real_sin(datum ** inputlist, queue_entry * worker_entry); int vis_real_tan(datum ** inputlist, queue_entry * worker_entry);
--- a/string.c Fri Jun 26 19:57:46 2009 -0400 +++ b/string.c Sat Jun 27 01:50:33 2009 -0400 @@ -48,7 +48,7 @@ #ifndef SEGA int vis_realtostring(datum ** inputlist, queue_entry * worker_entry) { - char temp_buf[30];//Is this enough? + char temp_buf[512];//Is this enough? datum * output; sprintf(temp_buf, "%f", inputlist[0]->c.real); release_ref(inputlist[0]);