Mercurial > repos > rhope
view runtime/rhopefuncs_prolog.c @ 174:0c7c5671fcd3
Start work on interpreter
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Thu, 19 May 2011 23:30:07 -0700 |
parents | bac2c74801f0 |
children | 327bcf35e094 |
line wrap: on
line source
#ifdef ENABLE_PROFILING uint64_t profile_counts[END]; uint64_t profile_nestedcounts[END]; uint64_t profile_totals[END]; uint64_t profile_selftotals[END]; uint64_t profile_activationlevel[END]; #endif int32_t rhope(uint32_t func, object ** params, uint16_t numparams, uint16_t callspace) { #ifdef ENABLE_PROFILING struct timeval proftime; #endif uint16_t resume,idx, vcparam_offset, last_vcparam; context *ct,*temp_ct; void *tmp; calldata * cdata, *temp_cdata, *my_cdata; DispatchVar FuncDef(Build) FuncDef(BlueprintSP_Of) FuncDef(ID) FuncDef(BlueprintSP_FromSP_ID)