Changeset 86bd7c1f for src/examples/sum.c

Timestamp:

May 27, 2015, 8:33:19 PM (9 years ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

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

Children:

00cc023

Parents:

52ac3b4

Message:

licencing: eighth groups of files

File:

• src/examples/sum.c (modified) (2 diffs)

src/examples/sum.c

@@ +1 @@
+//
+// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo
+//
+// The contents of this file are covered under the licence agreement in the
+// file "LICENCE" distributed with Cforall.
+//
+// sum.c -- 
+//
+// Author           : Richard C. Bilson
+// Created On       : Wed May 27 17:56:53 2015
+// Last Modified By : Peter A. Buhr
+// Last Modified On : Wed May 27 18:43:46 2015
+// Update Count     : 4
+//
+
 extern "C" {
-    int printf( const char *, ... );
+        int printf( const char *, ... );
 }
 
 context sumable( type T ) {
-    const T 0;
-    T ?+?( T, T );
-    T ?++( T * );
-    T ?+=?( T *, T );
+        const T 0;
+        T ?+?( T, T );
+        T ?++( T * );
+        T ?+=?( T *, T );
 };
 
 forall( type T | sumable( T ) )
 T sum( int n, T a[] ) {
-    T total;                            // instantiate T, select 0
-    total = 0;
-    for ( int i = 0; i < n; i += 1 )
-        total = total + a[i];           // select +
-    return total;
+        T total;                                                                                        // instantiate T, select 0
+        total = 0;
+        for ( int i = 0; i < n; i += 1 )
+                total = total + a[i];                                                   // select +
+        return total;
 }
 
@@ -27 +42 @@
 
 int main() {
-    const int size = 10, low = 0, High = 10;
-    int si = 0, ai[10]; // size
-    int i;
-    for ( i = low; i < High; i += 1 ) {
-        si += i;
-        ai[i] = i;
-    }
-    printf( "sum from %d to %d is %d, check %d\n",
-            low, High, sum( size, ai ), si );
+        const int size = 10, low = 0, High = 10;
+        int si = 0, ai[10]; // size
+        int i;
+        for ( i = low; i < High; i += 1 ) {
+                si += i;
+                ai[i] = i;
+        }
+        printf( "sum from %d to %d is %d, check %d\n",
+                        low, High, sum( size, ai ), si );
 
-//    char ci[10];
-//    char c = sum( size, ci );
-//    float fi[10];
-//    float f = sum( size, fi );
+//      char ci[10];
+//      char c = sum( size, ci );
+//      float fi[10];
+//      float f = sum( size, fi );
 
-    double sd = 0.0, ad[10]; // size
-    for ( i = low; i < High; i += 1 ) {
-        double d = i / (double)size;
-        sd += d;
-        ad[i] = d;
-    }
-    printf( "sum from %g to %g is %g, check %g\n",
-            low / (double)size, High / (double)size, sum( size, ad ), sd );
+        double sd = 0.0, ad[10];                                                        // size
+        for ( i = low; i < High; i += 1 ) {
+                double d = i / (double)size;
+                sd += d;
+                ad[i] = d;
+        }
+        printf( "sum from %g to %g is %g, check %g\n",
+                        low / (double)size, High / (double)size, sum( size, ad ), sd );
 }
 
 // Local Variables: //
-// compile-command: "../../bin/cfa sum.c" //
+// tab-width: 4 //
+// compile-command: "cfa sum.c" //
 // End: //