Mercurial > repos > rhope

view runtime/rhopefuncs_prolog.c @ 169:fd06fb07762a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Basic inlining of arithmetic and comparison operations on integer types
author Mike Pavone <pavone@retrodev.com>
date Sun, 08 May 2011 01:37:44 -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)