diff options
| author | Tristan Gingold <tgingold@free.fr> | 2014-11-16 07:56:41 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2014-11-16 07:56:41 +0100 |
| commit | 77d694076c67cbd37504b340190f29b6589dba13 (patch) | |
| tree | f4faa332e039fd446a66832847cfa3f6645c8282 | |
| parent | a2cb72c9206032362fe09db3275dfbc5743a799d (diff) | |
| download | ghdl-77d694076c67cbd37504b340190f29b6589dba13.tar.gz ghdl-77d694076c67cbd37504b340190f29b6589dba13.tar.bz2 ghdl-77d694076c67cbd37504b340190f29b6589dba13.zip | |
src/ortho/gcc/ortho_gcc.ads: regenerate.
| -rw-r--r-- | src/ortho/gcc/ortho_gcc.ads | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/ortho/gcc/ortho_gcc.ads b/src/ortho/gcc/ortho_gcc.ads index 0afdc0887..7ed83d241 100644 --- a/src/ortho/gcc/ortho_gcc.ads +++ b/src/ortho/gcc/ortho_gcc.ads @@ -541,6 +541,7 @@ private pragma Convention (C, O_Element_List); type O_Case_Block is record + Prev_Stmts : Tree; Case_Type : Tree; End_Label : Tree; Add_Break : Integer; @@ -548,7 +549,8 @@ private pragma Convention (C, O_Case_Block); type O_If_Block is record - Stmt : Tree; + Prev_Stmts : Tree; + If_Stmt : Tree; end record; pragma Convention (C, O_If_Block); |