source: src/examples/identity.c@ 53a2e97

ADT aaron-thesis arm-eh ast-experimental cleanup-dtors ctor deferred_resn demangler enum forall-pointer-decay gc_noraii jacob/cs343-translation jenkins-sandbox memory new-ast new-ast-unique-expr new-env no_list persistent-indexer pthread-emulation qualifiedEnum resolv-new string with_gc
Last change on this file since 53a2e97 was 843054c2, checked in by Peter A. Buhr <pabuhr@…>, 10 years ago

licencing: seventh groups of files
  • Property mode set to 100644
File size: 500 bytes
RevLine 
[42dcae7]1#include "fstream.h"
[a0d9f94]2
3forall( type T )
4T identity( T t ) {
5 return t;
6}
7
8int main() {
[42dcae7]9 ofstream *sout = ofstream_stdout();
10 char c = 'a';
[c11e31c]11 c = identity( c );
[42dcae7]12 sout << c << ' ' << identity( c ) << '\n';
13 int i = 5;
[c11e31c]14 i = identity( i );
[42dcae7]15 sout << i << ' ' << identity( i ) << '\n';
16 double d = 3.2;
[c11e31c]17 d = identity( d );
[42dcae7]18 sout << d << ' ' << identity( d ) << '\n';
[a0d9f94]19}
[42dcae7]20
21// Local Variables: //
22// compile-command: "../../bin/cfa identity.c fstream.o iostream.o" //
23// End: //
Note: See TracBrowser for help on using the repository browser.