Messing with delegates in vala

delegate-test.vala

delegate int MyFunc ();

class MyNotifier {
	public MyNotifier () {
		print ("Created\n");
	}

	~MyNotifier () {
		print ("Destroyed\n");
	}

	public void method () {
		print ("Hi\n");
	}
}

void make_some_functions (int initializer, out MyFunc incrementor, out MyFunc decrementor, out MyFunc getter) {
	// Uncomment to make vala split `notifier` into a separate block and thus free it earlier
	//{
		var notifier = new MyNotifier ();
		incrementor = () => {
			notifier.method ();
			return initializer++;
		};
	//}
	decrementor = () => {
		return initializer--;
	};
	getter = () => {
		return initializer;
	};
}

void main () {
	MyFunc incrementor, decrementor, getter;
	make_some_functions(5, out incrementor, out decrementor, out getter);

	print ("%i\n", incrementor());
	incrementor = null;
	print ("%i\n", decrementor());
	print ("%i\n", getter());
}