diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-05-28 08:17:29 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-05-28 17:47:48 +0200 |
| commit | 0a51563e4e5989abe8becd1c060e06d4dec6024e (patch) | |
| tree | fb63c3831b809bb953d340fe049d62afe45725c6 | |
| parent | f75d87d33027413fac10adc7a6f5c1a48390efba (diff) | |
| download | ghdl-0a51563e4e5989abe8becd1c060e06d4dec6024e.tar.gz ghdl-0a51563e4e5989abe8becd1c060e06d4dec6024e.tar.bz2 ghdl-0a51563e4e5989abe8becd1c060e06d4dec6024e.zip | |
ortho/gcc: convert boolean and enums to int on interfaces.
| -rw-r--r-- | src/ortho/gcc/ortho-lang-49.c | 2 | ||||
| -rw-r--r-- | src/ortho/gcc/ortho-lang-5.c | 2 | ||||
| -rw-r--r-- | src/ortho/gcc/ortho-lang-6.c | 2 | ||||
| -rw-r--r-- | src/ortho/gcc/ortho-lang-7.c | 2 | ||||
| -rw-r--r-- | src/ortho/gcc/ortho-lang-8.c | 2 |
5 files changed, 10 insertions, 0 deletions
diff --git a/src/ortho/gcc/ortho-lang-49.c b/src/ortho/gcc/ortho-lang-49.c index 7de15aea9..1c127fdb1 100644 --- a/src/ortho/gcc/ortho-lang-49.c +++ b/src/ortho/gcc/ortho-lang-49.c @@ -1720,8 +1720,10 @@ new_interface_decl (struct o_inter_list *interfaces, case ENUMERAL_TYPE: case BOOLEAN_TYPE: DECL_ARG_TYPE (r) = integer_type_node; + break; default: DECL_ARG_TYPE (r) = atype; + break; } layout_decl (r, 0); diff --git a/src/ortho/gcc/ortho-lang-5.c b/src/ortho/gcc/ortho-lang-5.c index 52fd049f7..6f478b8d8 100644 --- a/src/ortho/gcc/ortho-lang-5.c +++ b/src/ortho/gcc/ortho-lang-5.c @@ -1706,8 +1706,10 @@ new_interface_decl (struct o_inter_list *interfaces, case ENUMERAL_TYPE: case BOOLEAN_TYPE: DECL_ARG_TYPE (r) = integer_type_node; + break; default: DECL_ARG_TYPE (r) = atype; + break; } layout_decl (r, 0); diff --git a/src/ortho/gcc/ortho-lang-6.c b/src/ortho/gcc/ortho-lang-6.c index f78017da4..2fd5be401 100644 --- a/src/ortho/gcc/ortho-lang-6.c +++ b/src/ortho/gcc/ortho-lang-6.c @@ -1706,8 +1706,10 @@ new_interface_decl (struct o_inter_list *interfaces, case ENUMERAL_TYPE: case BOOLEAN_TYPE: DECL_ARG_TYPE (r) = integer_type_node; + break; default: DECL_ARG_TYPE (r) = atype; + break; } layout_decl (r, 0); diff --git a/src/ortho/gcc/ortho-lang-7.c b/src/ortho/gcc/ortho-lang-7.c index 92bfc8d46..f78bf0460 100644 --- a/src/ortho/gcc/ortho-lang-7.c +++ b/src/ortho/gcc/ortho-lang-7.c @@ -1718,8 +1718,10 @@ new_interface_decl (struct o_inter_list *interfaces, case ENUMERAL_TYPE: case BOOLEAN_TYPE: DECL_ARG_TYPE (r) = integer_type_node; + break; default: DECL_ARG_TYPE (r) = atype; + break; } layout_decl (r, 0); diff --git a/src/ortho/gcc/ortho-lang-8.c b/src/ortho/gcc/ortho-lang-8.c index 5b253aee2..51b4a86f8 100644 --- a/src/ortho/gcc/ortho-lang-8.c +++ b/src/ortho/gcc/ortho-lang-8.c @@ -1719,8 +1719,10 @@ new_interface_decl (struct o_inter_list *interfaces, case ENUMERAL_TYPE: case BOOLEAN_TYPE: DECL_ARG_TYPE (r) = integer_type_node; + break; default: DECL_ARG_TYPE (r) = atype; + break; } layout_decl (r, 0); |