public inbox for gcc-cvs@sourceware.org
help / color / mirror / Atom feed
* [gcc(refs/users/wschmidt/heads/builtins10)] rs6000: Parsing built-in input file, part 3 of 3
@ 2021-06-15 17:17 William Schmidt
0 siblings, 0 replies; 6+ messages in thread
From: William Schmidt @ 2021-06-15 17:17 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:c60906571fb94a4d8ff2357d0f96aa7c11cf6cf2
commit c60906571fb94a4d8ff2357d0f96aa7c11cf6cf2
Author: Bill Schmidt <wschmidt@linux.ibm.com>
Date: Mon Jun 7 13:13:45 2021 -0500
rs6000: Parsing built-in input file, part 3 of 3
2021-06-07 Bill Schmidt <wschmidt@linux.ibm.com>
gcc/
* config/rs6000/rs6000-gen-builtins.c (parse_bif_attrs):
Implement.
Diff:
---
gcc/config/rs6000/rs6000-gen-builtins.c | 102 ++++++++++++++++++++++++++++++++
1 file changed, 102 insertions(+)
diff --git a/gcc/config/rs6000/rs6000-gen-builtins.c b/gcc/config/rs6000/rs6000-gen-builtins.c
index 7985d2d9a71..ff3d3b71f3c 100644
--- a/gcc/config/rs6000/rs6000-gen-builtins.c
+++ b/gcc/config/rs6000/rs6000-gen-builtins.c
@@ -1148,6 +1148,108 @@ base = %d, restr = %d, val1 = \"%s\", val2 = \"%s\", pos = %d.\n",
static parse_codes
parse_bif_attrs (attrinfo *attrptr)
{
+ consume_whitespace ();
+ if (linebuf[pos] != '{')
+ {
+ (*diag) ("missing attribute set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+
+ memset (attrptr, 0, sizeof *attrptr);
+ char *attrname = NULL;
+
+ do {
+ consume_whitespace ();
+ int oldpos = pos;
+ attrname = match_identifier ();
+ if (attrname)
+ {
+ if (!strcmp (attrname, "init"))
+ attrptr->isinit = 1;
+ else if (!strcmp (attrname, "set"))
+ attrptr->isset = 1;
+ else if (!strcmp (attrname, "extract"))
+ attrptr->isextract = 1;
+ else if (!strcmp (attrname, "nosoft"))
+ attrptr->isnosoft = 1;
+ else if (!strcmp (attrname, "ldvec"))
+ attrptr->isldvec = 1;
+ else if (!strcmp (attrname, "stvec"))
+ attrptr->isstvec = 1;
+ else if (!strcmp (attrname, "reve"))
+ attrptr->isreve = 1;
+ else if (!strcmp (attrname, "pred"))
+ attrptr->ispred = 1;
+ else if (!strcmp (attrname, "htm"))
+ attrptr->ishtm = 1;
+ else if (!strcmp (attrname, "htmspr"))
+ attrptr->ishtmspr = 1;
+ else if (!strcmp (attrname, "htmcr"))
+ attrptr->ishtmcr = 1;
+ else if (!strcmp (attrname, "mma"))
+ attrptr->ismma = 1;
+ else if (!strcmp (attrname, "quad"))
+ attrptr->isquad = 1;
+ else if (!strcmp (attrname, "pair"))
+ attrptr->ispair = 1;
+ else if (!strcmp (attrname, "no32bit"))
+ attrptr->isno32bit = 1;
+ else if (!strcmp (attrname, "32bit"))
+ attrptr->is32bit = 1;
+ else if (!strcmp (attrname, "cpu"))
+ attrptr->iscpu = 1;
+ else if (!strcmp (attrname, "ldstmask"))
+ attrptr->isldstmask = 1;
+ else if (!strcmp (attrname, "lxvrse"))
+ attrptr->islxvrse = 1;
+ else if (!strcmp (attrname, "lxvrze"))
+ attrptr->islxvrze = 1;
+ else if (!strcmp (attrname, "endian"))
+ attrptr->isendian = 1;
+ else
+ {
+ (*diag) ("unknown attribute at column %d.\n", oldpos + 1);
+ return PC_PARSEFAIL;
+ }
+
+ consume_whitespace ();
+ if (linebuf[pos] == ',')
+ safe_inc_pos ();
+ else if (linebuf[pos] != '}')
+ {
+ (*diag) ("arg not followed by ',' or '}' at column %d.\n",
+ pos + 1);
+ return PC_PARSEFAIL;
+ }
+ }
+ else
+ {
+ pos = oldpos;
+ if (linebuf[pos] != '}')
+ {
+ (*diag) ("badly terminated attr set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+ }
+ } while (attrname);
+
+#ifdef DEBUG
+ (*diag) ("attribute set: init = %d, set = %d, extract = %d, \
+nosoft = %d, ldvec = %d, stvec = %d, reve = %d, pred = %d, htm = %d, \
+htmspr = %d, htmcr = %d, mma = %d, quad = %d, pair = %d, no32bit = %d, \
+32bit = %d, cpu = %d, ldstmask = %d, lxvrse = %d, lxvrze = %d, \
+endian = %d.\n",
+ attrptr->isinit, attrptr->isset, attrptr->isextract,
+ attrptr->isnosoft, attrptr->isldvec, attrptr->isstvec,
+ attrptr->isreve, attrptr->ispred, attrptr->ishtm, attrptr->ishtmspr,
+ attrptr->ishtmcr, attrptr->ismma, attrptr->isquad, attrptr->ispair,
+ attrptr->isno32bit, attrptr->is32bit, attrptr->iscpu,
+ attrptr->isldstmask, attrptr->islxvrse, attrptr->islxvrze,
+ attrptr->isendian);
+#endif
+
return PC_OK;
}
^ permalink raw reply [flat|nested] 6+ messages in thread
* [gcc(refs/users/wschmidt/heads/builtins10)] rs6000: Parsing built-in input file, part 3 of 3
@ 2021-06-25 16:15 William Schmidt
0 siblings, 0 replies; 6+ messages in thread
From: William Schmidt @ 2021-06-25 16:15 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:b5c1e1ee23b580f35308d50b69f34a6519178d6c
commit b5c1e1ee23b580f35308d50b69f34a6519178d6c
Author: Bill Schmidt <wschmidt@linux.ibm.com>
Date: Mon Jun 7 13:13:45 2021 -0500
rs6000: Parsing built-in input file, part 3 of 3
2021-06-07 Bill Schmidt <wschmidt@linux.ibm.com>
gcc/
* config/rs6000/rs6000-gen-builtins.c (parse_bif_attrs):
Implement.
Diff:
---
gcc/config/rs6000/rs6000-gen-builtins.c | 102 ++++++++++++++++++++++++++++++++
1 file changed, 102 insertions(+)
diff --git a/gcc/config/rs6000/rs6000-gen-builtins.c b/gcc/config/rs6000/rs6000-gen-builtins.c
index 7985d2d9a71..ff3d3b71f3c 100644
--- a/gcc/config/rs6000/rs6000-gen-builtins.c
+++ b/gcc/config/rs6000/rs6000-gen-builtins.c
@@ -1148,6 +1148,108 @@ base = %d, restr = %d, val1 = \"%s\", val2 = \"%s\", pos = %d.\n",
static parse_codes
parse_bif_attrs (attrinfo *attrptr)
{
+ consume_whitespace ();
+ if (linebuf[pos] != '{')
+ {
+ (*diag) ("missing attribute set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+
+ memset (attrptr, 0, sizeof *attrptr);
+ char *attrname = NULL;
+
+ do {
+ consume_whitespace ();
+ int oldpos = pos;
+ attrname = match_identifier ();
+ if (attrname)
+ {
+ if (!strcmp (attrname, "init"))
+ attrptr->isinit = 1;
+ else if (!strcmp (attrname, "set"))
+ attrptr->isset = 1;
+ else if (!strcmp (attrname, "extract"))
+ attrptr->isextract = 1;
+ else if (!strcmp (attrname, "nosoft"))
+ attrptr->isnosoft = 1;
+ else if (!strcmp (attrname, "ldvec"))
+ attrptr->isldvec = 1;
+ else if (!strcmp (attrname, "stvec"))
+ attrptr->isstvec = 1;
+ else if (!strcmp (attrname, "reve"))
+ attrptr->isreve = 1;
+ else if (!strcmp (attrname, "pred"))
+ attrptr->ispred = 1;
+ else if (!strcmp (attrname, "htm"))
+ attrptr->ishtm = 1;
+ else if (!strcmp (attrname, "htmspr"))
+ attrptr->ishtmspr = 1;
+ else if (!strcmp (attrname, "htmcr"))
+ attrptr->ishtmcr = 1;
+ else if (!strcmp (attrname, "mma"))
+ attrptr->ismma = 1;
+ else if (!strcmp (attrname, "quad"))
+ attrptr->isquad = 1;
+ else if (!strcmp (attrname, "pair"))
+ attrptr->ispair = 1;
+ else if (!strcmp (attrname, "no32bit"))
+ attrptr->isno32bit = 1;
+ else if (!strcmp (attrname, "32bit"))
+ attrptr->is32bit = 1;
+ else if (!strcmp (attrname, "cpu"))
+ attrptr->iscpu = 1;
+ else if (!strcmp (attrname, "ldstmask"))
+ attrptr->isldstmask = 1;
+ else if (!strcmp (attrname, "lxvrse"))
+ attrptr->islxvrse = 1;
+ else if (!strcmp (attrname, "lxvrze"))
+ attrptr->islxvrze = 1;
+ else if (!strcmp (attrname, "endian"))
+ attrptr->isendian = 1;
+ else
+ {
+ (*diag) ("unknown attribute at column %d.\n", oldpos + 1);
+ return PC_PARSEFAIL;
+ }
+
+ consume_whitespace ();
+ if (linebuf[pos] == ',')
+ safe_inc_pos ();
+ else if (linebuf[pos] != '}')
+ {
+ (*diag) ("arg not followed by ',' or '}' at column %d.\n",
+ pos + 1);
+ return PC_PARSEFAIL;
+ }
+ }
+ else
+ {
+ pos = oldpos;
+ if (linebuf[pos] != '}')
+ {
+ (*diag) ("badly terminated attr set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+ }
+ } while (attrname);
+
+#ifdef DEBUG
+ (*diag) ("attribute set: init = %d, set = %d, extract = %d, \
+nosoft = %d, ldvec = %d, stvec = %d, reve = %d, pred = %d, htm = %d, \
+htmspr = %d, htmcr = %d, mma = %d, quad = %d, pair = %d, no32bit = %d, \
+32bit = %d, cpu = %d, ldstmask = %d, lxvrse = %d, lxvrze = %d, \
+endian = %d.\n",
+ attrptr->isinit, attrptr->isset, attrptr->isextract,
+ attrptr->isnosoft, attrptr->isldvec, attrptr->isstvec,
+ attrptr->isreve, attrptr->ispred, attrptr->ishtm, attrptr->ishtmspr,
+ attrptr->ishtmcr, attrptr->ismma, attrptr->isquad, attrptr->ispair,
+ attrptr->isno32bit, attrptr->is32bit, attrptr->iscpu,
+ attrptr->isldstmask, attrptr->islxvrse, attrptr->islxvrze,
+ attrptr->isendian);
+#endif
+
return PC_OK;
}
^ permalink raw reply [flat|nested] 6+ messages in thread
* [gcc(refs/users/wschmidt/heads/builtins10)] rs6000: Parsing built-in input file, part 3 of 3
@ 2021-04-26 20:49 William Schmidt
0 siblings, 0 replies; 6+ messages in thread
From: William Schmidt @ 2021-04-26 20:49 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:ed0915452e7fc6a1eeacd3c591c90e8528438300
commit ed0915452e7fc6a1eeacd3c591c90e8528438300
Author: Bill Schmidt <wschmidt@linux.ibm.com>
Date: Wed Mar 24 13:51:47 2021 -0500
rs6000: Parsing built-in input file, part 3 of 3
2021-03-24 Bill Schmidt <wschmidt@linux.ibm.com>
gcc/
* config/rs6000/rs6000-gen-builtins.c (parse_bif_attrs):
Implement.
Diff:
---
gcc/config/rs6000/rs6000-gen-builtins.c | 102 ++++++++++++++++++++++++++++++++
1 file changed, 102 insertions(+)
diff --git a/gcc/config/rs6000/rs6000-gen-builtins.c b/gcc/config/rs6000/rs6000-gen-builtins.c
index 0f0f8eaecf2..68569bda50e 100644
--- a/gcc/config/rs6000/rs6000-gen-builtins.c
+++ b/gcc/config/rs6000/rs6000-gen-builtins.c
@@ -1183,6 +1183,108 @@ base = %d, restr = %d, val1 = %d, val2 = %d, pos = %d.\n",
static parse_codes
parse_bif_attrs (attrinfo *attrptr)
{
+ consume_whitespace ();
+ if (linebuf[pos] != '{')
+ {
+ (*diag) ("missing attribute set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+
+ memset (attrptr, 0, sizeof (*attrptr));
+ char *attrname = NULL;
+
+ do {
+ consume_whitespace ();
+ int oldpos = pos;
+ attrname = match_identifier ();
+ if (attrname)
+ {
+ if (!strcmp (attrname, "init"))
+ attrptr->isinit = 1;
+ else if (!strcmp (attrname, "set"))
+ attrptr->isset = 1;
+ else if (!strcmp (attrname, "extract"))
+ attrptr->isextract = 1;
+ else if (!strcmp (attrname, "nosoft"))
+ attrptr->isnosoft = 1;
+ else if (!strcmp (attrname, "ldvec"))
+ attrptr->isldvec = 1;
+ else if (!strcmp (attrname, "stvec"))
+ attrptr->isstvec = 1;
+ else if (!strcmp (attrname, "reve"))
+ attrptr->isreve = 1;
+ else if (!strcmp (attrname, "pred"))
+ attrptr->ispred = 1;
+ else if (!strcmp (attrname, "htm"))
+ attrptr->ishtm = 1;
+ else if (!strcmp (attrname, "htmspr"))
+ attrptr->ishtmspr = 1;
+ else if (!strcmp (attrname, "htmcr"))
+ attrptr->ishtmcr = 1;
+ else if (!strcmp (attrname, "mma"))
+ attrptr->ismma = 1;
+ else if (!strcmp (attrname, "quad"))
+ attrptr->isquad = 1;
+ else if (!strcmp (attrname, "pair"))
+ attrptr->ispair = 1;
+ else if (!strcmp (attrname, "no32bit"))
+ attrptr->isno32bit = 1;
+ else if (!strcmp (attrname, "32bit"))
+ attrptr->is32bit = 1;
+ else if (!strcmp (attrname, "cpu"))
+ attrptr->iscpu = 1;
+ else if (!strcmp (attrname, "ldstmask"))
+ attrptr->isldstmask = 1;
+ else if (!strcmp (attrname, "lxvrse"))
+ attrptr->islxvrse = 1;
+ else if (!strcmp (attrname, "lxvrze"))
+ attrptr->islxvrze = 1;
+ else if (!strcmp (attrname, "endian"))
+ attrptr->isendian = 1;
+ else
+ {
+ (*diag) ("unknown attribute at column %d.\n", oldpos + 1);
+ return PC_PARSEFAIL;
+ }
+
+ consume_whitespace ();
+ if (linebuf[pos] == ',')
+ safe_inc_pos ();
+ else if (linebuf[pos] != '}')
+ {
+ (*diag) ("arg not followed by ',' or '}' at column %d.\n",
+ pos + 1);
+ return PC_PARSEFAIL;
+ }
+ }
+ else
+ {
+ pos = oldpos;
+ if (linebuf[pos] != '}')
+ {
+ (*diag) ("badly terminated attr set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+ }
+ } while (attrname);
+
+#ifdef DEBUG
+ (*diag) ("attribute set: init = %d, set = %d, extract = %d, \
+nosoft = %d, ldvec = %d, stvec = %d, reve = %d, pred = %d, htm = %d, \
+htmspr = %d, htmcr = %d, mma = %d, quad = %d, pair = %d, no32bit = %d, \
+32bit = %d, cpu = %d, ldstmask = %d, lxvrse = %d, lxvrze = %d, \
+endian = %d.\n",
+ attrptr->isinit, attrptr->isset, attrptr->isextract,
+ attrptr->isnosoft, attrptr->isldvec, attrptr->isstvec,
+ attrptr->isreve, attrptr->ispred, attrptr->ishtm, attrptr->ishtmspr,
+ attrptr->ishtmcr, attrptr->ismma, attrptr->isquad, attrptr->ispair,
+ attrptr->isno32bit, attrptr->is32bit, attrptr->iscpu,
+ attrptr->isldstmask, attrptr->islxvrse, attrptr->islxvrze,
+ attrptr->isendian);
+#endif
+
return PC_OK;
}
^ permalink raw reply [flat|nested] 6+ messages in thread
* [gcc(refs/users/wschmidt/heads/builtins10)] rs6000: Parsing built-in input file, part 3 of 3
@ 2021-04-02 22:09 William Schmidt
0 siblings, 0 replies; 6+ messages in thread
From: William Schmidt @ 2021-04-02 22:09 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:9a7bd496d21d0a0d59ff92481c6240aea15e47c8
commit 9a7bd496d21d0a0d59ff92481c6240aea15e47c8
Author: Bill Schmidt <wschmidt@linux.ibm.com>
Date: Wed Mar 24 13:51:47 2021 -0500
rs6000: Parsing built-in input file, part 3 of 3
2021-03-24 Bill Schmidt <wschmidt@linux.ibm.com>
gcc/
* config/rs6000/rs6000-gen-builtins.c (parse_bif_attrs):
Implement.
Diff:
---
gcc/config/rs6000/rs6000-gen-builtins.c | 102 ++++++++++++++++++++++++++++++++
1 file changed, 102 insertions(+)
diff --git a/gcc/config/rs6000/rs6000-gen-builtins.c b/gcc/config/rs6000/rs6000-gen-builtins.c
index 0f0f8eaecf2..68569bda50e 100644
--- a/gcc/config/rs6000/rs6000-gen-builtins.c
+++ b/gcc/config/rs6000/rs6000-gen-builtins.c
@@ -1183,6 +1183,108 @@ base = %d, restr = %d, val1 = %d, val2 = %d, pos = %d.\n",
static parse_codes
parse_bif_attrs (attrinfo *attrptr)
{
+ consume_whitespace ();
+ if (linebuf[pos] != '{')
+ {
+ (*diag) ("missing attribute set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+
+ memset (attrptr, 0, sizeof (*attrptr));
+ char *attrname = NULL;
+
+ do {
+ consume_whitespace ();
+ int oldpos = pos;
+ attrname = match_identifier ();
+ if (attrname)
+ {
+ if (!strcmp (attrname, "init"))
+ attrptr->isinit = 1;
+ else if (!strcmp (attrname, "set"))
+ attrptr->isset = 1;
+ else if (!strcmp (attrname, "extract"))
+ attrptr->isextract = 1;
+ else if (!strcmp (attrname, "nosoft"))
+ attrptr->isnosoft = 1;
+ else if (!strcmp (attrname, "ldvec"))
+ attrptr->isldvec = 1;
+ else if (!strcmp (attrname, "stvec"))
+ attrptr->isstvec = 1;
+ else if (!strcmp (attrname, "reve"))
+ attrptr->isreve = 1;
+ else if (!strcmp (attrname, "pred"))
+ attrptr->ispred = 1;
+ else if (!strcmp (attrname, "htm"))
+ attrptr->ishtm = 1;
+ else if (!strcmp (attrname, "htmspr"))
+ attrptr->ishtmspr = 1;
+ else if (!strcmp (attrname, "htmcr"))
+ attrptr->ishtmcr = 1;
+ else if (!strcmp (attrname, "mma"))
+ attrptr->ismma = 1;
+ else if (!strcmp (attrname, "quad"))
+ attrptr->isquad = 1;
+ else if (!strcmp (attrname, "pair"))
+ attrptr->ispair = 1;
+ else if (!strcmp (attrname, "no32bit"))
+ attrptr->isno32bit = 1;
+ else if (!strcmp (attrname, "32bit"))
+ attrptr->is32bit = 1;
+ else if (!strcmp (attrname, "cpu"))
+ attrptr->iscpu = 1;
+ else if (!strcmp (attrname, "ldstmask"))
+ attrptr->isldstmask = 1;
+ else if (!strcmp (attrname, "lxvrse"))
+ attrptr->islxvrse = 1;
+ else if (!strcmp (attrname, "lxvrze"))
+ attrptr->islxvrze = 1;
+ else if (!strcmp (attrname, "endian"))
+ attrptr->isendian = 1;
+ else
+ {
+ (*diag) ("unknown attribute at column %d.\n", oldpos + 1);
+ return PC_PARSEFAIL;
+ }
+
+ consume_whitespace ();
+ if (linebuf[pos] == ',')
+ safe_inc_pos ();
+ else if (linebuf[pos] != '}')
+ {
+ (*diag) ("arg not followed by ',' or '}' at column %d.\n",
+ pos + 1);
+ return PC_PARSEFAIL;
+ }
+ }
+ else
+ {
+ pos = oldpos;
+ if (linebuf[pos] != '}')
+ {
+ (*diag) ("badly terminated attr set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+ }
+ } while (attrname);
+
+#ifdef DEBUG
+ (*diag) ("attribute set: init = %d, set = %d, extract = %d, \
+nosoft = %d, ldvec = %d, stvec = %d, reve = %d, pred = %d, htm = %d, \
+htmspr = %d, htmcr = %d, mma = %d, quad = %d, pair = %d, no32bit = %d, \
+32bit = %d, cpu = %d, ldstmask = %d, lxvrse = %d, lxvrze = %d, \
+endian = %d.\n",
+ attrptr->isinit, attrptr->isset, attrptr->isextract,
+ attrptr->isnosoft, attrptr->isldvec, attrptr->isstvec,
+ attrptr->isreve, attrptr->ispred, attrptr->ishtm, attrptr->ishtmspr,
+ attrptr->ishtmcr, attrptr->ismma, attrptr->isquad, attrptr->ispair,
+ attrptr->isno32bit, attrptr->is32bit, attrptr->iscpu,
+ attrptr->isldstmask, attrptr->islxvrse, attrptr->islxvrze,
+ attrptr->isendian);
+#endif
+
return PC_OK;
}
^ permalink raw reply [flat|nested] 6+ messages in thread
* [gcc(refs/users/wschmidt/heads/builtins10)] rs6000: Parsing built-in input file, part 3 of 3
@ 2021-04-01 19:47 William Schmidt
0 siblings, 0 replies; 6+ messages in thread
From: William Schmidt @ 2021-04-01 19:47 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:35f12d5c111baa01cb10318d8860552aa66e8566
commit 35f12d5c111baa01cb10318d8860552aa66e8566
Author: Bill Schmidt <wschmidt@linux.ibm.com>
Date: Wed Mar 24 13:51:47 2021 -0500
rs6000: Parsing built-in input file, part 3 of 3
2021-03-24 Bill Schmidt <wschmidt@linux.ibm.com>
gcc/
* config/rs6000/rs6000-gen-builtins.c (parse_bif_attrs):
Implement.
Diff:
---
gcc/config/rs6000/rs6000-gen-builtins.c | 102 ++++++++++++++++++++++++++++++++
1 file changed, 102 insertions(+)
diff --git a/gcc/config/rs6000/rs6000-gen-builtins.c b/gcc/config/rs6000/rs6000-gen-builtins.c
index fd893bdc85a..979d2afbc20 100644
--- a/gcc/config/rs6000/rs6000-gen-builtins.c
+++ b/gcc/config/rs6000/rs6000-gen-builtins.c
@@ -1182,6 +1182,108 @@ base = %d, restr = %d, val1 = %d, val2 = %d, pos = %d.\n",
static parse_codes
parse_bif_attrs (attrinfo *attrptr)
{
+ consume_whitespace ();
+ if (linebuf[pos] != '{')
+ {
+ (*diag) ("missing attribute set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+
+ memset (attrptr, 0, sizeof (*attrptr));
+ char *attrname = NULL;
+
+ do {
+ consume_whitespace ();
+ int oldpos = pos;
+ attrname = match_identifier ();
+ if (attrname)
+ {
+ if (!strcmp (attrname, "init"))
+ attrptr->isinit = 1;
+ else if (!strcmp (attrname, "set"))
+ attrptr->isset = 1;
+ else if (!strcmp (attrname, "extract"))
+ attrptr->isextract = 1;
+ else if (!strcmp (attrname, "nosoft"))
+ attrptr->isnosoft = 1;
+ else if (!strcmp (attrname, "ldvec"))
+ attrptr->isldvec = 1;
+ else if (!strcmp (attrname, "stvec"))
+ attrptr->isstvec = 1;
+ else if (!strcmp (attrname, "reve"))
+ attrptr->isreve = 1;
+ else if (!strcmp (attrname, "pred"))
+ attrptr->ispred = 1;
+ else if (!strcmp (attrname, "htm"))
+ attrptr->ishtm = 1;
+ else if (!strcmp (attrname, "htmspr"))
+ attrptr->ishtmspr = 1;
+ else if (!strcmp (attrname, "htmcr"))
+ attrptr->ishtmcr = 1;
+ else if (!strcmp (attrname, "mma"))
+ attrptr->ismma = 1;
+ else if (!strcmp (attrname, "quad"))
+ attrptr->isquad = 1;
+ else if (!strcmp (attrname, "pair"))
+ attrptr->ispair = 1;
+ else if (!strcmp (attrname, "no32bit"))
+ attrptr->isno32bit = 1;
+ else if (!strcmp (attrname, "32bit"))
+ attrptr->is32bit = 1;
+ else if (!strcmp (attrname, "cpu"))
+ attrptr->iscpu = 1;
+ else if (!strcmp (attrname, "ldstmask"))
+ attrptr->isldstmask = 1;
+ else if (!strcmp (attrname, "lxvrse"))
+ attrptr->islxvrse = 1;
+ else if (!strcmp (attrname, "lxvrze"))
+ attrptr->islxvrze = 1;
+ else if (!strcmp (attrname, "endian"))
+ attrptr->isendian = 1;
+ else
+ {
+ (*diag) ("unknown attribute at column %d.\n", oldpos + 1);
+ return PC_PARSEFAIL;
+ }
+
+ consume_whitespace ();
+ if (linebuf[pos] == ',')
+ safe_inc_pos ();
+ else if (linebuf[pos] != '}')
+ {
+ (*diag) ("arg not followed by ',' or '}' at column %d.\n",
+ pos + 1);
+ return PC_PARSEFAIL;
+ }
+ }
+ else
+ {
+ pos = oldpos;
+ if (linebuf[pos] != '}')
+ {
+ (*diag) ("badly terminated attr set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+ }
+ } while (attrname);
+
+#ifdef DEBUG
+ (*diag) ("attribute set: init = %d, set = %d, extract = %d, \
+nosoft = %d, ldvec = %d, stvec = %d, reve = %d, pred = %d, htm = %d, \
+htmspr = %d, htmcr = %d, mma = %d, quad = %d, pair = %d, no32bit = %d, \
+32bit = %d, cpu = %d, ldstmask = %d, lxvrse = %d, lxvrze = %d, \
+endian = %d.\n",
+ attrptr->isinit, attrptr->isset, attrptr->isextract,
+ attrptr->isnosoft, attrptr->isldvec, attrptr->isstvec,
+ attrptr->isreve, attrptr->ispred, attrptr->ishtm, attrptr->ishtmspr,
+ attrptr->ishtmcr, attrptr->ismma, attrptr->isquad, attrptr->ispair,
+ attrptr->isno32bit, attrptr->is32bit, attrptr->iscpu,
+ attrptr->isldstmask, attrptr->islxvrse, attrptr->islxvrze,
+ attrptr->isendian);
+#endif
+
return PC_OK;
}
^ permalink raw reply [flat|nested] 6+ messages in thread
* [gcc(refs/users/wschmidt/heads/builtins10)] rs6000: Parsing built-in input file, part 3 of 3
@ 2021-03-25 15:45 William Schmidt
0 siblings, 0 replies; 6+ messages in thread
From: William Schmidt @ 2021-03-25 15:45 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:de9c98222dbf0993a1045d8c2ffc2189c68c16c6
commit de9c98222dbf0993a1045d8c2ffc2189c68c16c6
Author: Bill Schmidt <wschmidt@linux.ibm.com>
Date: Wed Mar 24 13:51:47 2021 -0500
rs6000: Parsing built-in input file, part 3 of 3
2021-03-24 Bill Schmidt <wschmidt@linux.ibm.com>
gcc/
* config/rs6000/rs6000-gen-builtins.c (parse_bif_attrs):
Implement.
Diff:
---
gcc/config/rs6000/rs6000-gen-builtins.c | 102 ++++++++++++++++++++++++++++++++
1 file changed, 102 insertions(+)
diff --git a/gcc/config/rs6000/rs6000-gen-builtins.c b/gcc/config/rs6000/rs6000-gen-builtins.c
index fd893bdc85a..979d2afbc20 100644
--- a/gcc/config/rs6000/rs6000-gen-builtins.c
+++ b/gcc/config/rs6000/rs6000-gen-builtins.c
@@ -1182,6 +1182,108 @@ base = %d, restr = %d, val1 = %d, val2 = %d, pos = %d.\n",
static parse_codes
parse_bif_attrs (attrinfo *attrptr)
{
+ consume_whitespace ();
+ if (linebuf[pos] != '{')
+ {
+ (*diag) ("missing attribute set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+
+ memset (attrptr, 0, sizeof (*attrptr));
+ char *attrname = NULL;
+
+ do {
+ consume_whitespace ();
+ int oldpos = pos;
+ attrname = match_identifier ();
+ if (attrname)
+ {
+ if (!strcmp (attrname, "init"))
+ attrptr->isinit = 1;
+ else if (!strcmp (attrname, "set"))
+ attrptr->isset = 1;
+ else if (!strcmp (attrname, "extract"))
+ attrptr->isextract = 1;
+ else if (!strcmp (attrname, "nosoft"))
+ attrptr->isnosoft = 1;
+ else if (!strcmp (attrname, "ldvec"))
+ attrptr->isldvec = 1;
+ else if (!strcmp (attrname, "stvec"))
+ attrptr->isstvec = 1;
+ else if (!strcmp (attrname, "reve"))
+ attrptr->isreve = 1;
+ else if (!strcmp (attrname, "pred"))
+ attrptr->ispred = 1;
+ else if (!strcmp (attrname, "htm"))
+ attrptr->ishtm = 1;
+ else if (!strcmp (attrname, "htmspr"))
+ attrptr->ishtmspr = 1;
+ else if (!strcmp (attrname, "htmcr"))
+ attrptr->ishtmcr = 1;
+ else if (!strcmp (attrname, "mma"))
+ attrptr->ismma = 1;
+ else if (!strcmp (attrname, "quad"))
+ attrptr->isquad = 1;
+ else if (!strcmp (attrname, "pair"))
+ attrptr->ispair = 1;
+ else if (!strcmp (attrname, "no32bit"))
+ attrptr->isno32bit = 1;
+ else if (!strcmp (attrname, "32bit"))
+ attrptr->is32bit = 1;
+ else if (!strcmp (attrname, "cpu"))
+ attrptr->iscpu = 1;
+ else if (!strcmp (attrname, "ldstmask"))
+ attrptr->isldstmask = 1;
+ else if (!strcmp (attrname, "lxvrse"))
+ attrptr->islxvrse = 1;
+ else if (!strcmp (attrname, "lxvrze"))
+ attrptr->islxvrze = 1;
+ else if (!strcmp (attrname, "endian"))
+ attrptr->isendian = 1;
+ else
+ {
+ (*diag) ("unknown attribute at column %d.\n", oldpos + 1);
+ return PC_PARSEFAIL;
+ }
+
+ consume_whitespace ();
+ if (linebuf[pos] == ',')
+ safe_inc_pos ();
+ else if (linebuf[pos] != '}')
+ {
+ (*diag) ("arg not followed by ',' or '}' at column %d.\n",
+ pos + 1);
+ return PC_PARSEFAIL;
+ }
+ }
+ else
+ {
+ pos = oldpos;
+ if (linebuf[pos] != '}')
+ {
+ (*diag) ("badly terminated attr set at column %d.\n", pos + 1);
+ return PC_PARSEFAIL;
+ }
+ safe_inc_pos ();
+ }
+ } while (attrname);
+
+#ifdef DEBUG
+ (*diag) ("attribute set: init = %d, set = %d, extract = %d, \
+nosoft = %d, ldvec = %d, stvec = %d, reve = %d, pred = %d, htm = %d, \
+htmspr = %d, htmcr = %d, mma = %d, quad = %d, pair = %d, no32bit = %d, \
+32bit = %d, cpu = %d, ldstmask = %d, lxvrse = %d, lxvrze = %d, \
+endian = %d.\n",
+ attrptr->isinit, attrptr->isset, attrptr->isextract,
+ attrptr->isnosoft, attrptr->isldvec, attrptr->isstvec,
+ attrptr->isreve, attrptr->ispred, attrptr->ishtm, attrptr->ishtmspr,
+ attrptr->ishtmcr, attrptr->ismma, attrptr->isquad, attrptr->ispair,
+ attrptr->isno32bit, attrptr->is32bit, attrptr->iscpu,
+ attrptr->isldstmask, attrptr->islxvrse, attrptr->islxvrze,
+ attrptr->isendian);
+#endif
+
return PC_OK;
}
^ permalink raw reply [flat|nested] 6+ messages in thread
end of thread, other threads:[~2021-06-25 16:15 UTC | newest]
Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2021-06-15 17:17 [gcc(refs/users/wschmidt/heads/builtins10)] rs6000: Parsing built-in input file, part 3 of 3 William Schmidt
-- strict thread matches above, loose matches on Subject: below --
2021-06-25 16:15 William Schmidt
2021-04-26 20:49 William Schmidt
2021-04-02 22:09 William Schmidt
2021-04-01 19:47 William Schmidt
2021-03-25 15:45 William Schmidt
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).