view runtime/object.c @ 146:d8f92ebf1ff6

Fix string literal escaping to allow more than one of each type of escaped character
author Mike Pavone <pavone@retrodev.com>
date Fri, 09 Aug 2013 04:29:37 -0700
parents abc6f3d644a4
children 75dc7161c1ca
line wrap: on
line source

#include "object.h"
#include <stdarg.h>
#include <stdlib.h>
#include <stddef.h>
#include <gc/gc.h>

object * make_object(obj_meta * meta, void * parent, int num_props, ...)
{
	va_list args;
	object * newobj = GC_MALLOC(meta->size);
	newobj->meta = meta;
	newobj->parent = parent;
	
	va_start(args, num_props);
	object ** curprop = ((object **)(newobj + 1));
	for (; num_props > 0; num_props--)
	{
		*curprop = va_arg(args, object *);
		curprop++;
	}
	va_end(args);
	return newobj;
}

object * mcall(uint32_t method_id, uint32_t num_args, object * self, ...)
{
	va_list args;
	va_start(args, self);
	object * ret = self->meta->meth_lookup[method_id & 0xF](method_id, num_args, self, args);
	va_end(args);
	return ret;
}