Changeset 76934fb for src/examples/identity.c
- Timestamp:
- Jun 1, 2015, 12:55:33 PM (10 years ago)
- 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:
- 6db50d5
- Parents:
- 46cbfe1 (diff), db82596 (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. - File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/examples/identity.c
r46cbfe1 r76934fb 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 // identity.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:16:30 2015 13 // Update Count : 2 14 // 15 1 16 #include "fstream.h" 2 17 3 18 forall( type T ) 4 19 T identity( T t ) { 5 20 return t; 6 21 } 7 22 8 23 int main() { 9 10 11 12 13 14 15 16 17 18 24 ofstream *sout = ofstream_stdout(); 25 char c = 'a'; 26 c = identity( c ); 27 sout << c << ' ' << identity( c ) << '\n'; 28 int i = 5; 29 i = identity( i ); 30 sout << i << ' ' << identity( i ) << '\n'; 31 double d = 3.2; 32 d = identity( d ); 33 sout << d << ' ' << identity( d ) << '\n'; 19 34 } 20 35 21 36 // Local Variables: // 22 // compile-command: "../../bin/cfa identity.c fstream.o iostream.o" // 37 // tab-width: 4 // 38 // compile-command: "cfa identity.c fstream.o iostream.o" // 23 39 // End: //
Note:
See TracChangeset
for help on using the changeset viewer.