print "this is the program

def foo
	Str: str
	[]

export foo f( Str: str )
{
	cons Foo: foo[]
	Foo.Str = Str
	return Foo
}

##### HOST #####

#include <colm/colm.h>
#include <colm/tree.h>
#include <errno.h>
#include "working/load1.if.h"
#include <iostream>

extern colm_sections colm_object;

int main( int argc, const char **argv )
{
	colm_program *program = colm_new_program( &colm_object );
	colm_set_debug( program, 1 );
	colm_run_program( program, argc, argv );

	foo F = f( program, "passthrough" );	

	std::cout << F.Str().text() << std::endl;

	colm_delete_program( program );
	return 0;
}
##### EXP #####
this is the program
passthrough