Changeset 259012e

Timestamp:

Jun 28, 2024, 12:10:13 PM (2 days ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

master

Children:

3c55fcd

Parents:

01afd8d

Message:

put back quasi_void print

Location:

libcfa/src

Files:

• enum.cfa (modified) (2 diffs)
• enum.hfa (modified) (2 diffs)

libcfa/src/enum.cfa

@@ -6 +6 @@
 forall( ostype & | basic_ostream(ostype), E, V | CfaEnum(E, V) ) {
         ostype & ?|?( ostype& os, E e ) {
-//              if ( scoped( e ) ) os | type_name( e ) | '.' | nonl;
                 return os | label( e );
         }
@@ -12 +11 @@
 }
 
-// forall( ostype & | basic_ostream(ostype), E | CfaEnum(E, quasi_void) )
-// ostype & ?|?( ostype & os, E e ) {
-// //    return os | type_name(e) | "." | label(e);
-//     return os | label( e );
-// }
+forall( ostype & | basic_ostream(ostype), E | CfaEnum(E, quasi_void) )
+ostype & ?|?( ostype & os, E e ) {
+    return os | label( e );
+}
 
 forall( E, V | CfaEnum(E, V) ) {                                                // relational operators

libcfa/src/enum.hfa

@@ -20 +20 @@
     unsigned int posn( E e );
     V value( E e );
-    char * type_name( E e );
-//    bool scoped( E e );
 };
 
@@ -31 +29 @@
 }
 
-//forall( ostype & | basic_ostream(ostype), E | CfaEnum(E, quasi_void) )
-//ostype & ?|?( ostype &, E );
+forall( ostype & | basic_ostream(ostype), E | CfaEnum(E, quasi_void) )
+ostype & ?|?( ostype &, E );
 
 // Design two <- should go for this if we have change the cost model