Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/examples/quad.c

    r86bd7c1f r843054c2  
    1 //
    2 // Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo
    3 //
    4 // The contents of this file are covered under the licence agreement in the
    5 // file "LICENCE" distributed with Cforall.
    6 //
    7 // quad.c --
    8 //
    9 // Author           : Richard C. Bilson
    10 // Created On       : Wed May 27 17:56:53 2015
    11 // Last Modified By : Peter A. Buhr
    12 // Last Modified On : Wed May 27 18:26:36 2015
    13 // Update Count     : 2
    14 //
    15 
    161extern "C" {
    17 #include <stdio.h>
     2    #include <stdio.h>
    183}
    194
    205forall( type T | { T ?*?( T, T ); } )
    216T square( T t ) {
    22         return t * t;
     7    return t * t;
    238}
    249
    2510forall( type U | { U square( U ); } )
    2611U quad( U u ) {
    27         return square( square( u ) );
     12    return square( square( u ) );
    2813}
    2914
    3015int main() {
    31         int N = 2;
    32         printf( "result of quad of %d is %d\n", N, quad( N ) );
     16    int N = 2;
     17    printf( "result of quad of %d is %d\n", N, quad( N ) );
    3318}
    3419
    3520// Local Variables: //
    36 // tab-width: 4 //
    37 // compile-command: "cfa quad.c" //
     21// compile-command: "../../bin/cfa quad.c" //
    3822// End: //
Note: See TracChangeset for help on using the changeset viewer.