Added negation of message sets.

`from ! subject:/daily/' outputs all messages whose subject
does not contain the word 'daily'.

@@ -63,7 +63,7 @@ static msgset_t *result;
 %token <type> TYPE
 %token <type> TYPE
 %token <string> IDENT REGEXP HEADER BODY
 %token <string> IDENT REGEXP HEADER BODY
 %token <number> NUMBER
 %token <number> NUMBER
-%type <mset> msgset msgspec msg rangeset range partno number
+%type <mset> msgset msgspec msgexpr msg rangeset range partno number
 %type <string> header
 %type <string> header
 
 
 %%
 %%
@@ -102,17 +102,28 @@ input    : /* empty */
 	   }
 	   }
          ;
          ;
 
 
-msgset   : msgspec
-         | msgset ',' msgspec
+msgset   : msgexpr
+         | msgset ',' msgexpr
            {
            {
 	     $$ = msgset_append ($1, $3);
 	     $$ = msgset_append ($1, $3);
 	   }
 	   }
-         | msgset msgspec
+         | msgset msgexpr
            {
            {
 	     $$ = msgset_append ($1, $2);
 	     $$ = msgset_append ($1, $2);
 	   }
 	   }
          ;
          ;
 
 
+msgexpr  : msgspec
+         | '{' msgset '}'
+           {
+	     $$ = $2;
+	   }
+         | '!' msgexpr
+           {
+	     $$ = msgset_negate ($2);
+	   }
+         ;
+
 msgspec  : msg
 msgspec  : msg
          | msg '[' rangeset ']'
          | msg '[' rangeset ']'
            {
            {
@@ -390,6 +401,36 @@ msgset_append (msgset_t *one, msgset_t *two)
   return one;
   return one;
 }
 }
 
 
+int
+msgset_member (msgset_t *set, size_t n)
+{
+  for (; set; set = set->next)
+    if (set->msg_part[0] == n)
+      return 1;
+  return 0;
+}
+
+msgset_t *
+msgset_negate (msgset_t *set)
+{
+  size_t i;
+  msgset_t *first = NULL, *last = NULL;
+
+  for (i = 1; i < total; i++)
+    {
+      if (!msgset_member (set, i))
+	{
+	  msgset_t *mp = msgset_make_1 (i);
+	  if (!first)
+	    first = mp;
+	  else
+	    last->next = mp;
+	  last = mp;
+	}
+    }
+  return first;
+}
+
 msgset_t *
 msgset_t *
 msgset_range (int low, int high)
 msgset_range (int low, int high)
 {
 {