source: src/examples/huge.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: 126 bytes
RevLine 
[ea3eb06]1int huge( int n, forall( type T ) T (*f)( T ) ) {
2 if ( n <= 0 )
3 return f( 0 );
[a0d9f94]4 else
[ea3eb06]5 return huge( n - 1, f( f ) );
[a0d9f94]6}
Note: See TracBrowser for help on using the repository browser.