#include <command.h>
int
main(string arg)
{
	object obj;
	if (!arg) {
#ifndef __NO_ADD_ACTION__
		return notify_fail("usage: dest object\n");
#else
		write("usage: dest object\n");
		return 1;
#endif
	}
	obj = find_object(arg);
#ifndef __NO_ENVIRONMENT__
	if (!obj) {
		obj = present(arg);
		if (!obj) {
			obj = present(arg, environment(previous_object()));
		}
	}
#endif
	if (!obj) {
#ifndef __NO_ADD_ACTION__
		return notify_fail("can't find that.\n");
#else
		write("can't find that.\n");
		return 1;
#endif
	}
	obj->remove();
	if (obj) {
		destruct(obj);
	}
	return 1;
}