From 97a4ca3b4078f581cdc8cebc4fa4cf39d5ff8125 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Thu, 27 Apr 2023 11:03:30 -0300
Subject: New macros 'fillset' and 'clearset'

---
 lpcset.c | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'lpcset.c')

diff --git a/lpcset.c b/lpcset.c
index 2e62d94..2dcffd9 100644
--- a/lpcset.c
+++ b/lpcset.c
@@ -76,21 +76,21 @@ int tocharset (TTree *tree, Charset *cs) {
   switch (tree->tag) {
     case TChar: {  /* only one char */
       assert(0 <= tree->u.n && tree->u.n <= UCHAR_MAX);
-      loopset(i, cs->cs[i] = 0);  /* erase all chars */
+      clearset(cs->cs);  /* erase all chars */
       setchar(cs->cs, tree->u.n);  /* add that one */
       return 1;
     }
     case TAny: {
-      loopset(i, cs->cs[i] = 0xFF);  /* add all characters to the set */
+      fillset(cs->cs, 0xFF);  /* add all characters to the set */
       return 1;
     }
     case TFalse: {
-      loopset(i, cs->cs[i] = 0);  /* empty set */
+      clearset(cs->cs);  /* empty set */
       return 1;
     }
     case TSet: {  /* fill set */
       int i;
-      loopset(j, cs->cs[j] = tree->u.set.deflt);
+      fillset(cs->cs, tree->u.set.deflt);
       for (i = 0; i < tree->u.set.size; i++)
         cs->cs[tree->u.set.offset + i] = treebuffer(tree)[i];
       return 1;
-- 
cgit v1.2.3-55-g6feb