diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-06-17 21:50:25 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-06-17 21:50:25 +0200 |
| commit | 473c83961abe4e2fb52c8812e46bf19a41fe52cf (patch) | |
| tree | 130b71c9e47b60837257ab7b104adf99d44152b8 /src/ortho/gcc/ortho-lang-49.c | |
| parent | 6581cce8c6ea51b5386156fa4d21bd8f1865f851 (diff) | |
| download | ghdl-473c83961abe4e2fb52c8812e46bf19a41fe52cf.tar.gz ghdl-473c83961abe4e2fb52c8812e46bf19a41fe52cf.tar.bz2 ghdl-473c83961abe4e2fb52c8812e46bf19a41fe52cf.zip | |
src/ortho: add new_convert.
Diffstat (limited to 'src/ortho/gcc/ortho-lang-49.c')
| -rw-r--r-- | src/ortho/gcc/ortho-lang-49.c | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/ortho/gcc/ortho-lang-49.c b/src/ortho/gcc/ortho-lang-49.c index 1c127fdb1..6be55dabe 100644 --- a/src/ortho/gcc/ortho-lang-49.c +++ b/src/ortho/gcc/ortho-lang-49.c @@ -946,7 +946,7 @@ new_compare_op (enum ON_op_kind kind, tree left, tree right, tree ntype) } tree -new_convert_ov (tree val, tree rtype) +new_convert (tree val, tree rtype) { tree val_type; enum tree_code val_code; @@ -1009,6 +1009,12 @@ new_convert_ov (tree val, tree rtype) } tree +new_convert_ov (tree val, tree rtype) +{ + return new_convert (val, rtype); +} + +tree new_alloca (tree rtype, tree size) { tree res; |