Changeset 95b8aa7 for tests/sum.cfa

Timestamp:

Jan 11, 2019, 3:36:48 PM (7 years ago)

Author:

Aaron Moss <a3moss@…>

Branches:

ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, deferred_resn, enum, forall-pointer-decay, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, no_list, persistent-indexer, pthread-emulation, qualifiedEnum

Children:

e1f7eef

Parents:

ff5caaf (diff), 52ffa30 (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

Pull fixes for deferred_resn from other branch

File:

• tests/sum.cfa (moved) (moved from tests/sum.c ) (9 diffs)

tests/sum.cfa

@@ -5 +5 @@
 // file "LICENCE" distributed with Cforall.
 //
-// sum.c -- test resolvers ability to deal with many variables with the same name and to use the minimum number of casts
-//    necessary to disambiguate overloaded variable names.
+// sum.cfa -- test resolvers ability to deal with many variables with the same name and to use the minimum number of
+//    casts necessary to disambiguate overloaded variable names.
 //
 // Author           : Peter A. Buhr
 // Created On       : Wed May 27 17:56:53 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Thu Aug  2 08:03:09 2018
-// Update Count     : 279
+// Last Modified On : Sun Dec 23 23:00:38 2018
+// Update Count     : 287
 //
 
@@ -56 +56 @@
         } // for
         sout | "sum from" | low | "to" | High | "is"
-                 | sum( size, (unsigned char *)a ) | ", check" | (int)s | endl;
+                 | sum( size, (unsigned char *)a ) | ", check" | (int)s;
 
         int s = 0, a[size], v = low;
@@ -64 +64 @@
         } // for
         sout | "sum from" | low | "to" | High | "is"
-                 | sum( size, (int *)a ) | ", check" | (int)s | endl;
+                 | sum( size, (int *)a ) | ", check" | (int)s;
 
         float s = 0.0f, a[size], v = low / 10.0f;
@@ -72 +72 @@
         } // for
         sout | "sum from" | low / 10.0f | "to" | High / 10.0f | "is"
-                 | sum( size, (float *)a ) | ", check" | (float)s | endl;
+                 | sum( size, (float *)a ) | ", check" | (float)s;
 
         double s = 0.0, a[size], v = low / 10.0;
@@ -80 +80 @@
         } // for
         sout | "sum from" | low / 10.0 | "to" | High / 10.0 | "is"
-                 | sum( size, (double *)a ) | ", check" | (double)s | endl;
+                 | sum( size, (double *)a ) | ", check" | (double)s;
 
         struct S { int i, j; };
@@ -93 +93 @@
         S ?++( S & t ) { S temp = t; t += (S){1}; return temp; }
         ofstream & ?|?( ofstream & os, S v ) { return os | v.i | v.j; }
+        void ?|?( ofstream & os, S v ) { (ofstream &)(os | v); nl( os ); }
 
         S s = (S){0}, a[size], v = { low, low };
@@ -100 +101 @@
         } // for
         sout | "sum from" | low | "to" | High | "is"
-                 | sum( size, (S *)a ) | ", check" | (S)s | endl;
+                 | sum( size, (S *)a ) | ", check" | (S)s;
 
         forall( otype Impl | sumable( Impl ) )
@@ -114 +115 @@
         } // for
         sout | "sum from" | low | "to" | High | "is"
-                 | sum( size, gs.x ) | ", check" | (int)s | endl; // add field array in generic type
+                 | sum( size, gs.x ) | ", check" | (int)s;              // add field array in generic type
         delete( gs.x );
 } // main
@@ -120 +121 @@
 // Local Variables: //
 // tab-width: 4 //
-// compile-command: "cfa sum.c" //
+// compile-command: "cfa sum.cfa" //
 // End: //