code: 9ferno

ref: 2d7cc7c32299e2b49e3be6d3f9c21f43c3ce7415
dir: /tests/return.b/

View raw version 
implement Emuinit;
include "sys.m";
	sys: Sys;

Emuinit: module
{
	init: fn();
};

init()
{
	sys = load Sys Sys->PATH;
	a : int;

	a = calc(100);
	sys->print("returned %d\n", a);
}

calc(n: int): int
{
	a : int;

	a = n * n + 100;
	return a;
}