Changeset d3b7937 for src/examples/minmax.c

Timestamp:

Jan 29, 2016, 4:36:39 PM (8 years ago)

Author:

Peter A. Buhr <pabuhr@…>

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:

ae8b942

Parents:

f3fc8cbe

Message:

building runtime library (first attempt)

File:

• src/examples/minmax.c (moved) (moved from src/examples/min.c) (2 diffs)

src/examples/minmax.c

@@ -10 +10 @@
 // Created On       : Wed May 27 17:56:53 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Mon Jan  4 11:40:51 2016
-// Update Count     : 26
+// Last Modified On : Thu Jan 28 22:15:14 2016
+// Update Count     : 42
 //
 
-#include "fstream.h"
-
-forall( type T | { int ?<?( T, T ); } )
-T min( const T t1, const T t2 ) {
-        return t1 < t2 ? t1 : t2;
-} // min
+#include <fstream>
+#include <algorithm>
 
 int main( void ) {
         ofstream *sout = ofstream_stdout();
-        // char does not have less than.
+        // char does not have less or greater than.
         int ?<?( char op1, char op2 ) { return (int)op1 < (int)op2; }
+        int ?>?( char op1, char op2 ) { return (int)op1 > (int)op2; }
 
         sout | "char\t\t\t"                                     | 'z' | ' ' | 'a' | "\tmin " | min( 'z', 'a' ) | endl;
@@ -36 +33 @@
         sout | "double\t\t\t"                           | 4.0 | ' ' | 3.1 | "\tmin " | min( 4.0, 3.1 ) | endl;
         sout | "long double\t\t"                        | 4.0l | ' ' | 3.1l | "\tmin " | min( 4.0l, 3.1l ) | endl;
+        sout | endl;
+        sout | "char\t\t\t"                                     | 'z' | ' ' | 'a' | "\tmax " | max( 'z', 'a' ) | endl;
+        sout | "signed int\t\t"                         | 4 | ' ' | 3 | "\tmax " | max( 4, 3 ) | endl;
+        sout | "unsigned int\t\t"                       | 4u | ' ' | 3u | "\tmax " | max( 4u, 3u ) | endl;
+        sout | "signed long int\t\t"            | 4l | ' ' | 3l | "\tmax " | max( 4l, 3l ) | endl;
+        sout | "unsigned long int\t"            | 4ul | ' ' | 3ul | "\tmax " | max( 4ul, 3ul ) | endl;
+        sout | "signed long long int\t"         | 4ll | ' ' | 3ll | "\tmax " | max( 4ll, 3ll ) | endl;
+        sout | "unsigned long long int\t"       | 4ull | ' ' | 3ull | "\tmax " | max( 4ull, 3ull ) | endl;
+        sout | "float\t\t\t"                            | 4.0f | ' ' | 3.1f | "\tmax " | max( 4.0f, 3.1f ) | endl;
+        sout | "double\t\t\t"                           | 4.0 | ' ' | 3.1 | "\tmax " | max( 4.0, 3.1 ) | endl;
+        sout | "long double\t\t"                        | 4.0l | ' ' | 3.1l | "\tmax " | max( 4.0l, 3.1l ) | endl;
 } // main
 
 // Local Variables: //
 // tab-width: 4 //
-// compile-command: "cfa min.c fstream.o iostream.o iterator.o" //
+// compile-command: "cfa minmax.c" //
 // End: //