Index: src/tests/coroutine/fibonacci.c
===================================================================
--- src/tests/coroutine/fibonacci.c	(revision af1ed1ad2b8ed8a9b4d0d4da3f9dc306176a97fc)
+++ src/tests/coroutine/fibonacci.c	(revision b9c432fc0d6c9c1f4962af0e77cf031cf584dbf1)
@@ -5,11 +5,12 @@
 // file "LICENCE" distributed with Cforall.
 //
-// fibonacci.c --
+// fibonacci.c -- 3-state finite-state machine
+
 //
 // Author           : Thierry Delisle
 // Created On       : Thu Jun  8 07:29:37 2017
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Thu Mar 22 22:45:44 2018
-// Update Count     : 15
+// Last Modified On : Fri Apr 27 08:55:31 2018
+// Update Count     : 19
 //
 
@@ -19,8 +20,5 @@
 coroutine Fibonacci { int fn; };						// used for communication
 
-void ?{}( Fibonacci & fib ) with( fib ) { fn = 0; }
-
-// main automatically called on first resume
-void main( Fibonacci & fib ) with( fib ) {
+void main( Fibonacci & fib ) with( fib ) {				// called on first resume
 	int fn1, fn2;										// retained between resumes
 	fn = 0;  fn1 = fn;									// 1st case
@@ -29,5 +27,5 @@
 	suspend();											// restart last resume
 	for ( ;; ) {
-		fn = fn1 + fn2; fn2 = fn1;  fn1 = fn;			// general case
+		fn = fn1 + fn2;  fn2 = fn1;  fn1 = fn;			// general case
 		suspend();										// restart last resume
 	} // for