Changeset 86bd7c1f for src/examples/min.c
- Timestamp:
- May 27, 2015, 8:33:19 PM (9 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:
- 00cc023
- Parents:
- 52ac3b4
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/examples/min.c
r52ac3b4 r86bd7c1f 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 // min.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:23:19 2015 13 // Update Count : 2 14 // 15 1 16 extern "C" { 2 17 int printf( const char *, ... ); 3 18 //#include <stdio.h> 4 19 } … … 6 21 forall( type T | { int ?<?( T, T ); } ) 7 22 T min( const T t1, const T t2 ) { 8 23 return t1 < t2 ? t1 : t2; 9 24 } 10 25 11 26 int main() { 12 13 // 14 // 15 16 17 18 19 20 21 22 23 27 char c; 28 // c = min( 'z', 'a' ); 29 // printf( "minimum %d\n", c ); 30 int i; 31 i = min( 4, 3 ); 32 printf( "minimum %d\n", min( 4, 3 ) ); 33 float f; 34 f = min( 4.0, 3.1 ); 35 printf( "minimum %g\n", f ); 36 double d; 37 d = min( 4.0, 3.2 ); 38 printf( "minimum %g\n", d ); 24 39 } 25 40 26 41 // Local Variables: // 27 // compile-command: "../../bin/cfa min.c" // 42 // tab-width: 4 // 43 // compile-command: "cfa min.c" // 28 44 // End: //
Note: See TracChangeset
for help on using the changeset viewer.