shithub: scc

ref: 2c7a34994ed9fcb63465f8e86de7b70b3a48f6f5
dir: /src/libmach/objreset.c/

View raw version 
#include <stdio.h>

#include <scc/mach.h>

#include "libmach.h"

extern delfun_t delv[];

int
objreset(Obj *obj)
{
	int fmt;
	delfun_t fn;

	fmt = FORMAT(obj->type);
	if (fmt < NFORMATS)
		return -1;
	fn = delv[fmt];
	(*fn)(obj);
	objfree(obj, FREESYM | FREESECT);
	return 0;
}