MahnoKropotkinvich/tinycc
1
0
Fork 0
mirror of git://repo.or.cz/tinycc.git synced 2026-06-17 15:44:18 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

c2y if declaration (std n3356)
Some checks are pending
build and test / test-x86_64-linux (push) Waiting to run
Details
build and test / test-x86_64-osx (push) Waiting to run
Details
build and test / test-aarch64-osx (push) Waiting to run
Details
build and test / test-x86_64-win32 (push) Waiting to run
Details
build and test / test-i386-win32 (push) Waiting to run
Details
build and test / test-armv7-linux (push) Waiting to run
Details
build and test / test-aarch64-linux (push) Waiting to run
Details
build and test / test-riscv64-linux (push) Waiting to run
Details

Browse Source 
standart is here: https://www.open-std.org/JTC1/SC22/WG14/www/docs/n3356.htm

This feature should not add bug to existing features,
as it is called only if there is a declaration in a switch or an if.
This commit is contained in:
Matthias Gatto 2025-08-08 01:04:25 +02:00
parent 80e7040d0c
commit f52b480f89
1 changed files with 34 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

39
tccgen.c
View File

@ -7051,6 +7051,31 @@ static void lblock(int *bsym, int *csym)
}
}
static void condition_expresion(void)
{
Sym *s;
int decl_ret;
/* c2y if init decl? */
if (!(decl_ret = decl(VT_JMPI))) {
/* no, regular if init expr */
gexpr();
} else {
if (decl_ret == 1)
tcc_error("declaration in the controlling expression must have an initializer");
if (tok == ';') {
/* finish the push */
next();
gexpr();
} else {
s = sym_find(decl_ret);
vset(&s->type, s->r, s->c);
vtop->sym = s;
}
}
}
static void block(int flags)
{
int a, b, c, d, e, t;
@ -7071,7 +7096,7 @@ again:
if (t == TOK_IF) {
new_scope_s(&o);
skip('(');
gexpr();
condition_expresion();
a = gvtst(1, 0);
skip(')');
block(0);
@ -7240,7 +7265,7 @@ again:
new_scope_s(&o);
skip('(');
gexpr();
condition_expresion();
if (!is_integer_btype(vtop->type.t & VT_BTYPE))
tcc_error("switch value not an integer");
skip(')');
@ -8562,7 +8587,9 @@ static void pe_check_linkage(CType *type, AttributeDef *ad)
/* 'l' is VT_LOCAL or VT_CONST to define default storage type
or VT_CMP if parsing old style parameter list
or VT_JMP if parsing c99 for decl: for (int i = 0, ...) */
or VT_JMP if parsing c99 for decl: for (int i = 0, ...)
or VT_JMPI if parsing c2y if decl; if (int = 0; ...)
*/
static int decl(int l)
{
int v, has_init, r, oldint;
@ -8575,7 +8602,7 @@ static int decl(int l)
oldint = 0;
if (!parse_btype(&btype, &adbase, l == VT_LOCAL)) {
if (l == VT_JMP)
if (l == VT_JMP || l == VT_JMPI)
return 0;
/* skip redundant ';' if not in old parameter decl scope */
if (tok == ';' && l != VT_CMP) {
@ -8815,10 +8842,12 @@ static int decl(int l)
}
}
if (tok != ',') {
if (l == VT_JMP)
if (l == VT_JMP || l == VT_JMPI)
return has_init ? v : 1;
skip(';');
break;
} else if (l == VT_JMPI) {
tcc_error("declaration in condition can only declare a single object");
}
next();
}