Changeset 839ccbb for src/examples/iostream.c

Timestamp:

Nov 20, 2015, 4:19:13 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:

5189888

Parents:

05587c2 (diff), ed94eac (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

git-author:

Peter A. Buhr <pabuhr@…> (11/20/15 12:51:58)

git-committer:

Peter A. Buhr <pabuhr@…> (11/20/15 16:19:13)

Message:

Merge branch 'master' of plg2:software/cfa/cfa-cc

File:

• src/examples/iostream.c (modified) (10 diffs)

src/examples/iostream.c

@@ -10 +10 @@
 // Created On       : Wed May 27 17:56:53 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Thu Nov 19 17:54:38 2015
-// Update Count     : 4
+// Last Modified On : Fri Nov 20 13:19:19 2015
+// Update Count     : 9
 //
 
@@ -17 +17 @@
 extern "C" {
 #include <stdio.h>
-//#include <string.h>
-//#include <ctype.h>
-        typedef long unsigned int size_t;
-        size_t strlen(const char *s);
+#include <string.h>                                                                             // strlen
 }
 
@@ -26 +23 @@
 ostype * ?<<?( ostype *os, char c ) {
         return write( os, &c, 1 );
-}
+} // ?<<?
 
 forall( dtype ostype | ostream( ostype ) )
@@ -33 +30 @@
         sprintf( buffer, "%d", i );
         return write( os, buffer, strlen( buffer ) );
-}
+} // ?<<?
 
 forall( dtype ostype | ostream( ostype ) )
@@ -40 +37 @@
         sprintf( buffer, "%g", d );
         return write( os, buffer, strlen( buffer ) );
-}
+} // ?<<?
 
 forall( dtype ostype | ostream( ostype ) )
 ostype * ?<<?( ostype *os, const char *cp ) {
         return write( os, cp, strlen( cp ) );
-}
+} // ?<<?
 
 forall( dtype ostype | ostream( ostype ) )
@@ -52 +49 @@
         sprintf( buffer, "%p", p );
         return write( os, buffer, strlen( buffer ) );
-}
+} // ?<<?
 
 forall( type elt_type | writeable( elt_type ),
@@ -62 +59 @@
         }
         for_each( begin, end, print );
-}
+} // ?<<?
 
 forall( type elt_type | writeable( elt_type ),
@@ -72 +69 @@
         }
         for_each_reverse( begin, end, print );
-}
+} // ?<<?
 
 
@@ -78 +75 @@
 istype * ?>>?( istype *is, char *cp ) {
         return read( is, cp, 1 );
-}
+} // ?>>?
 
 forall( dtype istype | istream( istype ) )
@@ -100 +97 @@
         unread( is, cur );
         return is;
-}
+} // ?>>?
 
 // Local Variables: //