Changes in src/examples/square.c [784deab:86bd7c1f]

File:

• src/examples/square.c (modified) (1 diff)

src/examples/square.c

@@ -10 +10 @@
 // Created On       : Wed May 27 17:56:53 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Tue Jan  5 18:08:20 2016
-// Update Count     : 21
+// Last Modified On : Wed May 27 18:43:34 2015
+// Update Count     : 2
 //
 
-#include "fstream.h"
+extern "C" {
+#include <stdio.h>
+}
 
 forall( type T | { T ?*?( T, T ); } )
 T square( T t ) {
         return t * t;
-} // square
+}
+
+//char ?*?( char a1, char a2 ) {
+//      return (char)( (int)a1 * (int)a2 );
+//}
 
 int main() {
-#if 0
-        ofstream *sout = ofstream_stdout();
-        sout | "result of squaring 9 is " | endl;
-
-        // char does not have multiplication.
-        char ?*?( char a1, char a2 ) {
-                return (char)((int)a1 * (int)a2);
-        } // ?*?
-        char c = 9;
-        sout | "char\t\t\t" | square( c ) | endl;
-
-        sout | square( s ) | endl;
-#endif
-        short int s = 9;
-        square( s );
-#if 0
-        signed int i = 9;
-        sout | "signed int\t\t" | square( i ) | endl;
-
-        unsigned int ui = 9;
-        sout | "unsigned int\t\t" | square( ui ) | endl;
-
-        long int li = 9;
-        sout | "signed long int\t\t" | square( li ) | endl;
-
-        unsigned long int uli = 9;
-        sout | "unsigned long int\t" | square( uli ) | endl;
-
-        signed long long int lli = 9;
-        sout | "signed long long int\t" | square( lli ) | endl;
-
-        unsigned long long int ulli = 9;
-        sout | "unsigned long long int\t" | square( ulli ) | endl;
-
-        float f = 9.0;
-        sout | "float\t\t\t" | square( f ) | endl;
-
-        double d = 9.0;
-        sout | "double\t\t\t" | square( d ) | endl;
-
-        long double ld = 9.0;
-        sout | "long double\t\t" | square( ld ) | endl;
-#endif
-} // main
+        char c = 5;
+        short int s = 5;
+        int i = 5;
+        float f = 5.0;
+        double d = 5.0;
+//      printf( "result of square of 5 is %d\n", (char)square( c ) );
+        printf( "result of square of 5 is %d\n", square( s ) );
+        printf( "result of square of 5 is %d\n", square( i ) );
+        printf( "result of square of 5 is %f\n", square( f ) );
+        printf( "result of square of 5 is %f\n", square( d ) );
+}
 
 // Local Variables: //
 // tab-width: 4 //
-// compile-command: "cfa square.c fstream.o iostream.o iterator.o" //
+// compile-command: "cfa square.c" //
 // End: //