Changes in src/examples/identity.c [b63e376:86bd7c1f]

File:

• src/examples/identity.c (modified) (2 diffs)

src/examples/identity.c

@@ -10 +10 @@
 // Created On       : Wed May 27 17:56:53 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Tue Mar  8 22:15:08 2016
-// Update Count     : 13
+// Last Modified On : Wed May 27 18:16:30 2015
+// Update Count     : 2
 //
 
-#include <fstream>
+#include "fstream.h"
 
-forall( otype T )
+forall( type T )
 T identity( T t ) {
         return t;
@@ -22 +22 @@
 
 int main() {
-        sout | "char\t\t\t"                                     | identity( 'z' ) | endl;
-        sout | "signed int\t\t"                         | identity( 4 ) | endl;
-        sout | "unsigned int\t\t"                       | identity( 4u ) | endl;
-        sout | "signed long int\t\t"            | identity( 4l ) | endl;
-        sout | "unsigned long int\t"            | identity( 4ul ) | endl;
-        sout | "signed long long int\t"         | identity( 4ll ) | endl;
-        sout | "unsigned long long int\t"       | identity( 4ull ) | endl;
-        sout | "float\t\t\t"                            | identity( 4.1f ) | endl;
-        sout | "double\t\t\t"                           | identity( 4.1 ) | endl;
-        sout | "long double\t\t"                        | identity( 4.1l ) | endl;
+        ofstream *sout = ofstream_stdout();
+        char c = 'a';
+        c = identity( c );
+        sout << c << ' ' << identity( c ) << '\n';
+        int i = 5;
+        i = identity( i );
+        sout << i << ' ' << identity( i ) << '\n';
+        double d = 3.2;
+        d = identity( d );
+        sout << d << ' ' << identity( d ) << '\n';
 }
 
 // Local Variables: //
 // tab-width: 4 //
-// compile-command: "cfa identity.c" //
+// compile-command: "cfa identity.c fstream.o iostream.o" //
 // End: //