Changeset b63e376 for src/libcfa

Timestamp:

Mar 8, 2016, 10:24:43 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:

ae357ec

Parents:

4040425

Message:

update refrat with new keywords, update examples, update separators for quoted strings

Location:

src/libcfa

Files:

• Makefile.am (modified) (2 diffs)
• Makefile.in (modified) (1 diff)
• bfd.h (deleted)
• bfdlink.h (deleted)
• demangle.h (deleted)
• dialog.h (deleted)
• evdns.h (deleted)
• evhttp.h (deleted)
• evrpc.h (deleted)
• fcntl.h (deleted)
• form.h (deleted)
• gcrypt.h (deleted)
• iostream.c (modified) (2 diffs)
• math.h (deleted)

src/libcfa/Makefile.am

@@ -11 +11 @@
 ## Created On       : Sun May 31 08:54:01 2015
 ## Last Modified By : Peter A. Buhr
-## Last Modified On : Wed Feb  3 11:19:35 2016
-## Update Count     : 117
+## Last Modified On : Wed Mar  2 22:59:23 2016
+## Update Count     : 119
 ###############################################################################
 
@@ -63 +63 @@
 libcfa_a_SOURCES = libcfa-prelude.c ${libs:=.c}
 
-cheaders = bfd bfdlink demangle dialog evdns evhttp evrpc expat fcntl form gcrypt math
+cheaders = #  expat
 cfaheaders = limits
 include_HEADERS = ${cheaders:=.h} ${libs} ${cfaheaders}

src/libcfa/Makefile.in

@@ -215 +215 @@
 libs = stdlib iostream fstream iterator
 libcfa_a_SOURCES = libcfa-prelude.c ${libs:=.c}
-cheaders = bfd bfdlink demangle dialog evdns evhttp evrpc expat fcntl form gcrypt math
+cheaders = #  expat
 cfaheaders = limits
 include_HEADERS = ${cheaders:=.h} ${libs} ${cfaheaders}

src/libcfa/iostream.c

@@ -10 +10 @@
 // Created On       : Wed May 27 17:56:53 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Wed Mar  2 18:06:35 2016
-// Update Count     : 208
+// Last Modified On : Mon Mar  7 13:51:23 2016
+// Update Count     : 227
 //
 
@@ -133 +133 @@
 forall( dtype ostype | ostream( ostype ) )
 ostype * ?|?( ostype *os, const char *cp ) {
+        enum { Open = 1, Close, OpenClose };
+        static const char mask[256] = {
+                // opening delimiters
+                ['('] : Open, ['['] : Open, ['{'] : Open,
+                ['$'] : Open, [L'£'] : Open, [L'¥'] : Open, [L'¢'] : Open, [L'¿'] : Open, [L'«'] : Open,
+                // closing delimiters
+                [','] : Close, ['.'] : Close, [':'] : Close, [';'] : Close, ['!'] : Close, ['?'] : Close,
+                [')'] : Close, [']'] : Close, ['}'] : Close,
+                ['%'] : Close, [L'»'] : Close,
+                // opening-closing delimiters
+                ['\''] : OpenClose, ['`'] : OpenClose, ['"'] : OpenClose,
+        }; // mask
+
         int len = strlen( cp );
         // null string => no separator
   if ( len == 0 ) { sepOff( os ); return os; }
-        // first character NOT spacing or special punctuation => add left separator
-        if ( sepPrt( os ) && isspace( cp[0] ) == 0 && cp[0] != '.' && cp[0] != ',' ) {
+        // first character NOT spacing or closing punctuation => add left separator
+        if ( sepPrt( os ) && isspace( cp[0] ) == 0 && mask[ cp[0] ] != Close && mask[ cp[0] ] != OpenClose ) {
                 prtfmt( os, "%s", sepGet( os ) );
         } // if
-        // last character is spacing or special punctuation => turn off separator for next item
+        // last character IS spacing or opening punctuation => turn off separator for next item
         unsigned int posn = len - 1;
-        if ( isspace( cp[posn] ) || cp[posn] == ':' || cp[posn] == '$' ) {
+        if ( isspace( cp[posn] ) || mask[ cp[posn] ] == Open || mask[ cp[posn] ] == OpenClose ) {
                 sepOff( os );
         } else {