/*
	EXAMPLE 5: module.m -- ObjC-Application to demonstrate usage of mult. files
*/

#include <oc.h>
#include "module.h"	
#include "d_module.h"


IMPORT Ok start_(int argc, char **argv);

void main(
int	argc,
char **argv)
{
	if (obj_initall_())
	{
		start_(argc, argv);
		obj_uninitall_();
	}
}

Ok start_(
int	argc,
char **argv)
{
	Obj	cstr = $new(Cstr);
	Obj	pstr = $new(Pstr);

	$$cpy(cstr, "Abracadabra!\n");
	$$ocpy(pstr, cstr);
	$$print(pstr);
	
	$free(cstr);
	$free(pstr);

#ifdef SYSTEM_OS2
	{ char inp[10]; printf("Please press <Return> to quit application!"); gets(inp); }
#endif
	DONE;
}


