Changes in src/examples/simple.c [86bd7c1f:843054c2]
- File:
-
- 1 edited
-
src/examples/simple.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
src/examples/simple.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 // simple.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:30:27 2015 13 // Update Count : 3 14 // 1 // './cfa square.c' 15 2 16 3 extern "C" { 17 int printf( const char *fmt, ... );4 int printf( const char *fmt, ... ); 18 5 } 19 6 20 7 context has_star( type T ) { 21 T ?*?( T, T );8 T ?*?( T, T ); 22 9 }; 23 10 24 11 int ?*?( int, int ); 25 int ?=?( int *, int );12 int ?=?( int*, int ); 26 13 27 14 forall( type T | has_star( T ) ) 28 15 T square( T t ) { 29 return t * t;16 return t * t; 30 17 } 31 18 32 19 int main() { 33 printf( "result of square of 5 is %d\n", square( 5 ) );20 printf( "result of square of 5 is %d\n", square( 5 ) ); 34 21 } 35 36 // Local Variables: //37 // tab-width: 4 //38 // compile-command: "cfa simple.c" //39 // End: //
Note:
See TracChangeset
for help on using the changeset viewer.