Index: tests/concurrent/examples/datingService.cfa
===================================================================
--- tests/concurrent/examples/datingService.cfa	(revision f8cd310f8a2e04f07eba9dbf60597d9236e4932f)
+++ tests/concurrent/examples/datingService.cfa	(revision fe27d994433aa731e830bef185c1754888fc279b)
@@ -10,6 +10,6 @@
 // Created On       : Mon Oct 30 12:56:20 2017
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Fri Mar 22 13:41:39 2019
-// Update Count     : 31
+// Last Modified On : Fri Jun 21 11:32:34 2019
+// Update Count     : 38
 //
 
@@ -95,15 +95,15 @@
 	srandom( /*getpid()*/ 103 );
 
-	for ( unsigned int i = 0; i < CompCodes; i += 1 ) {
-		girls[i] = new( &TheExchange, i, i );
+	for ( i; (unsigned int)CompCodes ) {
+		girls[i] = new( &TheExchange, i, i );			// TheExchange constructor needs unsigned int
 		boys[i]  = new( &TheExchange, i, CompCodes - ( i + 1 ) );
 	} // for
 
-	for ( unsigned int i = 0; i < CompCodes; i += 1 ) {
+	for ( i; CompCodes ) {
 		delete( boys[i] );
 		delete( girls[i] );
 	} // for
 
-	for ( unsigned int i = 0; i < CompCodes; i += 1 ) {
+	for ( i; CompCodes ) {
 		if ( girlck[ boyck[i] ] != boyck[ girlck[i] ] ) abort();
 	} // for